MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  fsumvma Structured version   Visualization version   GIF version

Theorem fsumvma 27377
Description: Rewrite a sum over the von Mangoldt function as a sum over prime powers. (Contributed by Mario Carneiro, 15-Apr-2016.)
Hypotheses
Ref Expression
fsumvma.1 (𝑥 = (𝑝𝑘) → 𝐵 = 𝐶)
fsumvma.2 (𝜑𝐴 ∈ Fin)
fsumvma.3 (𝜑𝐴 ⊆ ℕ)
fsumvma.4 (𝜑𝑃 ∈ Fin)
fsumvma.5 (𝜑 → ((𝑝𝑃𝑘𝐾) ↔ ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ (𝑝𝑘) ∈ 𝐴)))
fsumvma.6 ((𝜑𝑥𝐴) → 𝐵 ∈ ℂ)
fsumvma.7 ((𝜑 ∧ (𝑥𝐴 ∧ (Λ‘𝑥) = 0)) → 𝐵 = 0)
Assertion
Ref Expression
fsumvma (𝜑 → Σ𝑥𝐴 𝐵 = Σ𝑝𝑃 Σ𝑘𝐾 𝐶)
Distinct variable groups:   𝑘,𝑝,𝑥,𝐴   𝑥,𝐶   𝑘,𝐾,𝑥   𝜑,𝑘,𝑝,𝑥   𝐵,𝑘,𝑝   𝑃,𝑘,𝑝,𝑥
Allowed substitution hints:   𝐵(𝑥)   𝐶(𝑘,𝑝)   𝐾(𝑝)

