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

Theorem musum 27527
Description: The sum of the Möbius function over the divisors of 𝑁 gives one if 𝑁 = 1, but otherwise always sums to zero. Theorem 2.1 in [ApostolNT] p. 25. This makes the Möbius function useful for inverting divisor sums; see also muinv 27529. (Contributed by Mario Carneiro, 2-Jul-2015.)
Assertion
Ref Expression
musum (𝑁 ∈ ℕ → Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} (μ‘𝑘) = if(𝑁 = 1, 1, 0))
Distinct variable group:   𝑘,𝑛,𝑁

Proof of Theorem musum
Dummy variables 𝑚 𝑝 𝑞 𝑠 𝑥 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6890 . . . . . . . 8 (𝑛 = 𝑘 → (μ‘𝑛) = (μ‘𝑘))
21neeq1d 3014 . . . . . . 7 (𝑛 = 𝑘 → ((μ‘𝑛) ≠ 0 ↔ (μ‘𝑘) ≠ 0))
3 breq1 5105 . . . . . . 7 (𝑛 = 𝑘 → (𝑛 ∥ 𝑁 ↔ 𝑘 ∥ 𝑁))
42, 3anbi12d 644 . . . . . 6 (𝑛 = 𝑘 → (((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁) ↔ ((μ‘𝑘) ≠ 0 ∧ 𝑘 ∥ 𝑁)))
54elrab 3644 . . . . 5 (𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ↔ (𝑘 ∈ ℕ ∧ ((μ‘𝑘) ≠ 0 ∧ 𝑘 ∥ 𝑁)))
6 muval2 27470 . . . . . 6 ((𝑘 ∈ ℕ ∧ (μ‘𝑘) ≠ 0) → (μ‘𝑘) = ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})))
76adantrr 730 . . . . 5 ((𝑘 ∈ ℕ ∧ ((μ‘𝑘) ≠ 0 ∧ 𝑘 ∥ 𝑁)) → (μ‘𝑘) = ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})))
85, 7sylbi 220 . . . 4 (𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} → (μ‘𝑘) = ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})))
98adantl 487 . . 3 ((𝑁 ∈ ℕ ∧ 𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → (μ‘𝑘) = ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})))
109sumeq2dv 15878 . 2 (𝑁 ∈ ℕ → Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} (μ‘𝑘) = Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})))
11 simpr 490 . . . . 5 (((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁) → 𝑛 ∥ 𝑁)
1211a1i 11 . . . 4 ((𝑁 ∈ ℕ ∧ 𝑛 ∈ ℕ) → (((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁) → 𝑛 ∥ 𝑁))
1312ss2rabdv 3999 . . 3 (𝑁 ∈ ℕ → {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ⊆ {𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁})
14 ssrab2 4004 . . . . . 6 {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ⊆ ℕ
15 simpr 490 . . . . . 6 ((𝑁 ∈ ℕ ∧ 𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → 𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)})
1614, 15sselid 3907 . . . . 5 ((𝑁 ∈ ℕ ∧ 𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → 𝑘 ∈ ℕ)
17 mucl 27477 . . . . 5 (𝑘 ∈ ℕ → (μ‘𝑘) ∈ ℤ)
1816, 17syl 18 . . . 4 ((𝑁 ∈ ℕ ∧ 𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → (μ‘𝑘) ∈ ℤ)
1918zcnd 12811 . . 3 ((𝑁 ∈ ℕ ∧ 𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → (μ‘𝑘) ∈ ℂ)
20 difrab 4262 . . . . . . 7 ({𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} ∖ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) = {𝑛 ∈ ℕ ∣ (𝑛 ∥ 𝑁 ∧ ¬ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁))}
21 pm3.21 477 . . . . . . . . . . 11 (𝑛 ∥ 𝑁 → ((μ‘𝑛) ≠ 0 → ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)))
2221necon1bd 2973 . . . . . . . . . 10 (𝑛 ∥ 𝑁 → (¬ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁) → (μ‘𝑛) = 0))
2322imp 412 . . . . . . . . 9 ((𝑛 ∥ 𝑁 ∧ ¬ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)) → (μ‘𝑛) = 0)
2423a1i 11 . . . . . . . 8 (𝑛 ∈ ℕ → ((𝑛 ∥ 𝑁 ∧ ¬ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)) → (μ‘𝑛) = 0))
2524ss2rabi 4000 . . . . . . 7 {𝑛 ∈ ℕ ∣ (𝑛 ∥ 𝑁 ∧ ¬ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁))} ⊆ {𝑛 ∈ ℕ ∣ (μ‘𝑛) = 0}
2620, 25eqsstri 3955 . . . . . 6 ({𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} ∖ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) ⊆ {𝑛 ∈ ℕ ∣ (μ‘𝑛) = 0}
2726sseli 3905 . . . . 5 (𝑘 ∈ ({𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} ∖ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → 𝑘 ∈ {𝑛 ∈ ℕ ∣ (μ‘𝑛) = 0})
28 fveqeq2 6899 . . . . . . 7 (𝑛 = 𝑘 → ((μ‘𝑛) = 0 ↔ (μ‘𝑘) = 0))
2928elrab 3644 . . . . . 6 (𝑘 ∈ {𝑛 ∈ ℕ ∣ (μ‘𝑛) = 0} ↔ (𝑘 ∈ ℕ ∧ (μ‘𝑘) = 0))
3029simprbi 503 . . . . 5 (𝑘 ∈ {𝑛 ∈ ℕ ∣ (μ‘𝑛) = 0} → (μ‘𝑘) = 0)
3127, 30syl 18 . . . 4 (𝑘 ∈ ({𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} ∖ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → (μ‘𝑘) = 0)
3231adantl 487 . . 3 ((𝑁 ∈ ℕ ∧ 𝑘 ∈ ({𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} ∖ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)})) → (μ‘𝑘) = 0)
33 dvdsfi 16975 . . 3 (𝑁 ∈ ℕ → {𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} ∈ Fin)
3413, 19, 32, 33fsumss 15900 . 2 (𝑁 ∈ ℕ → Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} (μ‘𝑘) = Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} (μ‘𝑘))
35 fveq2 6890 . . . . 5 (𝑥 = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘} → (♯‘𝑥) = (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘}))
3635oveq2d 7440 . . . 4 (𝑥 = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘} → ( -1↑(♯‘𝑥)) = ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})))
3733, 13ssfid 9268 . . . 4 (𝑁 ∈ ℕ → {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ∈ Fin)
38 eqid 2760 . . . . 5 {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} = {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}
39 eqid 2760 . . . . 5 (𝑚 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ↦ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑚}) = (𝑚 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ↦ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑚})
40 oveq1 7431 . . . . . . . 8 (𝑞 = 𝑝 → (𝑞 pCnt 𝑥) = (𝑝 pCnt 𝑥))
4140cbvmptv 5208 . . . . . . 7 (𝑞 ∈ ℙ ↦ (𝑞 pCnt 𝑥)) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑥))
42 oveq2 7432 . . . . . . . 8 (𝑥 = 𝑚 → (𝑝 pCnt 𝑥) = (𝑝 pCnt 𝑚))
4342mpteq2dv 5198 . . . . . . 7 (𝑥 = 𝑚 → (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑥)) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑚)))
4441, 43eqtrid 2807 . . . . . 6 (𝑥 = 𝑚 → (𝑞 ∈ ℙ ↦ (𝑞 pCnt 𝑥)) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑚)))
4544cbvmptv 5208 . . . . 5 (𝑥 ∈ ℕ ↦ (𝑞 ∈ ℙ ↦ (𝑞 pCnt 𝑥))) = (𝑚 ∈ ℕ ↦ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑚)))
4638, 39, 45sqff1o 27518 . . . 4 (𝑁 ∈ ℕ → (𝑚 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ↦ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑚}):{𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}–1-1-onto→𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
47 breq2 5106 . . . . . . 7 (𝑚 = 𝑘 → (𝑝 ∥ 𝑚 ↔ 𝑝 ∥ 𝑘))
4847rabbidv 3419 . . . . . 6 (𝑚 = 𝑘 → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑚} = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})
49 prmex 16861 . . . . . . 7 ℙ ∈ V
5049rabex 5300 . . . . . 6 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘} ∈ V
5148, 39, 50fvmpt 6998 . . . . 5 (𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} → ((𝑚 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ↦ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑚})‘𝑘) = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})
5251adantl 487 . . . 4 ((𝑁 ∈ ℕ ∧ 𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)}) → ((𝑚 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ↦ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑚})‘𝑘) = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})
53 neg1cn 12312 . . . . 5 -1 ∈ ℂ
54 prmdvdsfi 27443 . . . . . . 7 (𝑁 ∈ ℕ → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin)
55 elpwi 4563 . . . . . . 7 (𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} → 𝑥 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
56 ssfi 9196 . . . . . . 7 (({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin ∧ 𝑥 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑥 ∈ Fin)
5754, 55, 56syl2an 608 . . . . . 6 ((𝑁 ∈ ℕ ∧ 𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑥 ∈ Fin)
58 hashcl 14507 . . . . . 6 (𝑥 ∈ Fin → (♯‘𝑥) ∈ ℕ0)
5957, 58syl 18 . . . . 5 ((𝑁 ∈ ℕ ∧ 𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘𝑥) ∈ ℕ0)
60 expcl 14229 . . . . 5 (( -1 ∈ ℂ ∧ (♯‘𝑥) ∈ ℕ0) → ( -1↑(♯‘𝑥)) ∈ ℂ)
6153, 59, 60sylancr 599 . . . 4 ((𝑁 ∈ ℕ ∧ 𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ( -1↑(♯‘𝑥)) ∈ ℂ)
6236, 37, 46, 52, 61fsumf1o 15898 . . 3 (𝑁 ∈ ℕ → Σ𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ( -1↑(♯‘𝑥)) = Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})))
63 fzfid 14123 . . . . 5 (𝑁 ∈ ℕ → (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∈ Fin)
6454adantr 486 . . . . . . 7 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin)
65 pwfi 9318 . . . . . . 7 ({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin ↔ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin)
6664, 65sylib 221 . . . . . 6 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin)
67 ssrab2 4004 . . . . . 6 {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ⊆ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}
68 ssfi 9196 . . . . . 6 ((𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin ∧ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ⊆ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ∈ Fin)
6966, 67, 68sylancl 598 . . . . 5 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ∈ Fin)
70 simprr 785 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})
71 fveqeq2 6899 . . . . . . . . . 10 (𝑠 = 𝑥 → ((♯‘𝑠) = 𝑧 ↔ (♯‘𝑥) = 𝑧))
7271elrab 3644 . . . . . . . . 9 (𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ↔ (𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∧ (♯‘𝑥) = 𝑧))
7372simprbi 503 . . . . . . . 8 (𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} → (♯‘𝑥) = 𝑧)
7470, 73syl 18 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → (♯‘𝑥) = 𝑧)
7574ralrimivva 3205 . . . . . 6 (𝑁 ∈ ℕ → ∀𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))∀𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} (♯‘𝑥) = 𝑧)
76 invdisj 5088 . . . . . 6 (∀𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))∀𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} (♯‘𝑥) = 𝑧 → Disj 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})){𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})
7775, 76syl 18 . . . . 5 (𝑁 ∈ ℕ → Disj 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})){𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})
7854adantr 486 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin)
7967, 70sselid 3907 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → 𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
8079, 55syl 18 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → 𝑥 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
8178, 80ssfid 9268 . . . . . . 7 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → 𝑥 ∈ Fin)
8281, 58syl 18 . . . . . 6 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → (♯‘𝑥) ∈ ℕ0)
8353, 82, 60sylancr 599 . . . . 5 ((𝑁 ∈ ℕ ∧ (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧})) → ( -1↑(♯‘𝑥)) ∈ ℂ)
8463, 69, 77, 83fsumiun 15997 . . . 4 (𝑁 ∈ ℕ → Σ𝑥 ∈ ∪ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})){𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑(♯‘𝑥)) = Σ𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑(♯‘𝑥)))
85 iunrab 5010 . . . . . 6 ∪ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})){𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} = {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ ∃𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(♯‘𝑠) = 𝑧}
8654adantr 486 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin)
87 elpwi 4563 . . . . . . . . . . . . 13 (𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} → 𝑠 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
8887adantl 487 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑠 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
89 ssdomg 9035 . . . . . . . . . . . 12 ({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin → (𝑠 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} → 𝑠 ≼ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))
9086, 88, 89sylc 66 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑠 ≼ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
91 ssfi 9196 . . . . . . . . . . . . 13 (({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin ∧ 𝑠 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑠 ∈ Fin)
9254, 87, 91syl2an 608 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑠 ∈ Fin)
93 hashdom 14530 . . . . . . . . . . . 12 ((𝑠 ∈ Fin ∧ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin) → ((♯‘𝑠) ≤ (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ↔ 𝑠 ≼ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))
9492, 86, 93syl2anc 596 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ((♯‘𝑠) ≤ (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ↔ 𝑠 ≼ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))
9590, 94mpbird 260 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘𝑠) ≤ (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))
96 hashcl 14507 . . . . . . . . . . . . 13 (𝑠 ∈ Fin → (♯‘𝑠) ∈ ℕ0)
9792, 96syl 18 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘𝑠) ∈ ℕ0)
98 nn0uz 13010 . . . . . . . . . . . 12 ℕ0 = (ℤ≥‘0)
9997, 98eleqtrdi 2870 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘𝑠) ∈ (ℤ≥‘0))
100 hashcl 14507 . . . . . . . . . . . . . 14 ({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin → (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℕ0)
10154, 100syl 18 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ → (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℕ0)
102101adantr 486 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℕ0)
103102nn0zd 12725 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℤ)
104 elfz5 13655 . . . . . . . . . . 11 (((♯‘𝑠) ∈ (ℤ≥‘0) ∧ (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℤ) → ((♯‘𝑠) ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ↔ (♯‘𝑠) ≤ (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})))
10599, 103, 104syl2anc 596 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ((♯‘𝑠) ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ↔ (♯‘𝑠) ≤ (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})))
10695, 105mpbird 260 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘𝑠) ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})))
107 eqidd 2761 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (♯‘𝑠) = (♯‘𝑠))
108 eqeq2 2772 . . . . . . . . . 10 (𝑧 = (♯‘𝑠) → ((♯‘𝑠) = 𝑧 ↔ (♯‘𝑠) = (♯‘𝑠)))
109108rspcev 3576 . . . . . . . . 9 (((♯‘𝑠) ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) ∧ (♯‘𝑠) = (♯‘𝑠)) → ∃𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(♯‘𝑠) = 𝑧)
110106, 107, 109syl2anc 596 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ 𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ∃𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(♯‘𝑠) = 𝑧)
111110ralrimiva 3154 . . . . . . 7 (𝑁 ∈ ℕ → ∀𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}∃𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(♯‘𝑠) = 𝑧)
112 rabid2 3444 . . . . . . 7 (𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} = {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ ∃𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(♯‘𝑠) = 𝑧} ↔ ∀𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}∃𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(♯‘𝑠) = 𝑧)
113111, 112sylibr 237 . . . . . 6 (𝑁 ∈ ℕ → 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} = {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ ∃𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(♯‘𝑠) = 𝑧})
11485, 113eqtr4id 2814 . . . . 5 (𝑁 ∈ ℕ → ∪ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})){𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} = 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
115114sumeq1d 15876 . . . 4 (𝑁 ∈ ℕ → Σ𝑥 ∈ ∪ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})){𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑(♯‘𝑥)) = Σ𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ( -1↑(♯‘𝑥)))
116 elfznn0 13761 . . . . . . . . . 10 (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 𝑧 ∈ ℕ0)
117116adantl 487 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → 𝑧 ∈ ℕ0)
118 expcl 14229 . . . . . . . . 9 (( -1 ∈ ℂ ∧ 𝑧 ∈ ℕ0) → ( -1↑𝑧) ∈ ℂ)
11953, 117, 118sylancr 599 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → ( -1↑𝑧) ∈ ℂ)
120 fsumconst 15965 . . . . . . . 8 (({𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ∈ Fin ∧ ( -1↑𝑧) ∈ ℂ) → Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑𝑧) = ((♯‘{𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧}) · ( -1↑𝑧)))
12169, 119, 120syl2anc 596 . . . . . . 7 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑𝑧) = ((♯‘{𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧}) · ( -1↑𝑧)))
12273adantl 487 . . . . . . . . 9 (((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧}) → (♯‘𝑥) = 𝑧)
123122oveq2d 7440 . . . . . . . 8 (((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) ∧ 𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧}) → ( -1↑(♯‘𝑥)) = ( -1↑𝑧))
124123sumeq2dv 15878 . . . . . . 7 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑(♯‘𝑥)) = Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑𝑧))
125 elfzelz 13663 . . . . . . . . 9 (𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 𝑧 ∈ ℤ)
126 hashbc 14605 . . . . . . . . 9 (({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin ∧ 𝑧 ∈ ℤ) → ((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) = (♯‘{𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧}))
12754, 125, 126syl2an 608 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → ((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) = (♯‘{𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧}))
128127oveq1d 7439 . . . . . . 7 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → (((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) · ( -1↑𝑧)) = ((♯‘{𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧}) · ( -1↑𝑧)))
129121, 124, 1283eqtr4d 2805 . . . . . 6 ((𝑁 ∈ ℕ ∧ 𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))) → Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑(♯‘𝑥)) = (((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) · ( -1↑𝑧)))
130129sumeq2dv 15878 . . . . 5 (𝑁 ∈ ℕ → Σ𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑(♯‘𝑥)) = Σ𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) · ( -1↑𝑧)))
131 1pneg1e0 12467 . . . . . . 7 (1 + -1) = 0
132131oveq1i 7434 . . . . . 6 ((1 + -1)↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))
133 binom1p 16009 . . . . . . 7 (( -1 ∈ ℂ ∧ (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℕ0) → ((1 + -1)↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = Σ𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) · ( -1↑𝑧)))
13453, 101, 133sylancr 599 . . . . . 6 (𝑁 ∈ ℕ → ((1 + -1)↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = Σ𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) · ( -1↑𝑧)))
135132, 134eqtr3id 2809 . . . . 5 (𝑁 ∈ ℕ → (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = Σ𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))(((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})C𝑧) · ( -1↑𝑧)))
136 eqeq2 2772 . . . . . 6 (1 = if(𝑁 = 1, 1, 0) → ((0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = 1 ↔ (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = if(𝑁 = 1, 1, 0)))
137 eqeq2 2772 . . . . . 6 (0 = if(𝑁 = 1, 1, 0) → ((0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = 0 ↔ (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = if(𝑁 = 1, 1, 0)))
138 nprmdvds1 16891 . . . . . . . . . . . . 13 (𝑝 ∈ ℙ → ¬ 𝑝 ∥ 1)
139 simpr 490 . . . . . . . . . . . . . . 15 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → 𝑁 = 1)
140139breq2d 5114 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → (𝑝 ∥ 𝑁 ↔ 𝑝 ∥ 1))
141140notbid 321 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → (¬ 𝑝 ∥ 𝑁 ↔ ¬ 𝑝 ∥ 1))
142138, 141imbitrrid 249 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → (𝑝 ∈ ℙ → ¬ 𝑝 ∥ 𝑁))
143142ralrimiv 3153 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → ∀𝑝 ∈ ℙ ¬ 𝑝 ∥ 𝑁)
144 rabeq0 4337 . . . . . . . . . . 11 ({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} = ∅ ↔ ∀𝑝 ∈ ℙ ¬ 𝑝 ∥ 𝑁)
145143, 144sylibr 237 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} = ∅)
146145fveq2d 6894 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) = (♯‘∅))
147 hash0 14518 . . . . . . . . 9 (♯‘∅) = 0
148146, 147eqtrdi 2811 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) = 0)
149148oveq2d 7440 . . . . . . 7 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = (0↑0))
150 0exp0e1 14216 . . . . . . 7 (0↑0) = 1
151149, 150eqtrdi 2811 . . . . . 6 ((𝑁 ∈ ℕ ∧ 𝑁 = 1) → (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = 1)
152 df-ne 2956 . . . . . . . . . . 11 (𝑁 ≠ 1 ↔ ¬ 𝑁 = 1)
153 eluz2b3 13056 . . . . . . . . . . . 12 (𝑁 ∈ (ℤ≥‘2) ↔ (𝑁 ∈ ℕ ∧ 𝑁 ≠ 1))
154153biimpri 231 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ 𝑁 ≠ 1) → 𝑁 ∈ (ℤ≥‘2))
155152, 154sylan2br 607 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → 𝑁 ∈ (ℤ≥‘2))
156 exprmfct 16889 . . . . . . . . . 10 (𝑁 ∈ (ℤ≥‘2) → ∃𝑝 ∈ ℙ 𝑝 ∥ 𝑁)
157155, 156syl 18 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → ∃𝑝 ∈ ℙ 𝑝 ∥ 𝑁)
158 rabn0 4338 . . . . . . . . 9 ({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ≠ ∅ ↔ ∃𝑝 ∈ ℙ 𝑝 ∥ 𝑁)
159157, 158sylibr 237 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ≠ ∅)
16054adantr 486 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin)
161 hashnncl 14517 . . . . . . . . 9 ({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∈ Fin → ((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℕ ↔ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ≠ ∅))
162160, 161syl 18 . . . . . . . 8 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → ((♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℕ ↔ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ≠ ∅))
163159, 162mpbird 260 . . . . . . 7 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → (♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∈ ℕ)
1641630expd 14289 . . . . . 6 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = 0)
165136, 137, 151, 164ifbothda 4520 . . . . 5 (𝑁 ∈ ℕ → (0↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) = if(𝑁 = 1, 1, 0))
166130, 135, 1653eqtr2d 2801 . . . 4 (𝑁 ∈ ℕ → Σ𝑧 ∈ (0...(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}))Σ𝑥 ∈ {𝑠 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ∣ (♯‘𝑠) = 𝑧} ( -1↑(♯‘𝑥)) = if(𝑁 = 1, 1, 0))
16784, 115, 1663eqtr3d 2803 . . 3 (𝑁 ∈ ℕ → Σ𝑥 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ( -1↑(♯‘𝑥)) = if(𝑁 = 1, 1, 0))
16862, 167eqtr3d 2797 . 2 (𝑁 ∈ ℕ → Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)} ( -1↑(♯‘{𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑘})) = if(𝑁 = 1, 1, 0))
16910, 34, 1683eqtr3d 2803 1 (𝑁 ∈ ℕ → Σ𝑘 ∈ {𝑛 ∈ ℕ ∣ 𝑛 ∥ 𝑁} (μ‘𝑘) = if(𝑁 = 1, 1, 0))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1569   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  {crab 3412   ⊆ wss 3896   ∖ cdif 4044  ∅c0 4277  ifcif 4481  𝒫 cpw 4556  ∪ ciun 4950  Disj wdisj 5069   class class class wbr 5102   ↦ cmpt 5185  ‘cfv 6543  (class class class)co 7424   ≼ cdom 8979  Fincfn 8981  ℂcc 11205  0cc0 11207  1c1 11208   + caddc 11210   · cmul 11212   ≤ cle 11351   -cneg 11549  ℕcn 12342  2c2 12404  ℕ0cn0 12613  ℤcz 12700  ℤ≥cuz 12972  ...cfz 13646  ↑cexp 14211  Ccbc 14453  ♯chash 14481  Σcsu 15862   ∥ cdvds 16431  ℙcprime 16855   pCnt cpc 17023  μcmu 27431
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755  ax-inf2 9649  ax-cnex 11263  ax-resscn 11264  ax-1cn 11265  ax-icn 11266  ax-addcl 11267  ax-addrcl 11268  ax-mulcl 11269  ax-mulrcl 11270  ax-mulcom 11271  ax-addass 11272  ax-mulass 11273  ax-distr 11274  ax-i2m1 11275  ax-1ne0 11276  ax-1rid 11277  ax-rnegex 11278  ax-rrecex 11279  ax-cnre 11280  ax-pre-lttri 11281  ax-pre-lttrn 11282  ax-pre-ltadd 11283  ax-pre-mulgt0 11284  ax-pre-sup 11285
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-disj 5070  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7381  df-ov 7427  df-oprab 7428  df-mpo 7429  df-om 7882  df-1st 8005  df-2nd 8006  df-frecs 8307  df-wrecs 8338  df-recs 8387  df-rdg 8426  df-1o 8484  df-2o 8485  df-oadd 8488  df-er 8725  df-map 8857  df-en 8982  df-dom 8983  df-sdom 8984  df-fin 8985  df-sup 9441  df-inf 9442  df-oi 9511  df-dju 9989  df-card 10027  df-pnf 11352  df-mnf 11353  df-xr 11354  df-ltxr 11355  df-le 11356  df-sub 11550  df-neg 11551  df-div 11981  df-nn 12343  df-2 12412  df-3 12413  df-n0 12614  df-xnn0 12687  df-z 12701  df-uz 12973  df-q 13083  df-rp 13128  df-fz 13647  df-fzo 13796  df-fl 13939  df-mod 14017  df-seq 14152  df-exp 14212  df-fac 14425  df-bc 14454  df-hash 14482  df-cj 15275  df-re 15276  df-im 15277  df-sqrt 15411  df-abs 15412  df-clim 15664  df-sum 15863  df-dvds 16432  df-gcd 16674  df-prm 16856  df-pc 17024  df-mu 27437
This theorem is used by:  musumsum  27528  muinv  27529
  Copyright terms: Public domain W3C validator