case h
R : Type u_2
inst✝ : CommSemiring R
σ : Type u_1
s : Multiset σ
r : σ → R
k : ℕ
h : k ≤ ↑card s
⊢ k ≤ ↑card s
R : Type u_2
inst✝ : CommSemiring R
σ : Type u_1
s : Multiset σ
r : σ → R
k : ℕ
h : k ≤ ↑card s
⊢ coeff (prod (map (fun i => X + ↑C (r i)) s)) k = esymm (map r s) (↑card s - k)
erw [← map_map (fun r => X + C r) r, prod_X_add_C_coeff] <;> rw [s.card_map r]
no goals
case h
R : Type u_2
inst✝ : CommSemiring R
σ : Type u_1
s : Multiset σ
r : σ → R
k : ℕ
h : k ≤ ↑card s
⊢ k ≤ ↑card s
assumption