fact: Definition commrigconstr {X : hSet} (opp1 opp2 : binop X) (ax11 : ismonoidop opp1) (ax12 : iscomm opp1) (ax2 : ismonoidop opp2) (ax22 : iscomm opp2) (m0x : ∏ x : X, paths (opp2 (unel_is ax11) x) (unel_is ax11)) (mx0 : ∏ x : X, paths (opp2 x (unel_is ax11)) (unel_is ax11)) (dax : isdistr opp1 opp2) : commrig.
imports: UniMath.Algebra.Groups UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Orders UniMath.Algebra.Monoids