fact: Definition prodActionFromLaws pf1 pf2 := @mkAction M12 (X1 × X2) product_action pf1 pf2.
imports: Coq(ssreflect ssrfun ssrbool List) Coq(FunctionalExtensionality) Coq(Relation_Definitions Morphisms) Mon(SPropBase SPropMonadicStructures)