proposition: Lemma islinv_setofendabgr_inv {G : abgr} : islinv (@ringofendabgr_op1 G) (unel_is (@ismonoidop_ringofendabgr_op1 G)) setofendabgr_inv.
proof: Proof. intro f. use total2_paths_f. - apply funextfun. intro x. apply (grlinvax G). - apply isapropismonoidfun. Defined.
imports: UniMath.MoreFoundations.Tactics UniMath.Algebra.RigsAndRings UniMath.Algebra.Groups UniMath.Algebra.Monoids