proposition: Lemma axOC s t : mprv (s :\/: t ---> t :\/: s).
proof: Proof. rule axOE; auto using axOIl, axOIr. Qed.
imports: mathcomp(all_ssreflect) CompDecModal.libs(edone base fset induced_sym) Setoid Morphisms Relation_Definitions