Proof of Theorem ppidif
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | eluzelz 12888 | . . . . 5
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑁 ∈ ℤ) | 
| 2 |  | eluzel2 12883 | . . . . . . 7
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑀 ∈ ℤ) | 
| 3 |  | 2z 12649 | . . . . . . 7
⊢ 2 ∈
ℤ | 
| 4 |  | ifcl 4571 | . . . . . . 7
⊢ ((𝑀 ∈ ℤ ∧ 2 ∈
ℤ) → if(𝑀 ≤
2, 𝑀, 2) ∈
ℤ) | 
| 5 | 2, 3, 4 | sylancl 586 | . . . . . 6
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → if(𝑀 ≤ 2, 𝑀, 2) ∈ ℤ) | 
| 6 | 3 | a1i 11 | . . . . . 6
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 2 ∈ ℤ) | 
| 7 | 2 | zred 12722 | . . . . . . 7
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑀 ∈ ℝ) | 
| 8 |  | 2re 12340 | . . . . . . 7
⊢ 2 ∈
ℝ | 
| 9 |  | min2 13232 | . . . . . . 7
⊢ ((𝑀 ∈ ℝ ∧ 2 ∈
ℝ) → if(𝑀 ≤
2, 𝑀, 2) ≤
2) | 
| 10 | 7, 8, 9 | sylancl 586 | . . . . . 6
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → if(𝑀 ≤ 2, 𝑀, 2) ≤ 2) | 
| 11 |  | eluz2 12884 | . . . . . 6
⊢ (2 ∈
(ℤ≥‘if(𝑀 ≤ 2, 𝑀, 2)) ↔ (if(𝑀 ≤ 2, 𝑀, 2) ∈ ℤ ∧ 2 ∈ ℤ
∧ if(𝑀 ≤ 2, 𝑀, 2) ≤ 2)) | 
| 12 | 5, 6, 10, 11 | syl3anbrc 1344 | . . . . 5
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 2 ∈
(ℤ≥‘if(𝑀 ≤ 2, 𝑀, 2))) | 
| 13 |  | ppival2g 27172 | . . . . 5
⊢ ((𝑁 ∈ ℤ ∧ 2 ∈
(ℤ≥‘if(𝑀 ≤ 2, 𝑀, 2))) → (π‘𝑁) = (♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑁) ∩ ℙ))) | 
| 14 | 1, 12, 13 | syl2anc 584 | . . . 4
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (π‘𝑁) = (♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑁) ∩ ℙ))) | 
| 15 |  | min1 13231 | . . . . . . . . . . 11
⊢ ((𝑀 ∈ ℝ ∧ 2 ∈
ℝ) → if(𝑀 ≤
2, 𝑀, 2) ≤ 𝑀) | 
| 16 | 7, 8, 15 | sylancl 586 | . . . . . . . . . 10
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → if(𝑀 ≤ 2, 𝑀, 2) ≤ 𝑀) | 
| 17 |  | eluz2 12884 | . . . . . . . . . 10
⊢ (𝑀 ∈
(ℤ≥‘if(𝑀 ≤ 2, 𝑀, 2)) ↔ (if(𝑀 ≤ 2, 𝑀, 2) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ if(𝑀 ≤ 2, 𝑀, 2) ≤ 𝑀)) | 
| 18 | 5, 2, 16, 17 | syl3anbrc 1344 | . . . . . . . . 9
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑀 ∈
(ℤ≥‘if(𝑀 ≤ 2, 𝑀, 2))) | 
| 19 |  | id 22 | . . . . . . . . 9
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑁 ∈ (ℤ≥‘𝑀)) | 
| 20 |  | elfzuzb 13558 | . . . . . . . . 9
⊢ (𝑀 ∈ (if(𝑀 ≤ 2, 𝑀, 2)...𝑁) ↔ (𝑀 ∈
(ℤ≥‘if(𝑀 ≤ 2, 𝑀, 2)) ∧ 𝑁 ∈ (ℤ≥‘𝑀))) | 
| 21 | 18, 19, 20 | sylanbrc 583 | . . . . . . . 8
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑀 ∈ (if(𝑀 ≤ 2, 𝑀, 2)...𝑁)) | 
| 22 |  | fzsplit 13590 | . . . . . . . 8
⊢ (𝑀 ∈ (if(𝑀 ≤ 2, 𝑀, 2)...𝑁) → (if(𝑀 ≤ 2, 𝑀, 2)...𝑁) = ((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∪ ((𝑀 + 1)...𝑁))) | 
| 23 | 21, 22 | syl 17 | . . . . . . 7
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (if(𝑀 ≤ 2, 𝑀, 2)...𝑁) = ((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∪ ((𝑀 + 1)...𝑁))) | 
| 24 | 23 | ineq1d 4219 | . . . . . 6
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → ((if(𝑀 ≤ 2, 𝑀, 2)...𝑁) ∩ ℙ) = (((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∪ ((𝑀 + 1)...𝑁)) ∩ ℙ)) | 
| 25 |  | indir 4286 | . . . . . 6
⊢
(((if(𝑀 ≤ 2,
𝑀, 2)...𝑀) ∪ ((𝑀 + 1)...𝑁)) ∩ ℙ) = (((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∪ (((𝑀 + 1)...𝑁) ∩ ℙ)) | 
| 26 | 24, 25 | eqtrdi 2793 | . . . . 5
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → ((if(𝑀 ≤ 2, 𝑀, 2)...𝑁) ∩ ℙ) = (((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∪ (((𝑀 + 1)...𝑁) ∩ ℙ))) | 
| 27 | 26 | fveq2d 6910 | . . . 4
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑁) ∩ ℙ)) =
(♯‘(((if(𝑀 ≤
2, 𝑀, 2)...𝑀) ∩ ℙ) ∪ (((𝑀 + 1)...𝑁) ∩ ℙ)))) | 
| 28 |  | fzfi 14013 | . . . . . 6
⊢ (if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∈ Fin | 
| 29 |  | inss1 4237 | . . . . . 6
⊢
((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ⊆ (if(𝑀 ≤ 2, 𝑀, 2)...𝑀) | 
| 30 |  | ssfi 9213 | . . . . . 6
⊢
(((if(𝑀 ≤ 2,
𝑀, 2)...𝑀) ∈ Fin ∧ ((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ⊆ (if(𝑀 ≤ 2, 𝑀, 2)...𝑀)) → ((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∈
Fin) | 
| 31 | 28, 29, 30 | mp2an 692 | . . . . 5
⊢
((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∈ Fin | 
| 32 |  | fzfi 14013 | . . . . . 6
⊢ ((𝑀 + 1)...𝑁) ∈ Fin | 
| 33 |  | inss1 4237 | . . . . . 6
⊢ (((𝑀 + 1)...𝑁) ∩ ℙ) ⊆ ((𝑀 + 1)...𝑁) | 
| 34 |  | ssfi 9213 | . . . . . 6
⊢ ((((𝑀 + 1)...𝑁) ∈ Fin ∧ (((𝑀 + 1)...𝑁) ∩ ℙ) ⊆ ((𝑀 + 1)...𝑁)) → (((𝑀 + 1)...𝑁) ∩ ℙ) ∈
Fin) | 
| 35 | 32, 33, 34 | mp2an 692 | . . . . 5
⊢ (((𝑀 + 1)...𝑁) ∩ ℙ) ∈ Fin | 
| 36 | 7 | ltp1d 12198 | . . . . . . . 8
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑀 < (𝑀 + 1)) | 
| 37 |  | fzdisj 13591 | . . . . . . . 8
⊢ (𝑀 < (𝑀 + 1) → ((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ((𝑀 + 1)...𝑁)) = ∅) | 
| 38 | 36, 37 | syl 17 | . . . . . . 7
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → ((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ((𝑀 + 1)...𝑁)) = ∅) | 
| 39 | 38 | ineq1d 4219 | . . . . . 6
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ((𝑀 + 1)...𝑁)) ∩ ℙ) = (∅ ∩
ℙ)) | 
| 40 |  | inindir 4236 | . . . . . 6
⊢
(((if(𝑀 ≤ 2,
𝑀, 2)...𝑀) ∩ ((𝑀 + 1)...𝑁)) ∩ ℙ) = (((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∩ (((𝑀 + 1)...𝑁) ∩ ℙ)) | 
| 41 |  | 0in 4397 | . . . . . 6
⊢ (∅
∩ ℙ) = ∅ | 
| 42 | 39, 40, 41 | 3eqtr3g 2800 | . . . . 5
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∩ (((𝑀 + 1)...𝑁) ∩ ℙ)) =
∅) | 
| 43 |  | hashun 14421 | . . . . 5
⊢
((((if(𝑀 ≤ 2,
𝑀, 2)...𝑀) ∩ ℙ) ∈ Fin ∧ (((𝑀 + 1)...𝑁) ∩ ℙ) ∈ Fin ∧
(((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∩ (((𝑀 + 1)...𝑁) ∩ ℙ)) = ∅) →
(♯‘(((if(𝑀 ≤
2, 𝑀, 2)...𝑀) ∩ ℙ) ∪ (((𝑀 + 1)...𝑁) ∩ ℙ))) =
((♯‘((if(𝑀 ≤
2, 𝑀, 2)...𝑀) ∩ ℙ)) +
(♯‘(((𝑀 +
1)...𝑁) ∩
ℙ)))) | 
| 44 | 31, 35, 42, 43 | mp3an12i 1467 | . . . 4
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (♯‘(((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ) ∪ (((𝑀 + 1)...𝑁) ∩ ℙ))) =
((♯‘((if(𝑀 ≤
2, 𝑀, 2)...𝑀) ∩ ℙ)) +
(♯‘(((𝑀 +
1)...𝑁) ∩
ℙ)))) | 
| 45 | 14, 27, 44 | 3eqtrd 2781 | . . 3
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (π‘𝑁) = ((♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)) + (♯‘(((𝑀 + 1)...𝑁) ∩ ℙ)))) | 
| 46 |  | ppival2g 27172 | . . . 4
⊢ ((𝑀 ∈ ℤ ∧ 2 ∈
(ℤ≥‘if(𝑀 ≤ 2, 𝑀, 2))) → (π‘𝑀) = (♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ))) | 
| 47 | 2, 12, 46 | syl2anc 584 | . . 3
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (π‘𝑀) = (♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ))) | 
| 48 | 45, 47 | oveq12d 7449 | . 2
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → ((π‘𝑁) −
(π‘𝑀)) =
(((♯‘((if(𝑀
≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)) +
(♯‘(((𝑀 +
1)...𝑁) ∩ ℙ)))
− (♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)))) | 
| 49 |  | hashcl 14395 | . . . . 5
⊢
(((if(𝑀 ≤ 2,
𝑀, 2)...𝑀) ∩ ℙ) ∈ Fin →
(♯‘((if(𝑀 ≤
2, 𝑀, 2)...𝑀) ∩ ℙ)) ∈
ℕ0) | 
| 50 | 31, 49 | ax-mp 5 | . . . 4
⊢
(♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)) ∈
ℕ0 | 
| 51 | 50 | nn0cni 12538 | . . 3
⊢
(♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)) ∈
ℂ | 
| 52 |  | hashcl 14395 | . . . . 5
⊢ ((((𝑀 + 1)...𝑁) ∩ ℙ) ∈ Fin →
(♯‘(((𝑀 +
1)...𝑁) ∩ ℙ))
∈ ℕ0) | 
| 53 | 35, 52 | ax-mp 5 | . . . 4
⊢
(♯‘(((𝑀
+ 1)...𝑁) ∩ ℙ))
∈ ℕ0 | 
| 54 | 53 | nn0cni 12538 | . . 3
⊢
(♯‘(((𝑀
+ 1)...𝑁) ∩ ℙ))
∈ ℂ | 
| 55 |  | pncan2 11515 | . . 3
⊢
(((♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)) ∈ ℂ ∧
(♯‘(((𝑀 +
1)...𝑁) ∩ ℙ))
∈ ℂ) → (((♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)) + (♯‘(((𝑀 + 1)...𝑁) ∩ ℙ))) −
(♯‘((if(𝑀 ≤
2, 𝑀, 2)...𝑀) ∩ ℙ))) =
(♯‘(((𝑀 +
1)...𝑁) ∩
ℙ))) | 
| 56 | 51, 54, 55 | mp2an 692 | . 2
⊢
(((♯‘((if(𝑀 ≤ 2, 𝑀, 2)...𝑀) ∩ ℙ)) + (♯‘(((𝑀 + 1)...𝑁) ∩ ℙ))) −
(♯‘((if(𝑀 ≤
2, 𝑀, 2)...𝑀) ∩ ℙ))) =
(♯‘(((𝑀 +
1)...𝑁) ∩
ℙ)) | 
| 57 | 48, 56 | eqtrdi 2793 | 1
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → ((π‘𝑁) −
(π‘𝑀)) =
(♯‘(((𝑀 +
1)...𝑁) ∩
ℙ))) |