proposition: Lemma eqsl_underR s (i j : itv_bound A) : bnd (ix_bnd s j) (size s) = 0%N -> &=s (Interval i j) = [::].
proof: Proof. by move=>H; apply: itv_underR. Qed.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path interval order) pcm(options prelude ordtype seqext slice useqord)