∀ (R : Type u_3) (S : Type u_1) (M : Type u_2) [inst : CommSemiring R] [inst_1 : Semiring S] [inst_2 : AddCommMonoid M]
  [inst_3 : Module R M] [inst_4 : Module S M] [inst_5 : SMulCommClass S R M] [inst_6 : SMul R S] [IsScalarTower R S M]
  (r : R) (f g : Module.End S M), f • r • g = r • f • g