Definition ringfun_left_mult {R S : ring} (f : ringfun R S) (r : R) : ringofendabgr S. Proof. refine ((λ x : S, (f r * x)),, (λ _ _, _),, _). apply (rigldistr S _ _ _). apply (rigmultx0 S). Defined.
Require Import UniMath.Algebra.Modules.Core. Require Import UniMath.Algebra.Modules.Multimodules. Require Import UniMath.Algebra.Monoids. Require Import UniMath.Algebra.Groups. Require Import UniMath.Algebra.RigsAndRings. Require Import UniMath.Foundations.Preamble. Require Import UniMath.MoreFoundations.Tactics.