proposition: Lemma ax_eq_refl (pS : pSystem)(s : pS) : mprv (s <--> s).
proof: Proof. rule axEI; exact: axI. Qed.
imports: mathcomp(all_ssreflect) CompDecModal.libs(edone base fset induced_sym) Setoid Morphisms Relation_Definitions