Lemma setofendabgr_un0 {G: abgr} : monoidfun G G. Proof. apply (@monoidfunconstr _ _ (λ x : G, 0)). apply make_dirprod. - intros x x'. rewrite (lunax G). reflexivity. - reflexivity. Defined.
Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.Algebra.RigsAndRings. Require Import UniMath.Algebra.Groups. Require Import UniMath.Algebra.Monoids.