proposition: Lemma pcm_validE (x : U) : valid x = valid_op (class U) x.
proof: Proof. by rewrite /valid. Qed.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq bigop fintype finset) pcm(options axioms prelude seqperm pred seqext)