Lemma isldistr_setofendabgr_op {G : abgr} : isldistr (@ringofendabgr_op1 G) (@ringofendabgr_op2 G). Proof. intros f g h. use total2_paths_f. - apply funextfun. intro x. apply (setofendabgr_to_isbinopfun h). - apply isapropismonoidfun. Defined.
Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.Algebra.RigsAndRings. Require Import UniMath.Algebra.Groups. Require Import UniMath.Algebra.Monoids.