Definition rigtoringisunit (X : rig) : isunit (rigtoringop2 X) (rigtoringunel2 X) := rigtoringlunit2 X ,, rigtoringrunit2 X.
Require Import UniMath.Algebra.Groups. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders.