ι : Type ?u.994730
β : Type u
α : Type v
γ : Type w
s✝ s₁ s₂ : Finset α
a : α
f g : α → β
inst✝ : AddMonoid α
s : List (Multiplicative α)
⊢ List.prod s = List.sum s
ι : Type ?u.994730
β : Type u
α : Type v
γ : Type w
s✝ s₁ s₂ : Finset α
a : α
f g : α → β
inst✝ : AddMonoid α
s : List (Multiplicative α)
⊢ ↑toAdd (List.prod s) = List.sum (List.map (↑toAdd) s)
simp [toAdd, ofAdd]
no goals
ι : Type ?u.994730
β : Type u
α : Type v
γ : Type w
s✝ s₁ s₂ : Finset α
a : α
f g : α → β
inst✝ : AddMonoid α
s : List (Multiplicative α)
⊢ List.prod s = List.sum s
rfl