proposition: Lemma ptsE k v : pts k v = to (@UM.pts nat_ordType nat_pred A k v).
proof: Proof. by []. Qed.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path interval) pcm(options prelude pred finmap rtc seqext useqord uslice uconsec)