Definition idrigiso (X : rig) : rigiso X X. Proof. use make_rigiso. - exact (idweq X). - use make_isrigfun. + use make_ismonoidfun. * use make_isbinopfun. intros x x'. use idpath. * use idpath. + use make_ismonoidfun. * use make_isbinopfun. intros x x'. use idpath. * use idpath. Defined.
Require Import UniMath.Algebra.Groups. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders.