proposition: Corollary slice_uoxu s i : s = &:s `]-oo, i[ ++ &:s `[i, +oo[.
proof: Proof. by rewrite -(slice_split _ _ (i:=`]-oo, +oo[)) // slice_uu. Qed.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path interval order) pcm(options prelude ordtype seqext)