Definition rigaddiso {X Y : rig} (f : rigiso X Y) : monoidiso (rigaddabmonoid X) (rigaddabmonoid Y) := @make_monoidiso (rigaddabmonoid X) (rigaddabmonoid Y) (pr1 f) (pr1 (pr2 f)).
Require Import UniMath.Algebra.Groups. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders.