proposition: Lemma modulebinop_lunax {R : ring} {M N : module R} (f : R-mod(M, N)) : modulehombinop (unelmodulefun M N) f = f.
proof: Proof. use modulefun_paths2. intros x. use (lunax N). Qed.
imports: UniMath.MoreFoundations.Tactics UniMath.Algebra.RigsAndRings UniMath.Algebra.Groups UniMath.Algebra.Monoids