proposition: Lemma moduleiso_to_moduleiso' {R} (M N : module R) : moduleiso M N -> moduleiso' M N.
proof: Proof. intro w. use tpair. - use tpair. + exact w. + use tpair. * exact (modulefun_to_isbinopfun w). * apply (modulefun_unel w). - exact (modulefun_to_islinear w). Defined.
imports: UniMath.MoreFoundations.Tactics UniMath.Algebra.RigsAndRings UniMath.Algebra.Groups UniMath.Algebra.Monoids