ι : Type ?u.990207
β : Type u
α : Type v
γ : Type w
s✝ s₁ s₂ : Finset α
a : α
f g : α → β
inst✝ : Monoid α
s : List (Additive α)
⊢ List.sum s = List.prod s
ι : Type ?u.990207
β : Type u
α : Type v
γ : Type w
s✝ s₁ s₂ : Finset α
a : α
f g : α → β
inst✝ : Monoid α
s : List (Additive α)
⊢ ↑toMul (List.sum s) = List.prod (List.map (↑toMul) s)
simp [toMul, ofMul]
no goals
ι : Type ?u.990207
β : Type u
α : Type v
γ : Type w
s✝ s₁ s₂ : Finset α
a : α
f g : α → β
inst✝ : Monoid α
s : List (Additive α)
⊢ List.sum s = List.prod s
rfl