English
Coproduct on C a multiplied by T n equals the map of comul a by lsingle n: comul(C a * T n) = map (lsingle n) (lsingle n) (comul a).
Русский
Копупликация на C a умноженная на T n равна отображению comul a через lsingle n: comul(C a * T n) = map (lsingle n) (lsingle n) (comul a).
LaTeX
$$$\mathrm{comul}\; (\mathrm{C}\;a \;*\; T\;n) = \operatorname{TensorProduct}.map (\mathrm{lsingle}\; n) (\mathrm{lsingle}\; n) (\mathrm{comul}\;(a))$$$
Lean4
@[simp]
theorem comul_C (a : A) :
Coalgebra.comul (R := R) (C a) = TensorProduct.map (lsingle 0) (lsingle 0) (Coalgebra.comul (R := R) a) :=
comul_single _ _