{ι : Type u_1} →
  {R : Type u_3} →
    {A : ι → Type u_4} →
      [inst : CommSemiring R] →
        [inst_1 : (i : ι) → NonUnitalNonAssocSemiring (A i)] →
          [inst_2 : (i : ι) → Module R (A i)] →
            [∀ (i : ι), SMulCommClass R (A i) (A i)] →
              [∀ (i : ι), IsScalarTower R (A i) (A i)] →
                (PiTensorProduct R fun i => A i) →ₗ[R]
                  (PiTensorProduct R fun i => A i) →ₗ[R] PiTensorProduct R fun i => A i