English
For a fixed index i, comul after lsingle_i equals TensorProduct.map(lsingle_i, lsingle_i) after comul on the i-th component.
Русский
Для фиксированного индекса i копуляция после lsingle_i равна TensorProduct.map(lsingle_i, lsingle_i) после копуляции на i-м компоненте.
LaTeX
$$$ \operatorname{comul} \circ \mathrm{lsingle}_{i} = (\mathrm{TensorProduct.map} (\mathrm{lsingle}_{i}) (\mathrm{lsingle}_{i})) \circ \operatorname{comul}_{i} $$$
Lean4
theorem comul_comp_lsingle (i : ι) :
comul ∘ₗ (lsingle i : A i →ₗ[R] _) = TensorProduct.map (lsingle i) (lsingle i) ∘ₗ comul := by ext; simp