proposition: Corollary slice_subset_full s i : {subset &:s i <= s}.
proof: Proof. by rewrite -{2}(slice_uu s); apply/slice_subset/itv_lex1. Qed.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path interval order) pcm(options prelude ordtype seqext)