proposition: Lemma slice_ouou s a b : &:s `]a,b[ = &:(&:s `]-oo,b[) `]a,+oo[.
proof: Proof. by rewrite slice_decompose. Qed.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path interval order) pcm(options prelude ordtype seqext)