∀ (R' : Type u_4) (S : Type u_1) (A : Type u_2) (B : Type u_3) [inst : CommSemiring S] [inst_1 : Semiring A]
  [inst_2 : Algebra S A] [inst_3 : Semiring B] [inst_4 : CommSemiring R'] [inst_5 : Algebra R' A]
  [inst_6 : Algebra R' B] [inst_7 : SMulCommClass R' S A], SMulCommClass S (TensorProduct R' A B) (TensorProduct R' A B)