Definition carrierofsubabmonoid {X : abmonoid} (A : subabmonoid X) : abmonoid. Proof. unfold subabmonoid in A. exists A. apply isabmonoidcarrier. Defined.
Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders. Require Import UniMath.Algebra.Monoids2.