fact: Definition isaddmonoidfuntoringdiff (X : rig) : @ismonoidfun (rigaddabmonoid X) (rigtoring X) (toringdiff X) := make_dirprod (isbinop1funtoringdiff X) (isunital1funtoringdiff X).
imports: UniMath.Algebra.Groups UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Orders UniMath.Algebra.Monoids