Proof of Theorem fsumvma
Dummy variables 𝑎 𝑧 𝑏 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fvexd 6896 . . . 4 (𝑧 = ⟨𝑝, 𝑘⟩ → (↑‘𝑧) ∈ V)
2 fveq2 6881 . . . . . . . 8 (𝑧 = ⟨𝑝, 𝑘⟩ → (↑‘𝑧) = (↑‘⟨𝑝, 𝑘⟩))
3 df-ov 7413 . . . . . . . 8 (𝑝𝑘) = (↑‘⟨𝑝, 𝑘⟩)
42, 3eqtr4di 2816 . . . . . . 7 (𝑧 = ⟨𝑝, 𝑘⟩ → (↑‘𝑧) = (𝑝𝑘))
54eqeq2d 2774 . . . . . 6 (𝑧 = ⟨𝑝, 𝑘⟩ → (𝑥 = (↑‘𝑧) ↔ 𝑥 = (𝑝𝑘)))
65biimpa 481 . . . . 5 ((𝑧 = ⟨𝑝, 𝑘⟩ ∧ 𝑥 = (↑‘𝑧)) → 𝑥 = (𝑝𝑘))
7 fsumvma.1 . . . . 5 (𝑥 = (𝑝𝑘) → 𝐵 = 𝐶)
86, 7syl 18 . . . 4 ((𝑧 = ⟨𝑝, 𝑘⟩ ∧ 𝑥 = (↑‘𝑧)) → 𝐵 = 𝐶)
91, 8csbied 3889 . . 3 (𝑧 = ⟨𝑝, 𝑘⟩ → (↑‘𝑧) / 𝑥𝐵 = 𝐶)
10 fsumvma.4 . . 3 (𝜑𝑃 ∈ Fin)
11 fsumvma.2 . . . . 5 (𝜑𝐴 ∈ Fin)
1211adantr 485 . . . 4 ((𝜑𝑝𝑃) → 𝐴 ∈ Fin)
13 fsumvma.5 . . . . . . . . 9 (𝜑 → ((𝑝𝑃𝑘𝐾) ↔ ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ (𝑝𝑘) ∈ 𝐴)))
1413biimpd 232 . . . . . . . 8 (𝜑 → ((𝑝𝑃𝑘𝐾) → ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ (𝑝𝑘) ∈ 𝐴)))
1514impl 460 . . . . . . 7 (((𝜑𝑝𝑃) ∧ 𝑘𝐾) → ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ (𝑝𝑘) ∈ 𝐴))
1615simprd 500 . . . . . 6 (((𝜑𝑝𝑃) ∧ 𝑘𝐾) → (𝑝𝑘) ∈ 𝐴)
1716ex 417 . . . . 5 ((𝜑𝑝𝑃) → (𝑘𝐾 → (𝑝𝑘) ∈ 𝐴))
1815simpld 499 . . . . . . . . 9 (((𝜑𝑝𝑃) ∧ 𝑘𝐾) → (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ))
1918simpld 499 . . . . . . . 8 (((𝜑𝑝𝑃) ∧ 𝑘𝐾) → 𝑝 ∈ ℙ)
2019adantrr 729 . . . . . . 7 (((𝜑𝑝𝑃) ∧ (𝑘𝐾𝑧𝐾)) → 𝑝 ∈ ℙ)
2118simprd 500 . . . . . . . 8 (((𝜑𝑝𝑃) ∧ 𝑘𝐾) → 𝑘 ∈ ℕ)
2221adantrr 729 . . . . . . 7 (((𝜑𝑝𝑃) ∧ (𝑘𝐾𝑧𝐾)) → 𝑘 ∈ ℕ)
2321ex 417 . . . . . . . . . 10 ((𝜑𝑝𝑃) → (𝑘𝐾𝑘 ∈ ℕ))
2423ssrdv 3943 . . . . . . . . 9 ((𝜑𝑝𝑃) → 𝐾 ⊆ ℕ)
2524sselda 3937 . . . . . . . 8 (((𝜑𝑝𝑃) ∧ 𝑧𝐾) → 𝑧 ∈ ℕ)
2625adantrl 728 . . . . . . 7 (((𝜑𝑝𝑃) ∧ (𝑘𝐾𝑧𝐾)) → 𝑧 ∈ ℕ)
27 eqid 2763 . . . . . . . 8 𝑝 = 𝑝
28 prmexpb 16773 . . . . . . . . 9 (((𝑝 ∈ ℙ ∧ 𝑝 ∈ ℙ) ∧ (𝑘 ∈ ℕ ∧ 𝑧 ∈ ℕ)) → ((𝑝𝑘) = (𝑝𝑧) ↔ (𝑝 = 𝑝𝑘 = 𝑧)))
2928baibd 548 . . . . . . . 8 ((((𝑝 ∈ ℙ ∧ 𝑝 ∈ ℙ) ∧ (𝑘 ∈ ℕ ∧ 𝑧 ∈ ℕ)) ∧ 𝑝 = 𝑝) → ((𝑝𝑘) = (𝑝𝑧) ↔ 𝑘 = 𝑧))
3027, 29mpan2 703 . . . . . . 7 (((𝑝 ∈ ℙ ∧ 𝑝 ∈ ℙ) ∧ (𝑘 ∈ ℕ ∧ 𝑧 ∈ ℕ)) → ((𝑝𝑘) = (𝑝𝑧) ↔ 𝑘 = 𝑧))
3120, 20, 22, 26, 30syl22anc 851 . . . . . 6 (((𝜑𝑝𝑃) ∧ (𝑘𝐾𝑧𝐾)) → ((𝑝𝑘) = (𝑝𝑧) ↔ 𝑘 = 𝑧))
3231ex 417 . . . . 5 ((𝜑𝑝𝑃) → ((𝑘𝐾𝑧𝐾) → ((𝑝𝑘) = (𝑝𝑧) ↔ 𝑘 = 𝑧)))
3317, 32dom2lem 8985 . . . 4 ((𝜑𝑝𝑃) → (𝑘𝐾 ↦ (𝑝𝑘)):𝐾1-1𝐴)
34 f1fi 9270 . . . 4 ((𝐴 ∈ Fin ∧ (𝑘𝐾 ↦ (𝑝𝑘)):𝐾1-1𝐴) → 𝐾 ∈ Fin)
3512, 33, 34syl2anc 595 . . 3 ((𝜑𝑝𝑃) → 𝐾 ∈ Fin)
367eleq1d 2848 . . . 4 (𝑥 = (𝑝𝑘) → (𝐵 ∈ ℂ ↔ 𝐶 ∈ ℂ))
37 fsumvma.6 . . . . . 6 ((𝜑𝑥𝐴) → 𝐵 ∈ ℂ)
3837ralrimiva 3157 . . . . 5 (𝜑 → ∀𝑥𝐴 𝐵 ∈ ℂ)
3938adantr 485 . . . 4 ((𝜑 ∧ (𝑝𝑃𝑘𝐾)) → ∀𝑥𝐴 𝐵 ∈ ℂ)
4013simplbda 504 . . . 4 ((𝜑 ∧ (𝑝𝑃𝑘𝐾)) → (𝑝𝑘) ∈ 𝐴)
4136, 39, 40rspcdva 3582 . . 3 ((𝜑 ∧ (𝑝𝑃𝑘𝐾)) → 𝐶 ∈ ℂ)
429, 10, 35, 41fsum2d 15818 . 2 (𝜑 → Σ𝑝𝑃 Σ𝑘𝐾 𝐶 = Σ𝑧 𝑝𝑃 ({𝑝} × 𝐾)(↑‘𝑧) / 𝑥𝐵)
43 csbeq1a 3867 . . . 4 (𝑥 = 𝑦𝐵 = 𝑦 / 𝑥𝐵)
44 nfcv 2925 . . . 4 𝑦𝐵
45 nfcsb1v 3877 . . . 4 𝑥𝑦 / 𝑥𝐵
4643, 44, 45cbvsum 15742 . . 3 Σ𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))𝐵 = Σ𝑦 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))𝑦 / 𝑥𝐵
47 csbeq1 3856 . . . 4 (𝑦 = (↑‘𝑧) → 𝑦 / 𝑥𝐵 = (↑‘𝑧) / 𝑥𝐵)
48 snfi 9036 . . . . . . 7 {𝑝} ∈ Fin
49 xpfi 9275 . . . . . . 7 (({𝑝} ∈ Fin ∧ 𝐾 ∈ Fin) → ({𝑝} × 𝐾) ∈ Fin)
5048, 35, 49sylancr 598 . . . . . 6 ((𝜑𝑝𝑃) → ({𝑝} × 𝐾) ∈ Fin)
5150ralrimiva 3157 . . . . 5 (𝜑 → ∀𝑝𝑃 ({𝑝} × 𝐾) ∈ Fin)
52 iunfi 9296 . . . . 5 ((𝑃 ∈ Fin ∧ ∀𝑝𝑃 ({𝑝} × 𝐾) ∈ Fin) → 𝑝𝑃 ({𝑝} × 𝐾) ∈ Fin)
5310, 51, 52syl2anc 595 . . . 4 (𝜑 𝑝𝑃 ({𝑝} × 𝐾) ∈ Fin)
54 fvex 6894 . . . . . . 7 (↑‘𝑎) ∈ V
55542a1i 12 . . . . . 6 (𝜑 → (𝑎 𝑝𝑃 ({𝑝} × 𝐾) → (↑‘𝑎) ∈ V))
56 eliunxp 5823 . . . . . . . . 9 (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↔ ∃𝑝𝑘(𝑎 = ⟨𝑝, 𝑘⟩ ∧ (𝑝𝑃𝑘𝐾)))
5713simprbda 503 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑝𝑃𝑘𝐾)) → (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ))
58 opelxp 5697 . . . . . . . . . . . . . 14 (⟨𝑝, 𝑘⟩ ∈ (ℙ × ℕ) ↔ (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ))
5957, 58sylibr 237 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑝𝑃𝑘𝐾)) → ⟨𝑝, 𝑘⟩ ∈ (ℙ × ℕ))
60 eleq1 2851 . . . . . . . . . . . . 13 (𝑎 = ⟨𝑝, 𝑘⟩ → (𝑎 ∈ (ℙ × ℕ) ↔ ⟨𝑝, 𝑘⟩ ∈ (ℙ × ℕ)))
6159, 60syl5ibrcom 250 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑝𝑃𝑘𝐾)) → (𝑎 = ⟨𝑝, 𝑘⟩ → 𝑎 ∈ (ℙ × ℕ)))
6261impancom 456 . . . . . . . . . . 11 ((𝜑𝑎 = ⟨𝑝, 𝑘⟩) → ((𝑝𝑃𝑘𝐾) → 𝑎 ∈ (ℙ × ℕ)))
6362expimpd 458 . . . . . . . . . 10 (𝜑 → ((𝑎 = ⟨𝑝, 𝑘⟩ ∧ (𝑝𝑃𝑘𝐾)) → 𝑎 ∈ (ℙ × ℕ)))
6463exlimdvv 1964 . . . . . . . . 9 (𝜑 → (∃𝑝𝑘(𝑎 = ⟨𝑝, 𝑘⟩ ∧ (𝑝𝑃𝑘𝐾)) → 𝑎 ∈ (ℙ × ℕ)))
6556, 64biimtrid 245 . . . . . . . 8 (𝜑 → (𝑎 𝑝𝑃 ({𝑝} × 𝐾) → 𝑎 ∈ (ℙ × ℕ)))
6665ssrdv 3943 . . . . . . . . 9 (𝜑 𝑝𝑃 ({𝑝} × 𝐾) ⊆ (ℙ × ℕ))
6766sseld 3936 . . . . . . . 8 (𝜑 → (𝑏 𝑝𝑃 ({𝑝} × 𝐾) → 𝑏 ∈ (ℙ × ℕ)))
6865, 67anim12d 620 . . . . . . 7 (𝜑 → ((𝑎 𝑝𝑃 ({𝑝} × 𝐾) ∧ 𝑏 𝑝𝑃 ({𝑝} × 𝐾)) → (𝑎 ∈ (ℙ × ℕ) ∧ 𝑏 ∈ (ℙ × ℕ))))
69 1st2nd2 8021 . . . . . . . . . . 11 (𝑎 ∈ (ℙ × ℕ) → 𝑎 = ⟨(1st𝑎), (2nd𝑎)⟩)
7069fveq2d 6885 . . . . . . . . . 10 (𝑎 ∈ (ℙ × ℕ) → (↑‘𝑎) = (↑‘⟨(1st𝑎), (2nd𝑎)⟩))
71 df-ov 7413 . . . . . . . . . 10 ((1st𝑎)↑(2nd𝑎)) = (↑‘⟨(1st𝑎), (2nd𝑎)⟩)
7270, 71eqtr4di 2816 . . . . . . . . 9 (𝑎 ∈ (ℙ × ℕ) → (↑‘𝑎) = ((1st𝑎)↑(2nd𝑎)))
73 1st2nd2 8021 . . . . . . . . . . 11 (𝑏 ∈ (ℙ × ℕ) → 𝑏 = ⟨(1st𝑏), (2nd𝑏)⟩)
7473fveq2d 6885 . . . . . . . . . 10 (𝑏 ∈ (ℙ × ℕ) → (↑‘𝑏) = (↑‘⟨(1st𝑏), (2nd𝑏)⟩))
75 df-ov 7413 . . . . . . . . . 10 ((1st𝑏)↑(2nd𝑏)) = (↑‘⟨(1st𝑏), (2nd𝑏)⟩)
7674, 75eqtr4di 2816 . . . . . . . . 9 (𝑏 ∈ (ℙ × ℕ) → (↑‘𝑏) = ((1st𝑏)↑(2nd𝑏)))
7772, 76eqeqan12d 2777 . . . . . . . 8 ((𝑎 ∈ (ℙ × ℕ) ∧ 𝑏 ∈ (ℙ × ℕ)) → ((↑‘𝑎) = (↑‘𝑏) ↔ ((1st𝑎)↑(2nd𝑎)) = ((1st𝑏)↑(2nd𝑏))))
78 xp1st 8014 . . . . . . . . . 10 (𝑎 ∈ (ℙ × ℕ) → (1st𝑎) ∈ ℙ)
79 xp2nd 8015 . . . . . . . . . 10 (𝑎 ∈ (ℙ × ℕ) → (2nd𝑎) ∈ ℕ)
8078, 79jca 520 . . . . . . . . 9 (𝑎 ∈ (ℙ × ℕ) → ((1st𝑎) ∈ ℙ ∧ (2nd𝑎) ∈ ℕ))
81 xp1st 8014 . . . . . . . . . 10 (𝑏 ∈ (ℙ × ℕ) → (1st𝑏) ∈ ℙ)
82 xp2nd 8015 . . . . . . . . . 10 (𝑏 ∈ (ℙ × ℕ) → (2nd𝑏) ∈ ℕ)
8381, 82jca 520 . . . . . . . . 9 (𝑏 ∈ (ℙ × ℕ) → ((1st𝑏) ∈ ℙ ∧ (2nd𝑏) ∈ ℕ))
84 prmexpb 16773 . . . . . . . . . 10 ((((1st𝑎) ∈ ℙ ∧ (1st𝑏) ∈ ℙ) ∧ ((2nd𝑎) ∈ ℕ ∧ (2nd𝑏) ∈ ℕ)) → (((1st𝑎)↑(2nd𝑎)) = ((1st𝑏)↑(2nd𝑏)) ↔ ((1st𝑎) = (1st𝑏) ∧ (2nd𝑎) = (2nd𝑏))))
8584an4s 672 . . . . . . . . 9 ((((1st𝑎) ∈ ℙ ∧ (2nd𝑎) ∈ ℕ) ∧ ((1st𝑏) ∈ ℙ ∧ (2nd𝑏) ∈ ℕ)) → (((1st𝑎)↑(2nd𝑎)) = ((1st𝑏)↑(2nd𝑏)) ↔ ((1st𝑎) = (1st𝑏) ∧ (2nd𝑎) = (2nd𝑏))))
8680, 83, 85syl2an 607 . . . . . . . 8 ((𝑎 ∈ (ℙ × ℕ) ∧ 𝑏 ∈ (ℙ × ℕ)) → (((1st𝑎)↑(2nd𝑎)) = ((1st𝑏)↑(2nd𝑏)) ↔ ((1st𝑎) = (1st𝑏) ∧ (2nd𝑎) = (2nd𝑏))))
87 xpopth 8023 . . . . . . . 8 ((𝑎 ∈ (ℙ × ℕ) ∧ 𝑏 ∈ (ℙ × ℕ)) → (((1st𝑎) = (1st𝑏) ∧ (2nd𝑎) = (2nd𝑏)) ↔ 𝑎 = 𝑏))
8877, 86, 873bitrd 308 . . . . . . 7 ((𝑎 ∈ (ℙ × ℕ) ∧ 𝑏 ∈ (ℙ × ℕ)) → ((↑‘𝑎) = (↑‘𝑏) ↔ 𝑎 = 𝑏))
8968, 88syl6 36 . . . . . 6 (𝜑 → ((𝑎 𝑝𝑃 ({𝑝} × 𝐾) ∧ 𝑏 𝑝𝑃 ({𝑝} × 𝐾)) → ((↑‘𝑎) = (↑‘𝑏) ↔ 𝑎 = 𝑏)))
9055, 89dom2lem 8985 . . . . 5 (𝜑 → (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)): 𝑝𝑃 ({𝑝} × 𝐾)–1-1→V)
91 f1f1orn 6832 . . . . 5 ((𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)): 𝑝𝑃 ({𝑝} × 𝐾)–1-1→V → (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)): 𝑝𝑃 ({𝑝} × 𝐾)–1-1-onto→ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)))
9290, 91syl 18 . . . 4 (𝜑 → (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)): 𝑝𝑃 ({𝑝} × 𝐾)–1-1-onto→ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)))
93 fveq2 6881 . . . . . 6 (𝑎 = 𝑧 → (↑‘𝑎) = (↑‘𝑧))
94 eqid 2763 . . . . . 6 (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)) = (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))
95 fvex 6894 . . . . . 6 (↑‘𝑧) ∈ V
9693, 94, 95fvmpt 6989 . . . . 5 (𝑧 𝑝𝑃 ({𝑝} × 𝐾) → ((𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))‘𝑧) = (↑‘𝑧))
9796adantl 486 . . . 4 ((𝜑𝑧 𝑝𝑃 ({𝑝} × 𝐾)) → ((𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))‘𝑧) = (↑‘𝑧))
98 fveq2 6881 . . . . . . . . . . . . . . . 16 (𝑎 = ⟨𝑝, 𝑘⟩ → (↑‘𝑎) = (↑‘⟨𝑝, 𝑘⟩))
9998, 3eqtr4di 2816 . . . . . . . . . . . . . . 15 (𝑎 = ⟨𝑝, 𝑘⟩ → (↑‘𝑎) = (𝑝𝑘))
10099eleq1d 2848 . . . . . . . . . . . . . 14 (𝑎 = ⟨𝑝, 𝑘⟩ → ((↑‘𝑎) ∈ 𝐴 ↔ (𝑝𝑘) ∈ 𝐴))
10140, 100syl5ibrcom 250 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑝𝑃𝑘𝐾)) → (𝑎 = ⟨𝑝, 𝑘⟩ → (↑‘𝑎) ∈ 𝐴))
102101impancom 456 . . . . . . . . . . . 12 ((𝜑𝑎 = ⟨𝑝, 𝑘⟩) → ((𝑝𝑃𝑘𝐾) → (↑‘𝑎) ∈ 𝐴))
103102expimpd 458 . . . . . . . . . . 11 (𝜑 → ((𝑎 = ⟨𝑝, 𝑘⟩ ∧ (𝑝𝑃𝑘𝐾)) → (↑‘𝑎) ∈ 𝐴))
104103exlimdvv 1964 . . . . . . . . . 10 (𝜑 → (∃𝑝𝑘(𝑎 = ⟨𝑝, 𝑘⟩ ∧ (𝑝𝑃𝑘𝐾)) → (↑‘𝑎) ∈ 𝐴))
10556, 104biimtrid 245 . . . . . . . . 9 (𝜑 → (𝑎 𝑝𝑃 ({𝑝} × 𝐾) → (↑‘𝑎) ∈ 𝐴))
106105imp 411 . . . . . . . 8 ((𝜑𝑎 𝑝𝑃 ({𝑝} × 𝐾)) → (↑‘𝑎) ∈ 𝐴)
107106fmpttd 7110 . . . . . . 7 (𝜑 → (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)): 𝑝𝑃 ({𝑝} × 𝐾)⟶𝐴)
108107frnd 6714 . . . . . 6 (𝜑 → ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)) ⊆ 𝐴)
109108sselda 3937 . . . . 5 ((𝜑𝑦 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))) → 𝑦𝐴)
11045nfel1 2941 . . . . . . 7 𝑥𝑦 / 𝑥𝐵 ∈ ℂ
11143eleq1d 2848 . . . . . . 7 (𝑥 = 𝑦 → (𝐵 ∈ ℂ ↔ 𝑦 / 𝑥𝐵 ∈ ℂ))
112110, 111rspc 3569 . . . . . 6 (𝑦𝐴 → (∀𝑥𝐴 𝐵 ∈ ℂ → 𝑦 / 𝑥𝐵 ∈ ℂ))
11338, 112mpan9 515 . . . . 5 ((𝜑𝑦𝐴) → 𝑦 / 𝑥𝐵 ∈ ℂ)
114109, 113syldan 602 . . . 4 ((𝜑𝑦 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))) → 𝑦 / 𝑥𝐵 ∈ ℂ)
11547, 53, 92, 97, 114fsumf1o 15770 . . 3 (𝜑 → Σ𝑦 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))𝑦 / 𝑥𝐵 = Σ𝑧 𝑝𝑃 ({𝑝} × 𝐾)(↑‘𝑧) / 𝑥𝐵)
11646, 115eqtrid 2810 . 2 (𝜑 → Σ𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))𝐵 = Σ𝑧 𝑝𝑃 ({𝑝} × 𝐾)(↑‘𝑧) / 𝑥𝐵)
117108sselda 3937 . . . 4 ((𝜑𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))) → 𝑥𝐴)
118117, 37syldan 602 . . 3 ((𝜑𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))) → 𝐵 ∈ ℂ)
119 eldif 3915 . . . . 5 (𝑥 ∈ (𝐴 ∖ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))) ↔ (𝑥𝐴 ∧ ¬ 𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))))
12094, 54elrnmpti 5952 . . . . . . . . . 10 (𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)) ↔ ∃𝑎 𝑝𝑃 ({𝑝} × 𝐾)𝑥 = (↑‘𝑎))
12199eqeq2d 2774 . . . . . . . . . . 11 (𝑎 = ⟨𝑝, 𝑘⟩ → (𝑥 = (↑‘𝑎) ↔ 𝑥 = (𝑝𝑘)))
122121rexiunxp 5826 . . . . . . . . . 10 (∃𝑎 𝑝𝑃 ({𝑝} × 𝐾)𝑥 = (↑‘𝑎) ↔ ∃𝑝𝑃𝑘𝐾 𝑥 = (𝑝𝑘))
123120, 122bitri 278 . . . . . . . . 9 (𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)) ↔ ∃𝑝𝑃𝑘𝐾 𝑥 = (𝑝𝑘))
124 simpr 489 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑥 = (𝑝𝑘)) → 𝑥 = (𝑝𝑘))
125 simplr 780 . . . . . . . . . . . . . . . 16 (((𝜑𝑥𝐴) ∧ 𝑥 = (𝑝𝑘)) → 𝑥𝐴)
126124, 125eqeltrrd 2864 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑥 = (𝑝𝑘)) → (𝑝𝑘) ∈ 𝐴)
12713rbaibd 549 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑝𝑘) ∈ 𝐴) → ((𝑝𝑃𝑘𝐾) ↔ (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ)))
128127adantlr 727 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ (𝑝𝑘) ∈ 𝐴) → ((𝑝𝑃𝑘𝐾) ↔ (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ)))
129126, 128syldan 602 . . . . . . . . . . . . . 14 (((𝜑𝑥𝐴) ∧ 𝑥 = (𝑝𝑘)) → ((𝑝𝑃𝑘𝐾) ↔ (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ)))
130129pm5.32da 589 . . . . . . . . . . . . 13 ((𝜑𝑥𝐴) → ((𝑥 = (𝑝𝑘) ∧ (𝑝𝑃𝑘𝐾)) ↔ (𝑥 = (𝑝𝑘) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ))))
131 ancom 465 . . . . . . . . . . . . 13 (((𝑝𝑃𝑘𝐾) ∧ 𝑥 = (𝑝𝑘)) ↔ (𝑥 = (𝑝𝑘) ∧ (𝑝𝑃𝑘𝐾)))
132 ancom 465 . . . . . . . . . . . . 13 (((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ 𝑥 = (𝑝𝑘)) ↔ (𝑥 = (𝑝𝑘) ∧ (𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ)))
133130, 131, 1323bitr4g 317 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → (((𝑝𝑃𝑘𝐾) ∧ 𝑥 = (𝑝𝑘)) ↔ ((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ 𝑥 = (𝑝𝑘))))
1341332exbidv 1954 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → (∃𝑝𝑘((𝑝𝑃𝑘𝐾) ∧ 𝑥 = (𝑝𝑘)) ↔ ∃𝑝𝑘((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ 𝑥 = (𝑝𝑘))))
135 r2ex 3202 . . . . . . . . . . 11 (∃𝑝𝑃𝑘𝐾 𝑥 = (𝑝𝑘) ↔ ∃𝑝𝑘((𝑝𝑃𝑘𝐾) ∧ 𝑥 = (𝑝𝑘)))
136 r2ex 3202 . . . . . . . . . . 11 (∃𝑝 ∈ ℙ ∃𝑘 ∈ ℕ 𝑥 = (𝑝𝑘) ↔ ∃𝑝𝑘((𝑝 ∈ ℙ ∧ 𝑘 ∈ ℕ) ∧ 𝑥 = (𝑝𝑘)))
137134, 135, 1363bitr4g 317 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (∃𝑝𝑃𝑘𝐾 𝑥 = (𝑝𝑘) ↔ ∃𝑝 ∈ ℙ ∃𝑘 ∈ ℕ 𝑥 = (𝑝𝑘)))
138 fsumvma.3 . . . . . . . . . . . 12 (𝜑𝐴 ⊆ ℕ)
139138sselda 3937 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝑥 ∈ ℕ)
140 isppw2 27279 . . . . . . . . . . 11 (𝑥 ∈ ℕ → ((Λ‘𝑥) ≠ 0 ↔ ∃𝑝 ∈ ℙ ∃𝑘 ∈ ℕ 𝑥 = (𝑝𝑘)))
141139, 140syl 18 . . . . . . . . . 10 ((𝜑𝑥𝐴) → ((Λ‘𝑥) ≠ 0 ↔ ∃𝑝 ∈ ℙ ∃𝑘 ∈ ℕ 𝑥 = (𝑝𝑘)))
142137, 141bitr4d 285 . . . . . . . . 9 ((𝜑𝑥𝐴) → (∃𝑝𝑃𝑘𝐾 𝑥 = (𝑝𝑘) ↔ (Λ‘𝑥) ≠ 0))
143123, 142bitrid 286 . . . . . . . 8 ((𝜑𝑥𝐴) → (𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)) ↔ (Λ‘𝑥) ≠ 0))
144143necon2bbid 3001 . . . . . . 7 ((𝜑𝑥𝐴) → ((Λ‘𝑥) = 0 ↔ ¬ 𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))))
145144pm5.32da 589 . . . . . 6 (𝜑 → ((𝑥𝐴 ∧ (Λ‘𝑥) = 0) ↔ (𝑥𝐴 ∧ ¬ 𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)))))
146 fsumvma.7 . . . . . . 7 ((𝜑 ∧ (𝑥𝐴 ∧ (Λ‘𝑥) = 0)) → 𝐵 = 0)
147146ex 417 . . . . . 6 (𝜑 → ((𝑥𝐴 ∧ (Λ‘𝑥) = 0) → 𝐵 = 0))
148145, 147sylbird 263 . . . . 5 (𝜑 → ((𝑥𝐴 ∧ ¬ 𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))) → 𝐵 = 0))
149119, 148biimtrid 245 . . . 4 (𝜑 → (𝑥 ∈ (𝐴 ∖ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))) → 𝐵 = 0))
150149imp 411 . . 3 ((𝜑𝑥 ∈ (𝐴 ∖ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎)))) → 𝐵 = 0)
151108, 118, 150, 11fsumss 15772 . 2 (𝜑 → Σ𝑥 ∈ ran (𝑎 𝑝𝑃 ({𝑝} × 𝐾) ↦ (↑‘𝑎))𝐵 = Σ𝑥𝐴 𝐵)
15242, 116, 1513eqtr2rd 2805 1 (𝜑 → Σ𝑥𝐴 𝐵 = Σ𝑝𝑃 Σ𝑘𝐾 𝐶)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400   = wceq 1570  wex 1809  wcel 2143  wne 2958  wral 3079  wrex 3089  Vcvv 3455  csb 3853  cdif 3902  wss 3905  {csn 4589  cop 4595   ciun 4956  cmpt 5192   × cxp 5659  ran crn 5662  1-1wf1 6533  1-1-ontowf1o 6535  cfv 6536  (class class class)co 7410  1st c1st 7980  2nd c2nd 7981  Fincfn 8939  cc 11093  0cc0 11095  cn 12228  cexp 14093  Σcsu 15733  cprime 16724  Λcvma 27256
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172  ax-pre-sup 11173  ax-addf 11174
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-of 7674  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-oadd 8453  df-er 8690  df-map 8822  df-pm 8823  df-ixp 8892  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9318  df-fi 9367  df-sup 9398  df-inf 9399  df-oi 9468  df-dju 9883  df-card 9921  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-div 11867  df-nn 12229  df-2 12298  df-3 12299  df-4 12300  df-5 12301  df-6 12302  df-7 12303  df-8 12304  df-9 12305  df-n0 12500  df-z 12587  df-dec 12707  df-uz 12858  df-q 12968  df-rp 13012  df-xneg 13132  df-xadd 13133  df-xmul 13134  df-ioo 13371  df-ioc 13372  df-ico 13373  df-icc 13374  df-fz 13531  df-fzo 13679  df-fl 13821  df-mod 13899  df-seq 14034  df-exp 14094  df-fac 14306  df-bc 14335  df-hash 14363  df-shft 15100  df-cj 15146  df-re 15147  df-im 15148  df-sqrt 15282  df-abs 15283  df-limsup 15518  df-clim 15535  df-rlim 15536  df-sum 15734  df-ef 16116  df-sin 16118  df-cos 16119  df-pi 16121  df-dvds 16306  df-gcd 16548  df-prm 16725  df-pc 16892  df-struct 17202  df-sets 17219  df-slot 17237  df-ndx 17249  df-base 17265  df-ress 17286  df-plusg 17318  df-mulr 17319  df-starv 17320  df-sca 17321  df-vsca 17322  df-ip 17323  df-tset 17324  df-ple 17325  df-ds 17327  df-unif 17328  df-hom 17329  df-cco 17330  df-rest 17470  df-topn 17471  df-0g 17489  df-gsum 17490  df-topgen 17491  df-pt 17492  df-prds 17495  df-xrs 17551  df-qtop 17556  df-imas 17557  df-xps 17559  df-mre 17633  df-mrc 17634  df-acs 17636  df-mgm 18693  df-sgrp 18772  df-mnd 18788  df-submnd 18837  df-mulg 19129  df-cntz 19382  df-cmn 19847  df-psmet 21514  df-xmet 21515  df-met 21516  df-bl 21517  df-mopn 21518  df-fbas 21519  df-fg 21520  df-cnfld 21523  df-top 23051  df-topon 23068  df-topsp 23090  df-bases 23103  df-cld 23176  df-ntr 23177  df-cls 23178  df-nei 23255  df-lp 23293  df-perf 23294  df-cn 23384  df-cnp 23385  df-haus 23472  df-tx 23719  df-hmeo 23912  df-fil 24003  df-fm 24095  df-flim 24096  df-flf 24097  df-xms 24477  df-ms 24478  df-tms 24479  df-cncf 25037  df-limc 26025  df-dv 26026  df-log 26721  df-vma 27262
This theorem is referenced by:  fsumvma2  27378  vmasum  27380
  Copyright terms: Public domain W3C validator