rw [← h hs, weightedDegree_one]
R : Type u_1
ι : Type u_2
inst✝ : CommSemiring R
p : MvPolynomial ι R
h : p.IsHomogeneous p.totalDegree
s : ι →₀ ℕ
hs : coeff s p ≠ 0
⊢ ∑ i ∈ s.support, s i = p.totalDegree
R : Type u_1
ι : Type u_2
inst✝ : CommSemiring R
p : MvPolynomial ι R
h : p.IsHomogeneous p.totalDegree
s : ι →₀ ℕ
hs : coeff s p ≠ 0
⊢ ∑ i ∈ s.support, s i = degree s