Metamath Proof Explorer


Theorem sgmppw

Description: The value of the divisor function at a prime power. (Contributed by Mario Carneiro, 17-May-2016)

Ref Expression
Assertion sgmppw ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → A σ P N = ∑ k = 0 N P A k

Proof

Step Hyp Ref Expression
1 simp1 ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → A ∈ ℂ
2 simp2 ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → P ∈ ℙ
3 prmnn ⊢ P ∈ ℙ → P ∈ ℕ
4 2 3 syl ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → P ∈ ℕ
5 simp3 ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → N ∈ ℕ 0
6 4 5 nnexpcld ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → P N ∈ ℕ
7 sgmval ⊢ A ∈ ℂ ∧ P N ∈ ℕ → A σ P N = ∑ n ∈ x ∈ ℕ | x ∥ P N n A
8 1 6 7 syl2anc ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → A σ P N = ∑ n ∈ x ∈ ℕ | x ∥ P N n A
9 oveq1 ⊢ n = P k → n A = P k A
10 fzfid ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → 0 … N ∈ Fin
11 eqid ⊢ i ∈ 0 … N ⟼ P i = i ∈ 0 … N ⟼ P i
12 11 dvdsppwf1o ⊢ P ∈ ℙ ∧ N ∈ ℕ 0 → i ∈ 0 … N ⟼ P i : 0 … N ⟶ 1-1 onto x ∈ ℕ | x ∥ P N
13 2 5 12 syl2anc ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → i ∈ 0 … N ⟼ P i : 0 … N ⟶ 1-1 onto x ∈ ℕ | x ∥ P N
14 oveq2 ⊢ i = k → P i = P k
15 ovex ⊢ P k ∈ V
16 14 11 15 fvmpt ⊢ k ∈ 0 … N → i ∈ 0 … N ⟼ P i ⁡ k = P k
17 16 adantl ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → i ∈ 0 … N ⟼ P i ⁡ k = P k
18 elrabi ⊢ n ∈ x ∈ ℕ | x ∥ P N → n ∈ ℕ
19 18 nncnd ⊢ n ∈ x ∈ ℕ | x ∥ P N → n ∈ ℂ
20 cxpcl ⊢ n ∈ ℂ ∧ A ∈ ℂ → n A ∈ ℂ
21 19 1 20 syl2anr ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ n ∈ x ∈ ℕ | x ∥ P N → n A ∈ ℂ
22 9 10 13 17 21 fsumf1o ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → ∑ n ∈ x ∈ ℕ | x ∥ P N n A = ∑ k = 0 N P k A
23 elfznn0 ⊢ k ∈ 0 … N → k ∈ ℕ 0
24 23 adantl ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → k ∈ ℕ 0
25 24 nn0cnd ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → k ∈ ℂ
26 1 adantr ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → A ∈ ℂ
27 25 26 mulcomd ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → k ⁢ A = A ⁢ k
28 27 oveq2d ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P k ⁢ A = P A ⁢ k
29 4 adantr ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P ∈ ℕ
30 29 nnrpd ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P ∈ ℝ +
31 24 nn0red ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → k ∈ ℝ
32 30 31 26 cxpmuld ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P k ⁢ A = P k A
33 29 nncnd ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P ∈ ℂ
34 cxpexp ⊢ P ∈ ℂ ∧ k ∈ ℕ 0 → P k = P k
35 33 24 34 syl2anc ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P k = P k
36 35 oveq1d ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P k A = P k A
37 32 36 eqtrd ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P k ⁢ A = P k A
38 33 26 24 cxpmul2d ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P A ⁢ k = P A k
39 28 37 38 3eqtr3d ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 ∧ k ∈ 0 … N → P k A = P A k
40 39 sumeq2dv ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → ∑ k = 0 N P k A = ∑ k = 0 N P A k
41 8 22 40 3eqtrd ⊢ A ∈ ℂ ∧ P ∈ ℙ ∧ N ∈ ℕ 0 → A σ P N = ∑ k = 0 N P A k