Metamath Proof Explorer


Theorem fsumvma

Description: Rewrite a sum over the von Mangoldt function as a sum over prime powers. (Contributed by Mario Carneiro, 15-Apr-2016)

Ref Expression
Hypotheses fsumvma.1 ⊢ x = p k → B = C
fsumvma.2 ⊢ φ → A ∈ Fin
fsumvma.3 ⊢ φ → A ⊆ ℕ
fsumvma.4 ⊢ φ → P ∈ Fin
fsumvma.5 ⊢ φ → p ∈ P ∧ k ∈ K ↔ p ∈ ℙ ∧ k ∈ ℕ ∧ p k ∈ A
fsumvma.6 ⊢ φ ∧ x ∈ A → B ∈ ℂ
fsumvma.7 ⊢ φ ∧ x ∈ A ∧ Λ ⁡ x = 0 → B = 0
Assertion fsumvma ⊢ φ → ∑ x ∈ A B = ∑ p ∈ P ∑ k ∈ K C

Proof

Step Hyp Ref Expression
1 fsumvma.1 ⊢ x = p k → B = C
2 fsumvma.2 ⊢ φ → A ∈ Fin
3 fsumvma.3 ⊢ φ → A ⊆ ℕ
4 fsumvma.4 ⊢ φ → P ∈ Fin
5 fsumvma.5 ⊢ φ → p ∈ P ∧ k ∈ K ↔ p ∈ ℙ ∧ k ∈ ℕ ∧ p k ∈ A
6 fsumvma.6 ⊢ φ ∧ x ∈ A → B ∈ ℂ
7 fsumvma.7 ⊢ φ ∧ x ∈ A ∧ Λ ⁡ x = 0 → B = 0
8 fvexd ⊢ z = p k → ^ ⁡ z ∈ V
9 fveq2 ⊢ z = p k → ^ ⁡ z = ^ ⁡ p k
10 df-ov ⊢ p k = ^ ⁡ p k
11 9 10 eqtr4di ⊢ z = p k → ^ ⁡ z = p k
12 11 eqeq2d ⊢ z = p k → x = ^ ⁡ z ↔ x = p k
13 12 biimpa ⊢ z = p k ∧ x = ^ ⁡ z → x = p k
14 13 1 syl ⊢ z = p k ∧ x = ^ ⁡ z → B = C
15 8 14 csbied ⊢ z = p k → ⦋ ^ ⁡ z / x⦌ B = C
16 2 adantr ⊢ φ ∧ p ∈ P → A ∈ Fin
17 5 biimpd ⊢ φ → p ∈ P ∧ k ∈ K → p ∈ ℙ ∧ k ∈ ℕ ∧ p k ∈ A
18 17 impl ⊢ φ ∧ p ∈ P ∧ k ∈ K → p ∈ ℙ ∧ k ∈ ℕ ∧ p k ∈ A
19 18 simprd ⊢ φ ∧ p ∈ P ∧ k ∈ K → p k ∈ A
20 19 ex ⊢ φ ∧ p ∈ P → k ∈ K → p k ∈ A
21 18 simpld ⊢ φ ∧ p ∈ P ∧ k ∈ K → p ∈ ℙ ∧ k ∈ ℕ
22 21 simpld ⊢ φ ∧ p ∈ P ∧ k ∈ K → p ∈ ℙ
23 22 adantrr ⊢ φ ∧ p ∈ P ∧ k ∈ K ∧ z ∈ K → p ∈ ℙ
24 21 simprd ⊢ φ ∧ p ∈ P ∧ k ∈ K → k ∈ ℕ
25 24 adantrr ⊢ φ ∧ p ∈ P ∧ k ∈ K ∧ z ∈ K → k ∈ ℕ
26 24 ex ⊢ φ ∧ p ∈ P → k ∈ K → k ∈ ℕ
27 26 ssrdv ⊢ φ ∧ p ∈ P → K ⊆ ℕ
28 27 sselda ⊢ φ ∧ p ∈ P ∧ z ∈ K → z ∈ ℕ
29 28 adantrl ⊢ φ ∧ p ∈ P ∧ k ∈ K ∧ z ∈ K → z ∈ ℕ
30 eqid ⊢ p = p
31 prmexpb ⊢ p ∈ ℙ ∧ p ∈ ℙ ∧ k ∈ ℕ ∧ z ∈ ℕ → p k = p z ↔ p = p ∧ k = z
32 31 baibd ⊢ p ∈ ℙ ∧ p ∈ ℙ ∧ k ∈ ℕ ∧ z ∈ ℕ ∧ p = p → p k = p z ↔ k = z
33 30 32 mpan2 ⊢ p ∈ ℙ ∧ p ∈ ℙ ∧ k ∈ ℕ ∧ z ∈ ℕ → p k = p z ↔ k = z
34 23 23 25 29 33 syl22anc ⊢ φ ∧ p ∈ P ∧ k ∈ K ∧ z ∈ K → p k = p z ↔ k = z
35 34 ex ⊢ φ ∧ p ∈ P → k ∈ K ∧ z ∈ K → p k = p z ↔ k = z
36 20 35 dom2lem ⊢ φ ∧ p ∈ P → k ∈ K ⟼ p k : K ⟶ 1-1 A
37 f1fi ⊢ A ∈ Fin ∧ k ∈ K ⟼ p k : K ⟶ 1-1 A → K ∈ Fin
38 16 36 37 syl2anc ⊢ φ ∧ p ∈ P → K ∈ Fin
39 1 eleq1d ⊢ x = p k → B ∈ ℂ ↔ C ∈ ℂ
40 6 ralrimiva ⊢ φ → ∀ x ∈ A B ∈ ℂ
41 40 adantr ⊢ φ ∧ p ∈ P ∧ k ∈ K → ∀ x ∈ A B ∈ ℂ
42 5 simplbda ⊢ φ ∧ p ∈ P ∧ k ∈ K → p k ∈ A
43 39 41 42 rspcdva ⊢ φ ∧ p ∈ P ∧ k ∈ K → C ∈ ℂ
44 15 4 38 43 fsum2d ⊢ φ → ∑ p ∈ P ∑ k ∈ K C = ∑ z ∈ ⋃ p ∈ P p × K ⦋ ^ ⁡ z / x⦌ B
45 csbeq1a ⊢ x = y → B = ⦋ y / x⦌ B
46 nfcv ⊢ Ⅎ _ y B
47 nfcsb1v ⊢ Ⅎ _ x ⦋ y / x⦌ B
48 45 46 47 cbvsum ⊢ ∑ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a B = ∑ y ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ⦋ y / x⦌ B
49 csbeq1 ⊢ y = ^ ⁡ z → ⦋ y / x⦌ B = ⦋ ^ ⁡ z / x⦌ B
50 snfi ⊢ p ∈ Fin
51 xpfi ⊢ p ∈ Fin ∧ K ∈ Fin → p × K ∈ Fin
52 50 38 51 sylancr ⊢ φ ∧ p ∈ P → p × K ∈ Fin
53 52 ralrimiva ⊢ φ → ∀ p ∈ P p × K ∈ Fin
54 iunfi ⊢ P ∈ Fin ∧ ∀ p ∈ P p × K ∈ Fin → ⋃ p ∈ P p × K ∈ Fin
55 4 53 54 syl2anc ⊢ φ → ⋃ p ∈ P p × K ∈ Fin
56 fvex ⊢ ^ ⁡ a ∈ V
57 56 2a1i ⊢ φ → a ∈ ⋃ p ∈ P p × K → ^ ⁡ a ∈ V
58 eliunxp ⊢ a ∈ ⋃ p ∈ P p × K ↔ ∃ p ∃ k a = p k ∧ p ∈ P ∧ k ∈ K
59 5 simprbda ⊢ φ ∧ p ∈ P ∧ k ∈ K → p ∈ ℙ ∧ k ∈ ℕ
60 opelxp ⊢ p k ∈ ℙ × ℕ ↔ p ∈ ℙ ∧ k ∈ ℕ
61 59 60 sylibr ⊢ φ ∧ p ∈ P ∧ k ∈ K → p k ∈ ℙ × ℕ
62 eleq1 ⊢ a = p k → a ∈ ℙ × ℕ ↔ p k ∈ ℙ × ℕ
63 61 62 syl5ibrcom ⊢ φ ∧ p ∈ P ∧ k ∈ K → a = p k → a ∈ ℙ × ℕ
64 63 impancom ⊢ φ ∧ a = p k → p ∈ P ∧ k ∈ K → a ∈ ℙ × ℕ
65 64 expimpd ⊢ φ → a = p k ∧ p ∈ P ∧ k ∈ K → a ∈ ℙ × ℕ
66 65 exlimdvv ⊢ φ → ∃ p ∃ k a = p k ∧ p ∈ P ∧ k ∈ K → a ∈ ℙ × ℕ
67 58 66 biimtrid ⊢ φ → a ∈ ⋃ p ∈ P p × K → a ∈ ℙ × ℕ
68 67 ssrdv ⊢ φ → ⋃ p ∈ P p × K ⊆ ℙ × ℕ
69 68 sseld ⊢ φ → b ∈ ⋃ p ∈ P p × K → b ∈ ℙ × ℕ
70 67 69 anim12d ⊢ φ → a ∈ ⋃ p ∈ P p × K ∧ b ∈ ⋃ p ∈ P p × K → a ∈ ℙ × ℕ ∧ b ∈ ℙ × ℕ
71 1st2nd2 ⊢ a ∈ ℙ × ℕ → a = 1 st ⁡ a 2 nd ⁡ a
72 71 fveq2d ⊢ a ∈ ℙ × ℕ → ^ ⁡ a = ^ ⁡ 1 st ⁡ a 2 nd ⁡ a
73 df-ov ⊢ 1 st ⁡ a 2 nd ⁡ a = ^ ⁡ 1 st ⁡ a 2 nd ⁡ a
74 72 73 eqtr4di ⊢ a ∈ ℙ × ℕ → ^ ⁡ a = 1 st ⁡ a 2 nd ⁡ a
75 1st2nd2 ⊢ b ∈ ℙ × ℕ → b = 1 st ⁡ b 2 nd ⁡ b
76 75 fveq2d ⊢ b ∈ ℙ × ℕ → ^ ⁡ b = ^ ⁡ 1 st ⁡ b 2 nd ⁡ b
77 df-ov ⊢ 1 st ⁡ b 2 nd ⁡ b = ^ ⁡ 1 st ⁡ b 2 nd ⁡ b
78 76 77 eqtr4di ⊢ b ∈ ℙ × ℕ → ^ ⁡ b = 1 st ⁡ b 2 nd ⁡ b
79 74 78 eqeqan12d ⊢ a ∈ ℙ × ℕ ∧ b ∈ ℙ × ℕ → ^ ⁡ a = ^ ⁡ b ↔ 1 st ⁡ a 2 nd ⁡ a = 1 st ⁡ b 2 nd ⁡ b
80 xp1st ⊢ a ∈ ℙ × ℕ → 1 st ⁡ a ∈ ℙ
81 xp2nd ⊢ a ∈ ℙ × ℕ → 2 nd ⁡ a ∈ ℕ
82 80 81 jca ⊢ a ∈ ℙ × ℕ → 1 st ⁡ a ∈ ℙ ∧ 2 nd ⁡ a ∈ ℕ
83 xp1st ⊢ b ∈ ℙ × ℕ → 1 st ⁡ b ∈ ℙ
84 xp2nd ⊢ b ∈ ℙ × ℕ → 2 nd ⁡ b ∈ ℕ
85 83 84 jca ⊢ b ∈ ℙ × ℕ → 1 st ⁡ b ∈ ℙ ∧ 2 nd ⁡ b ∈ ℕ
86 prmexpb ⊢ 1 st ⁡ a ∈ ℙ ∧ 1 st ⁡ b ∈ ℙ ∧ 2 nd ⁡ a ∈ ℕ ∧ 2 nd ⁡ b ∈ ℕ → 1 st ⁡ a 2 nd ⁡ a = 1 st ⁡ b 2 nd ⁡ b ↔ 1 st ⁡ a = 1 st ⁡ b ∧ 2 nd ⁡ a = 2 nd ⁡ b
87 86 an4s ⊢ 1 st ⁡ a ∈ ℙ ∧ 2 nd ⁡ a ∈ ℕ ∧ 1 st ⁡ b ∈ ℙ ∧ 2 nd ⁡ b ∈ ℕ → 1 st ⁡ a 2 nd ⁡ a = 1 st ⁡ b 2 nd ⁡ b ↔ 1 st ⁡ a = 1 st ⁡ b ∧ 2 nd ⁡ a = 2 nd ⁡ b
88 82 85 87 syl2an ⊢ a ∈ ℙ × ℕ ∧ b ∈ ℙ × ℕ → 1 st ⁡ a 2 nd ⁡ a = 1 st ⁡ b 2 nd ⁡ b ↔ 1 st ⁡ a = 1 st ⁡ b ∧ 2 nd ⁡ a = 2 nd ⁡ b
89 xpopth ⊢ a ∈ ℙ × ℕ ∧ b ∈ ℙ × ℕ → 1 st ⁡ a = 1 st ⁡ b ∧ 2 nd ⁡ a = 2 nd ⁡ b ↔ a = b
90 79 88 89 3bitrd ⊢ a ∈ ℙ × ℕ ∧ b ∈ ℙ × ℕ → ^ ⁡ a = ^ ⁡ b ↔ a = b
91 70 90 syl6 ⊢ φ → a ∈ ⋃ p ∈ P p × K ∧ b ∈ ⋃ p ∈ P p × K → ^ ⁡ a = ^ ⁡ b ↔ a = b
92 57 91 dom2lem ⊢ φ → a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a : ⋃ p ∈ P p × K ⟶ 1-1 V
93 f1f1orn ⊢ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a : ⋃ p ∈ P p × K ⟶ 1-1 V → a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a : ⋃ p ∈ P p × K ⟶ 1-1 onto ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a
94 92 93 syl ⊢ φ → a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a : ⋃ p ∈ P p × K ⟶ 1-1 onto ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a
95 fveq2 ⊢ a = z → ^ ⁡ a = ^ ⁡ z
96 eqid ⊢ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a = a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a
97 fvex ⊢ ^ ⁡ z ∈ V
98 95 96 97 fvmpt ⊢ z ∈ ⋃ p ∈ P p × K → a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ⁡ z = ^ ⁡ z
99 98 adantl ⊢ φ ∧ z ∈ ⋃ p ∈ P p × K → a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ⁡ z = ^ ⁡ z
100 fveq2 ⊢ a = p k → ^ ⁡ a = ^ ⁡ p k
101 100 10 eqtr4di ⊢ a = p k → ^ ⁡ a = p k
102 101 eleq1d ⊢ a = p k → ^ ⁡ a ∈ A ↔ p k ∈ A
103 42 102 syl5ibrcom ⊢ φ ∧ p ∈ P ∧ k ∈ K → a = p k → ^ ⁡ a ∈ A
104 103 impancom ⊢ φ ∧ a = p k → p ∈ P ∧ k ∈ K → ^ ⁡ a ∈ A
105 104 expimpd ⊢ φ → a = p k ∧ p ∈ P ∧ k ∈ K → ^ ⁡ a ∈ A
106 105 exlimdvv ⊢ φ → ∃ p ∃ k a = p k ∧ p ∈ P ∧ k ∈ K → ^ ⁡ a ∈ A
107 58 106 biimtrid ⊢ φ → a ∈ ⋃ p ∈ P p × K → ^ ⁡ a ∈ A
108 107 imp ⊢ φ ∧ a ∈ ⋃ p ∈ P p × K → ^ ⁡ a ∈ A
109 108 fmpttd ⊢ φ → a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a : ⋃ p ∈ P p × K ⟶ A
110 109 frnd ⊢ φ → ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ⊆ A
111 110 sselda ⊢ φ ∧ y ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a → y ∈ A
112 47 nfel1 ⊢ Ⅎ x ⦋ y / x⦌ B ∈ ℂ
113 45 eleq1d ⊢ x = y → B ∈ ℂ ↔ ⦋ y / x⦌ B ∈ ℂ
114 112 113 rspc ⊢ y ∈ A → ∀ x ∈ A B ∈ ℂ → ⦋ y / x⦌ B ∈ ℂ
115 40 114 mpan9 ⊢ φ ∧ y ∈ A → ⦋ y / x⦌ B ∈ ℂ
116 111 115 syldan ⊢ φ ∧ y ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a → ⦋ y / x⦌ B ∈ ℂ
117 49 55 94 99 116 fsumf1o ⊢ φ → ∑ y ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ⦋ y / x⦌ B = ∑ z ∈ ⋃ p ∈ P p × K ⦋ ^ ⁡ z / x⦌ B
118 48 117 eqtrid ⊢ φ → ∑ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a B = ∑ z ∈ ⋃ p ∈ P p × K ⦋ ^ ⁡ z / x⦌ B
119 110 sselda ⊢ φ ∧ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a → x ∈ A
120 119 6 syldan ⊢ φ ∧ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a → B ∈ ℂ
121 eldif ⊢ x ∈ A ∖ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ↔ x ∈ A ∧ ¬ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a
122 96 56 elrnmpti ⊢ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ↔ ∃ a ∈ ⋃ p ∈ P p × K x = ^ ⁡ a
123 101 eqeq2d ⊢ a = p k → x = ^ ⁡ a ↔ x = p k
124 123 rexiunxp ⊢ ∃ a ∈ ⋃ p ∈ P p × K x = ^ ⁡ a ↔ ∃ p ∈ P ∃ k ∈ K x = p k
125 122 124 bitri ⊢ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ↔ ∃ p ∈ P ∃ k ∈ K x = p k
126 simpr ⊢ φ ∧ x ∈ A ∧ x = p k → x = p k
127 simplr ⊢ φ ∧ x ∈ A ∧ x = p k → x ∈ A
128 126 127 eqeltrrd ⊢ φ ∧ x ∈ A ∧ x = p k → p k ∈ A
129 5 rbaibd ⊢ φ ∧ p k ∈ A → p ∈ P ∧ k ∈ K ↔ p ∈ ℙ ∧ k ∈ ℕ
130 129 adantlr ⊢ φ ∧ x ∈ A ∧ p k ∈ A → p ∈ P ∧ k ∈ K ↔ p ∈ ℙ ∧ k ∈ ℕ
131 128 130 syldan ⊢ φ ∧ x ∈ A ∧ x = p k → p ∈ P ∧ k ∈ K ↔ p ∈ ℙ ∧ k ∈ ℕ
132 131 pm5.32da ⊢ φ ∧ x ∈ A → x = p k ∧ p ∈ P ∧ k ∈ K ↔ x = p k ∧ p ∈ ℙ ∧ k ∈ ℕ
133 ancom ⊢ p ∈ P ∧ k ∈ K ∧ x = p k ↔ x = p k ∧ p ∈ P ∧ k ∈ K
134 ancom ⊢ p ∈ ℙ ∧ k ∈ ℕ ∧ x = p k ↔ x = p k ∧ p ∈ ℙ ∧ k ∈ ℕ
135 132 133 134 3bitr4g ⊢ φ ∧ x ∈ A → p ∈ P ∧ k ∈ K ∧ x = p k ↔ p ∈ ℙ ∧ k ∈ ℕ ∧ x = p k
136 135 2exbidv ⊢ φ ∧ x ∈ A → ∃ p ∃ k p ∈ P ∧ k ∈ K ∧ x = p k ↔ ∃ p ∃ k p ∈ ℙ ∧ k ∈ ℕ ∧ x = p k
137 r2ex ⊢ ∃ p ∈ P ∃ k ∈ K x = p k ↔ ∃ p ∃ k p ∈ P ∧ k ∈ K ∧ x = p k
138 r2ex ⊢ ∃ p ∈ ℙ ∃ k ∈ ℕ x = p k ↔ ∃ p ∃ k p ∈ ℙ ∧ k ∈ ℕ ∧ x = p k
139 136 137 138 3bitr4g ⊢ φ ∧ x ∈ A → ∃ p ∈ P ∃ k ∈ K x = p k ↔ ∃ p ∈ ℙ ∃ k ∈ ℕ x = p k
140 3 sselda ⊢ φ ∧ x ∈ A → x ∈ ℕ
141 isppw2 ⊢ x ∈ ℕ → Λ ⁡ x ≠ 0 ↔ ∃ p ∈ ℙ ∃ k ∈ ℕ x = p k
142 140 141 syl ⊢ φ ∧ x ∈ A → Λ ⁡ x ≠ 0 ↔ ∃ p ∈ ℙ ∃ k ∈ ℕ x = p k
143 139 142 bitr4d ⊢ φ ∧ x ∈ A → ∃ p ∈ P ∃ k ∈ K x = p k ↔ Λ ⁡ x ≠ 0
144 125 143 bitrid ⊢ φ ∧ x ∈ A → x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a ↔ Λ ⁡ x ≠ 0
145 144 necon2bbid ⊢ φ ∧ x ∈ A → Λ ⁡ x = 0 ↔ ¬ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a
146 145 pm5.32da ⊢ φ → x ∈ A ∧ Λ ⁡ x = 0 ↔ x ∈ A ∧ ¬ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a
147 7 ex ⊢ φ → x ∈ A ∧ Λ ⁡ x = 0 → B = 0
148 146 147 sylbird ⊢ φ → x ∈ A ∧ ¬ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a → B = 0
149 121 148 biimtrid ⊢ φ → x ∈ A ∖ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a → B = 0
150 149 imp ⊢ φ ∧ x ∈ A ∖ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a → B = 0
151 110 120 150 2 fsumss ⊢ φ → ∑ x ∈ ran ⁡ a ∈ ⋃ p ∈ P p × K ⟼ ^ ⁡ a B = ∑ x ∈ A B
152 44 118 151 3eqtr2rd ⊢ φ → ∑ x ∈ A B = ∑ p ∈ P ∑ k ∈ K C