∀ {R : Type u_3} {n : Type u_1} [inst : CommSemiring R] [inst_1 : Fintype n] [inst_2 : DecidableEq n] {A : n → Type u_2}
  [inst_3 : (i : n) → AddCommMonoid (A i)] [inst_4 : (i : n) → Module R (A i)] [inst_5 : (i : n) → Coalgebra R (A i)],
  ↑(TensorProduct.assoc R ((i : n) → A i) ((i : n) → A i) ((i : n) → A i)) ∘ₗ
      LinearMap.rTensor ((i : n) → A i) CoalgebraStruct.comul ∘ₗ CoalgebraStruct.comul =
    LinearMap.lTensor ((i : n) → A i) CoalgebraStruct.comul ∘ₗ CoalgebraStruct.comul