proposition: Lemma pleq_refl {x} : [pcm x <= x].
proof: Proof. by exists Unit; rewrite unitR. Qed.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq bigop fintype finset) pcm(options axioms prelude seqperm pred seqext)