Lemma module_mult_1 {R : ring} {M : module R} (r : R) : r * unel M = unel M. Proof. exact (pr2 (pr2 (pr2module M r))). Defined.
Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.Algebra.RigsAndRings. Require Import UniMath.Algebra.Groups. Require Import UniMath.Algebra.Monoids.