∀ {R : Type u_1} {S : Type u_2} {A : Type u_3} [inst : CommSemiring R] [inst_1 : CommSemiring S]
  [inst_2 : AddCommMonoid A] [inst_3 : Algebra R S] [inst_4 : Module R A] [inst_5 : Module S A]
  [inst_6 : IsScalarTower R S A], SMulCommClass R S (TensorProduct S A A)