fact: Definition carrierofsubabmonoid {X : abmonoid} (A : subabmonoid X) : abmonoid.
imports: UniMath.Algebra.BinaryOperations UniMath.MoreFoundations.Subtypes UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Orders