proposition: Lemma modulehomabmodule_ismoduleop {R : ring} {M N : module R} : ismonoidop (λ f g : R-mod(M, N), modulehombinop f g).
proof: Proof. use make_ismonoidop. - intros f g h. exact (modulehombinop_assoc f g h). - use make_isunital. + exact (unelmodulefun M N). + use make_isunit. * intros f. exact (modulebinop_lunax f). * intros f. exact (modulebinop_runax f). Defined.
imports: UniMath.MoreFoundations.Tactics UniMath.Algebra.RigsAndRings UniMath.Algebra.Groups UniMath.Algebra.Monoids