∀ (R : Type u_1) [inst : CommSemiring R] {M : Type u_5} {N : Type u_6} {P : Type u_7} [inst_1 : AddCommMonoid M]
  [inst_2 : AddCommMonoid N] [inst_3 : AddCommMonoid P] [inst_4 : Module R M] [inst_5 : Module R N]
  [inst_6 : Module R P] (m : M) (n : N) (p : P),
  (TensorProduct.rightComm R M N P) (m ⊗ₜ[R] n ⊗ₜ[R] p) = m ⊗ₜ[R] p ⊗ₜ[R] n