∀ {R : Type u_3} {M : Type u_2} {A : Type u_1} [inst : CommSemiring R] [inst_1 : NonUnitalNonAssocSemiring A]
  [inst_2 : AddCommMonoid M] [inst_3 : Module R M] [inst_4 : Module R A] [SMulCommClass R A A] [IsScalarTower R A A]
  (f g : M →ₗ[R] A) (a : R) (x : M), (⇑f * ⇑g) (a • x) = (a * a) • (⇑f * ⇑g) x