fact: Definition prabgrdiff (X : abmonoid) : X -> X -> abgrdiff X := λ x x' : X, setquotpr (eqrelabgrdiff X) (make_dirprod x x').
imports: UniMath.MoreFoundations.Orders UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.Subtypes UniMath.Algebra.BinaryOperations UniMath.Algebra.Monoids