∀ (R : Type u_1) (S : Type u_2) (M : Type u_4) (N : Type u_3) [inst : CommSemiring R] [inst_1 : CommSemiring S]
  [inst_2 : Algebra R S] [inst_3 : AddCommMonoid M] [inst_4 : AddCommMonoid N] [inst_5 : Module R M]
  [inst_6 : Module S M] [inst_7 : IsScalarTower R S M] [inst_8 : Module S N], IsScalarTower R S (TensorProduct S M N)