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

Theorem ppiub 25139
Description: An upper bound on the prime-counting function π, which counts the number of primes less than 𝑁. (Contributed by Mario Carneiro, 13-Mar-2014.)
Assertion
Ref Expression
ppiub ((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) → (π𝑁) ≤ ((𝑁 / 3) + 2))

Proof of Theorem ppiub
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 3re 11374 . . 3 3 ∈ ℝ
21a1i 11 . 2 ((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) → 3 ∈ ℝ)
3 simpl 470 . 2 ((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) → 𝑁 ∈ ℝ)
4 ppicl 25067 . . . . . . . 8 (𝑁 ∈ ℝ → (π𝑁) ∈ ℕ0)
54nn0red 11614 . . . . . . 7 (𝑁 ∈ ℝ → (π𝑁) ∈ ℝ)
65adantr 468 . . . . . 6 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (π𝑁) ∈ ℝ)
7 2re 11370 . . . . . 6 2 ∈ ℝ
8 resubcl 10627 . . . . . 6 (((π𝑁) ∈ ℝ ∧ 2 ∈ ℝ) → ((π𝑁) − 2) ∈ ℝ)
96, 7, 8sylancl 576 . . . . 5 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((π𝑁) − 2) ∈ ℝ)
10 fzfi 12991 . . . . . . . . 9 (4...(⌊‘𝑁)) ∈ Fin
11 ssrab2 3881 . . . . . . . . 9 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} ⊆ (4...(⌊‘𝑁))
12 ssfi 8416 . . . . . . . . 9 (((4...(⌊‘𝑁)) ∈ Fin ∧ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} ⊆ (4...(⌊‘𝑁))) → {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} ∈ Fin)
1310, 11, 12mp2an 675 . . . . . . . 8 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} ∈ Fin
14 hashcl 13361 . . . . . . . 8 ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} ∈ Fin → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) ∈ ℕ0)
1513, 14ax-mp 5 . . . . . . 7 (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) ∈ ℕ0
1615nn0rei 11566 . . . . . 6 (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) ∈ ℝ
1716a1i 11 . . . . 5 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) ∈ ℝ)
18 3nn 11459 . . . . . . 7 3 ∈ ℕ
19 nndivre 11338 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ∈ ℕ) → (𝑁 / 3) ∈ ℝ)
2018, 19mpan2 674 . . . . . 6 (𝑁 ∈ ℝ → (𝑁 / 3) ∈ ℝ)
2120adantr 468 . . . . 5 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (𝑁 / 3) ∈ ℝ)
22 ppifl 25096 . . . . . . . . 9 (𝑁 ∈ ℝ → (π‘(⌊‘𝑁)) = (π𝑁))
2322adantr 468 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (π‘(⌊‘𝑁)) = (π𝑁))
24 ppi3 25107 . . . . . . . . 9 (π‘3) = 2
2524a1i 11 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (π‘3) = 2)
2623, 25oveq12d 6889 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((π‘(⌊‘𝑁)) − (π‘3)) = ((π𝑁) − 2))
27 3z 11672 . . . . . . . . . . 11 3 ∈ ℤ
2827a1i 11 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 3 ∈ ℤ)
29 flcl 12816 . . . . . . . . . . 11 (𝑁 ∈ ℝ → (⌊‘𝑁) ∈ ℤ)
3029adantr 468 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘𝑁) ∈ ℤ)
31 flge 12826 . . . . . . . . . . . 12 ((𝑁 ∈ ℝ ∧ 3 ∈ ℤ) → (3 ≤ 𝑁 ↔ 3 ≤ (⌊‘𝑁)))
3227, 31mpan2 674 . . . . . . . . . . 11 (𝑁 ∈ ℝ → (3 ≤ 𝑁 ↔ 3 ≤ (⌊‘𝑁)))
3332biimpa 464 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 3 ≤ (⌊‘𝑁))
34 eluz2 11906 . . . . . . . . . 10 ((⌊‘𝑁) ∈ (ℤ‘3) ↔ (3 ∈ ℤ ∧ (⌊‘𝑁) ∈ ℤ ∧ 3 ≤ (⌊‘𝑁)))
3528, 30, 33, 34syl3anbrc 1436 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘𝑁) ∈ (ℤ‘3))
36 ppidif 25099 . . . . . . . . 9 ((⌊‘𝑁) ∈ (ℤ‘3) → ((π‘(⌊‘𝑁)) − (π‘3)) = (♯‘(((3 + 1)...(⌊‘𝑁)) ∩ ℙ)))
3735, 36syl 17 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((π‘(⌊‘𝑁)) − (π‘3)) = (♯‘(((3 + 1)...(⌊‘𝑁)) ∩ ℙ)))
38 df-4 11362 . . . . . . . . . . 11 4 = (3 + 1)
3938oveq1i 6881 . . . . . . . . . 10 (4...(⌊‘𝑁)) = ((3 + 1)...(⌊‘𝑁))
4039ineq1i 4006 . . . . . . . . 9 ((4...(⌊‘𝑁)) ∩ ℙ) = (((3 + 1)...(⌊‘𝑁)) ∩ ℙ)
4140fveq2i 6408 . . . . . . . 8 (♯‘((4...(⌊‘𝑁)) ∩ ℙ)) = (♯‘(((3 + 1)...(⌊‘𝑁)) ∩ ℙ))
4237, 41syl6eqr 2857 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((π‘(⌊‘𝑁)) − (π‘3)) = (♯‘((4...(⌊‘𝑁)) ∩ ℙ)))
4326, 42eqtr3d 2841 . . . . . 6 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((π𝑁) − 2) = (♯‘((4...(⌊‘𝑁)) ∩ ℙ)))
44 dfin5 3774 . . . . . . . . 9 ((4...(⌊‘𝑁)) ∩ ℙ) = {𝑘 ∈ (4...(⌊‘𝑁)) ∣ 𝑘 ∈ ℙ}
45 elfzle1 12563 . . . . . . . . . . 11 (𝑘 ∈ (4...(⌊‘𝑁)) → 4 ≤ 𝑘)
46 ppiublem2 25138 . . . . . . . . . . . 12 ((𝑘 ∈ ℙ ∧ 4 ≤ 𝑘) → (𝑘 mod 6) ∈ {1, 5})
4746expcom 400 . . . . . . . . . . 11 (4 ≤ 𝑘 → (𝑘 ∈ ℙ → (𝑘 mod 6) ∈ {1, 5}))
4845, 47syl 17 . . . . . . . . . 10 (𝑘 ∈ (4...(⌊‘𝑁)) → (𝑘 ∈ ℙ → (𝑘 mod 6) ∈ {1, 5}))
4948ss2rabi 3878 . . . . . . . . 9 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ 𝑘 ∈ ℙ} ⊆ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}
5044, 49eqsstri 3829 . . . . . . . 8 ((4...(⌊‘𝑁)) ∩ ℙ) ⊆ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}
51 ssdomg 8235 . . . . . . . 8 ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} ∈ Fin → (((4...(⌊‘𝑁)) ∩ ℙ) ⊆ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} → ((4...(⌊‘𝑁)) ∩ ℙ) ≼ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}))
5213, 50, 51mp2 9 . . . . . . 7 ((4...(⌊‘𝑁)) ∩ ℙ) ≼ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}
53 inss1 4026 . . . . . . . . 9 ((4...(⌊‘𝑁)) ∩ ℙ) ⊆ (4...(⌊‘𝑁))
54 ssfi 8416 . . . . . . . . 9 (((4...(⌊‘𝑁)) ∈ Fin ∧ ((4...(⌊‘𝑁)) ∩ ℙ) ⊆ (4...(⌊‘𝑁))) → ((4...(⌊‘𝑁)) ∩ ℙ) ∈ Fin)
5510, 53, 54mp2an 675 . . . . . . . 8 ((4...(⌊‘𝑁)) ∩ ℙ) ∈ Fin
56 hashdom 13382 . . . . . . . 8 ((((4...(⌊‘𝑁)) ∩ ℙ) ∈ Fin ∧ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} ∈ Fin) → ((♯‘((4...(⌊‘𝑁)) ∩ ℙ)) ≤ (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) ↔ ((4...(⌊‘𝑁)) ∩ ℙ) ≼ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}))
5755, 13, 56mp2an 675 . . . . . . 7 ((♯‘((4...(⌊‘𝑁)) ∩ ℙ)) ≤ (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) ↔ ((4...(⌊‘𝑁)) ∩ ℙ) ≼ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}})
5852, 57mpbir 222 . . . . . 6 (♯‘((4...(⌊‘𝑁)) ∩ ℙ)) ≤ (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}})
5943, 58syl6eqbr 4879 . . . . 5 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((π𝑁) − 2) ≤ (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}))
60 reflcl 12817 . . . . . . . . . . 11 (𝑁 ∈ ℝ → (⌊‘𝑁) ∈ ℝ)
6160adantr 468 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘𝑁) ∈ ℝ)
62 peano2rem 10630 . . . . . . . . . 10 ((⌊‘𝑁) ∈ ℝ → ((⌊‘𝑁) − 1) ∈ ℝ)
6361, 62syl 17 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘𝑁) − 1) ∈ ℝ)
64 6nn 11462 . . . . . . . . 9 6 ∈ ℕ
65 nndivre 11338 . . . . . . . . 9 ((((⌊‘𝑁) − 1) ∈ ℝ ∧ 6 ∈ ℕ) → (((⌊‘𝑁) − 1) / 6) ∈ ℝ)
6663, 64, 65sylancl 576 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((⌊‘𝑁) − 1) / 6) ∈ ℝ)
67 reflcl 12817 . . . . . . . 8 ((((⌊‘𝑁) − 1) / 6) ∈ ℝ → (⌊‘(((⌊‘𝑁) − 1) / 6)) ∈ ℝ)
6866, 67syl 17 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 1) / 6)) ∈ ℝ)
69 5re 11379 . . . . . . . . . . 11 5 ∈ ℝ
70 resubcl 10627 . . . . . . . . . . 11 (((⌊‘𝑁) ∈ ℝ ∧ 5 ∈ ℝ) → ((⌊‘𝑁) − 5) ∈ ℝ)
7161, 69, 70sylancl 576 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘𝑁) − 5) ∈ ℝ)
72 nndivre 11338 . . . . . . . . . 10 ((((⌊‘𝑁) − 5) ∈ ℝ ∧ 6 ∈ ℕ) → (((⌊‘𝑁) − 5) / 6) ∈ ℝ)
7371, 64, 72sylancl 576 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((⌊‘𝑁) − 5) / 6) ∈ ℝ)
74 reflcl 12817 . . . . . . . . 9 ((((⌊‘𝑁) − 5) / 6) ∈ ℝ → (⌊‘(((⌊‘𝑁) − 5) / 6)) ∈ ℝ)
7573, 74syl 17 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 5) / 6)) ∈ ℝ)
76 peano2re 10491 . . . . . . . 8 ((⌊‘(((⌊‘𝑁) − 5) / 6)) ∈ ℝ → ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1) ∈ ℝ)
7775, 76syl 17 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1) ∈ ℝ)
78 peano2rem 10630 . . . . . . . . 9 (𝑁 ∈ ℝ → (𝑁 − 1) ∈ ℝ)
7978adantr 468 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (𝑁 − 1) ∈ ℝ)
80 nndivre 11338 . . . . . . . 8 (((𝑁 − 1) ∈ ℝ ∧ 6 ∈ ℕ) → ((𝑁 − 1) / 6) ∈ ℝ)
8179, 64, 80sylancl 576 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((𝑁 − 1) / 6) ∈ ℝ)
82 simpl 470 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 𝑁 ∈ ℝ)
83 resubcl 10627 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 5 ∈ ℝ) → (𝑁 − 5) ∈ ℝ)
8482, 69, 83sylancl 576 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (𝑁 − 5) ∈ ℝ)
85 nndivre 11338 . . . . . . . . 9 (((𝑁 − 5) ∈ ℝ ∧ 6 ∈ ℕ) → ((𝑁 − 5) / 6) ∈ ℝ)
8684, 64, 85sylancl 576 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((𝑁 − 5) / 6) ∈ ℝ)
87 peano2re 10491 . . . . . . . 8 (((𝑁 − 5) / 6) ∈ ℝ → (((𝑁 − 5) / 6) + 1) ∈ ℝ)
8886, 87syl 17 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((𝑁 − 5) / 6) + 1) ∈ ℝ)
89 flle 12820 . . . . . . . . 9 ((((⌊‘𝑁) − 1) / 6) ∈ ℝ → (⌊‘(((⌊‘𝑁) − 1) / 6)) ≤ (((⌊‘𝑁) − 1) / 6))
9066, 89syl 17 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 1) / 6)) ≤ (((⌊‘𝑁) − 1) / 6))
91 1re 10322 . . . . . . . . . . 11 1 ∈ ℝ
9291a1i 11 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 1 ∈ ℝ)
93 flle 12820 . . . . . . . . . . 11 (𝑁 ∈ ℝ → (⌊‘𝑁) ≤ 𝑁)
9493adantr 468 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘𝑁) ≤ 𝑁)
9561, 82, 92, 94lesub1dd 10925 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘𝑁) − 1) ≤ (𝑁 − 1))
96 6re 11381 . . . . . . . . . . 11 6 ∈ ℝ
9796a1i 11 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 6 ∈ ℝ)
98 6pos 11398 . . . . . . . . . . 11 0 < 6
9998a1i 11 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 0 < 6)
100 lediv1 11170 . . . . . . . . . 10 ((((⌊‘𝑁) − 1) ∈ ℝ ∧ (𝑁 − 1) ∈ ℝ ∧ (6 ∈ ℝ ∧ 0 < 6)) → (((⌊‘𝑁) − 1) ≤ (𝑁 − 1) ↔ (((⌊‘𝑁) − 1) / 6) ≤ ((𝑁 − 1) / 6)))
10163, 79, 97, 99, 100syl112anc 1486 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((⌊‘𝑁) − 1) ≤ (𝑁 − 1) ↔ (((⌊‘𝑁) − 1) / 6) ≤ ((𝑁 − 1) / 6)))
10295, 101mpbid 223 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((⌊‘𝑁) − 1) / 6) ≤ ((𝑁 − 1) / 6))
10368, 66, 81, 90, 102letrd 10476 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 1) / 6)) ≤ ((𝑁 − 1) / 6))
104 flle 12820 . . . . . . . . . 10 ((((⌊‘𝑁) − 5) / 6) ∈ ℝ → (⌊‘(((⌊‘𝑁) − 5) / 6)) ≤ (((⌊‘𝑁) − 5) / 6))
10573, 104syl 17 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 5) / 6)) ≤ (((⌊‘𝑁) − 5) / 6))
10669a1i 11 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 5 ∈ ℝ)
10761, 82, 106, 94lesub1dd 10925 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘𝑁) − 5) ≤ (𝑁 − 5))
108 lediv1 11170 . . . . . . . . . . 11 ((((⌊‘𝑁) − 5) ∈ ℝ ∧ (𝑁 − 5) ∈ ℝ ∧ (6 ∈ ℝ ∧ 0 < 6)) → (((⌊‘𝑁) − 5) ≤ (𝑁 − 5) ↔ (((⌊‘𝑁) − 5) / 6) ≤ ((𝑁 − 5) / 6)))
10971, 84, 97, 99, 108syl112anc 1486 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((⌊‘𝑁) − 5) ≤ (𝑁 − 5) ↔ (((⌊‘𝑁) − 5) / 6) ≤ ((𝑁 − 5) / 6)))
110107, 109mpbid 223 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((⌊‘𝑁) − 5) / 6) ≤ ((𝑁 − 5) / 6))
11175, 73, 86, 105, 110letrd 10476 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 5) / 6)) ≤ ((𝑁 − 5) / 6))
11275, 86, 92, 111leadd1dd 10923 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1) ≤ (((𝑁 − 5) / 6) + 1))
11368, 77, 81, 88, 103, 112le2addd 10928 . . . . . 6 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘(((⌊‘𝑁) − 1) / 6)) + ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1)) ≤ (((𝑁 − 1) / 6) + (((𝑁 − 5) / 6) + 1)))
114 ovex 6903 . . . . . . . . . . . 12 (𝑘 mod 6) ∈ V
115114elpr 4390 . . . . . . . . . . 11 ((𝑘 mod 6) ∈ {1, 5} ↔ ((𝑘 mod 6) = 1 ∨ (𝑘 mod 6) = 5))
116115rabbii 3374 . . . . . . . . . 10 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} = {𝑘 ∈ (4...(⌊‘𝑁)) ∣ ((𝑘 mod 6) = 1 ∨ (𝑘 mod 6) = 5)}
117 unrab 4096 . . . . . . . . . 10 ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∪ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}) = {𝑘 ∈ (4...(⌊‘𝑁)) ∣ ((𝑘 mod 6) = 1 ∨ (𝑘 mod 6) = 5)}
118116, 117eqtr4i 2830 . . . . . . . . 9 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}} = ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∪ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5})
119118fveq2i 6408 . . . . . . . 8 (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) = (♯‘({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∪ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}))
120 ssrab2 3881 . . . . . . . . . 10 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ⊆ (4...(⌊‘𝑁))
121 ssfi 8416 . . . . . . . . . 10 (((4...(⌊‘𝑁)) ∈ Fin ∧ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ⊆ (4...(⌊‘𝑁))) → {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∈ Fin)
12210, 120, 121mp2an 675 . . . . . . . . 9 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∈ Fin
123 ssrab2 3881 . . . . . . . . . 10 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5} ⊆ (4...(⌊‘𝑁))
124 ssfi 8416 . . . . . . . . . 10 (((4...(⌊‘𝑁)) ∈ Fin ∧ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5} ⊆ (4...(⌊‘𝑁))) → {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5} ∈ Fin)
12510, 123, 124mp2an 675 . . . . . . . . 9 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5} ∈ Fin
126 inrab 4097 . . . . . . . . . 10 ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∩ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}) = {𝑘 ∈ (4...(⌊‘𝑁)) ∣ ((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5)}
127 rabeq0 4154 . . . . . . . . . . 11 ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ ((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5)} = ∅ ↔ ∀𝑘 ∈ (4...(⌊‘𝑁)) ¬ ((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5))
128 1lt5 11475 . . . . . . . . . . . . . 14 1 < 5
12991, 128ltneii 10432 . . . . . . . . . . . . 13 1 ≠ 5
130 eqtr2 2825 . . . . . . . . . . . . . 14 (((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5) → 1 = 5)
131130necon3ai 3002 . . . . . . . . . . . . 13 (1 ≠ 5 → ¬ ((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5))
132129, 131ax-mp 5 . . . . . . . . . . . 12 ¬ ((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5)
133132a1i 11 . . . . . . . . . . 11 (𝑘 ∈ (4...(⌊‘𝑁)) → ¬ ((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5))
134127, 133mprgbir 3114 . . . . . . . . . 10 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ ((𝑘 mod 6) = 1 ∧ (𝑘 mod 6) = 5)} = ∅
135126, 134eqtri 2827 . . . . . . . . 9 ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∩ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}) = ∅
136 hashun 13385 . . . . . . . . 9 (({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∈ Fin ∧ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5} ∈ Fin ∧ ({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∩ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}) = ∅) → (♯‘({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∪ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5})) = ((♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1}) + (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5})))
137122, 125, 135, 136mp3an 1578 . . . . . . . 8 (♯‘({𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} ∪ {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5})) = ((♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1}) + (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}))
138119, 137eqtri 2827 . . . . . . 7 (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) = ((♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1}) + (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}))
139 elfzelz 12561 . . . . . . . . . . . . 13 (𝑘 ∈ (4...(⌊‘𝑁)) → 𝑘 ∈ ℤ)
140 nnrp 12052 . . . . . . . . . . . . . . . . 17 (6 ∈ ℕ → 6 ∈ ℝ+)
14164, 140ax-mp 5 . . . . . . . . . . . . . . . 16 6 ∈ ℝ+
142 0le1 10833 . . . . . . . . . . . . . . . 16 0 ≤ 1
143 1lt6 11480 . . . . . . . . . . . . . . . 16 1 < 6
144 modid 12915 . . . . . . . . . . . . . . . 16 (((1 ∈ ℝ ∧ 6 ∈ ℝ+) ∧ (0 ≤ 1 ∧ 1 < 6)) → (1 mod 6) = 1)
14591, 141, 142, 143, 144mp4an 676 . . . . . . . . . . . . . . 15 (1 mod 6) = 1
146145eqeq2i 2817 . . . . . . . . . . . . . 14 ((𝑘 mod 6) = (1 mod 6) ↔ (𝑘 mod 6) = 1)
147 1z 11669 . . . . . . . . . . . . . . 15 1 ∈ ℤ
148 moddvds 15210 . . . . . . . . . . . . . . 15 ((6 ∈ ℕ ∧ 𝑘 ∈ ℤ ∧ 1 ∈ ℤ) → ((𝑘 mod 6) = (1 mod 6) ↔ 6 ∥ (𝑘 − 1)))
14964, 147, 148mp3an13 1569 . . . . . . . . . . . . . 14 (𝑘 ∈ ℤ → ((𝑘 mod 6) = (1 mod 6) ↔ 6 ∥ (𝑘 − 1)))
150146, 149syl5bbr 276 . . . . . . . . . . . . 13 (𝑘 ∈ ℤ → ((𝑘 mod 6) = 1 ↔ 6 ∥ (𝑘 − 1)))
151139, 150syl 17 . . . . . . . . . . . 12 (𝑘 ∈ (4...(⌊‘𝑁)) → ((𝑘 mod 6) = 1 ↔ 6 ∥ (𝑘 − 1)))
152151rabbiia 3373 . . . . . . . . . . 11 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1} = {𝑘 ∈ (4...(⌊‘𝑁)) ∣ 6 ∥ (𝑘 − 1)}
153152fveq2i 6408 . . . . . . . . . 10 (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1}) = (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ 6 ∥ (𝑘 − 1)})
15464a1i 11 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 6 ∈ ℕ)
155 4z 11673 . . . . . . . . . . . 12 4 ∈ ℤ
156155a1i 11 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 4 ∈ ℤ)
15738oveq1i 6881 . . . . . . . . . . . . . 14 (4 − 1) = ((3 + 1) − 1)
158 3cn 11375 . . . . . . . . . . . . . . 15 3 ∈ ℂ
159 ax-1cn 10276 . . . . . . . . . . . . . . 15 1 ∈ ℂ
160158, 159pncan3oi 10579 . . . . . . . . . . . . . 14 ((3 + 1) − 1) = 3
161157, 160eqtri 2827 . . . . . . . . . . . . 13 (4 − 1) = 3
162161fveq2i 6408 . . . . . . . . . . . 12 (ℤ‘(4 − 1)) = (ℤ‘3)
16335, 162syl6eleqr 2895 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘𝑁) ∈ (ℤ‘(4 − 1)))
164147a1i 11 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 1 ∈ ℤ)
165154, 156, 163, 164hashdvds 15693 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ 6 ∥ (𝑘 − 1)}) = ((⌊‘(((⌊‘𝑁) − 1) / 6)) − (⌊‘(((4 − 1) − 1) / 6))))
166153, 165syl5eq 2851 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1}) = ((⌊‘(((⌊‘𝑁) − 1) / 6)) − (⌊‘(((4 − 1) − 1) / 6))))
167 df-3 11361 . . . . . . . . . . . . . . . . 17 3 = (2 + 1)
168161, 167eqtri 2827 . . . . . . . . . . . . . . . 16 (4 − 1) = (2 + 1)
169168oveq1i 6881 . . . . . . . . . . . . . . 15 ((4 − 1) − 1) = ((2 + 1) − 1)
170 2cn 11371 . . . . . . . . . . . . . . . 16 2 ∈ ℂ
171170, 159pncan3oi 10579 . . . . . . . . . . . . . . 15 ((2 + 1) − 1) = 2
172169, 171eqtri 2827 . . . . . . . . . . . . . 14 ((4 − 1) − 1) = 2
173172oveq1i 6881 . . . . . . . . . . . . 13 (((4 − 1) − 1) / 6) = (2 / 6)
174173fveq2i 6408 . . . . . . . . . . . 12 (⌊‘(((4 − 1) − 1) / 6)) = (⌊‘(2 / 6))
175 0re 10324 . . . . . . . . . . . . . 14 0 ∈ ℝ
17664nnne0i 11337 . . . . . . . . . . . . . . 15 6 ≠ 0
1777, 96, 176redivcli 11074 . . . . . . . . . . . . . 14 (2 / 6) ∈ ℝ
178 2pos 11391 . . . . . . . . . . . . . . 15 0 < 2
1797, 96, 178, 98divgt0ii 11223 . . . . . . . . . . . . . 14 0 < (2 / 6)
180175, 177, 179ltleii 10442 . . . . . . . . . . . . 13 0 ≤ (2 / 6)
181 2lt6 11479 . . . . . . . . . . . . . . . 16 2 < 6
182 6cn 11382 . . . . . . . . . . . . . . . . 17 6 ∈ ℂ
183182mulid1i 10326 . . . . . . . . . . . . . . . 16 (6 · 1) = 6
184181, 183breqtrri 4867 . . . . . . . . . . . . . . 15 2 < (6 · 1)
18596, 98pm3.2i 458 . . . . . . . . . . . . . . . 16 (6 ∈ ℝ ∧ 0 < 6)
186 ltdivmul 11180 . . . . . . . . . . . . . . . 16 ((2 ∈ ℝ ∧ 1 ∈ ℝ ∧ (6 ∈ ℝ ∧ 0 < 6)) → ((2 / 6) < 1 ↔ 2 < (6 · 1)))
1877, 91, 185, 186mp3an 1578 . . . . . . . . . . . . . . 15 ((2 / 6) < 1 ↔ 2 < (6 · 1))
188184, 187mpbir 222 . . . . . . . . . . . . . 14 (2 / 6) < 1
189 1e0p1 11797 . . . . . . . . . . . . . 14 1 = (0 + 1)
190188, 189breqtri 4865 . . . . . . . . . . . . 13 (2 / 6) < (0 + 1)
191 0z 11650 . . . . . . . . . . . . . 14 0 ∈ ℤ
192 flbi 12837 . . . . . . . . . . . . . 14 (((2 / 6) ∈ ℝ ∧ 0 ∈ ℤ) → ((⌊‘(2 / 6)) = 0 ↔ (0 ≤ (2 / 6) ∧ (2 / 6) < (0 + 1))))
193177, 191, 192mp2an 675 . . . . . . . . . . . . 13 ((⌊‘(2 / 6)) = 0 ↔ (0 ≤ (2 / 6) ∧ (2 / 6) < (0 + 1)))
194180, 190, 193mpbir2an 693 . . . . . . . . . . . 12 (⌊‘(2 / 6)) = 0
195174, 194eqtri 2827 . . . . . . . . . . 11 (⌊‘(((4 − 1) − 1) / 6)) = 0
196195oveq2i 6882 . . . . . . . . . 10 ((⌊‘(((⌊‘𝑁) − 1) / 6)) − (⌊‘(((4 − 1) − 1) / 6))) = ((⌊‘(((⌊‘𝑁) − 1) / 6)) − 0)
19766flcld 12819 . . . . . . . . . . . 12 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 1) / 6)) ∈ ℤ)
198197zcnd 11745 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 1) / 6)) ∈ ℂ)
199198subid1d 10663 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘(((⌊‘𝑁) − 1) / 6)) − 0) = (⌊‘(((⌊‘𝑁) − 1) / 6)))
200196, 199syl5eq 2851 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘(((⌊‘𝑁) − 1) / 6)) − (⌊‘(((4 − 1) − 1) / 6))) = (⌊‘(((⌊‘𝑁) − 1) / 6)))
201166, 200eqtrd 2839 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1}) = (⌊‘(((⌊‘𝑁) − 1) / 6)))
202 5pos 11397 . . . . . . . . . . . . . . . . 17 0 < 5
203175, 69, 202ltleii 10442 . . . . . . . . . . . . . . . 16 0 ≤ 5
204 5lt6 11476 . . . . . . . . . . . . . . . 16 5 < 6
205 modid 12915 . . . . . . . . . . . . . . . 16 (((5 ∈ ℝ ∧ 6 ∈ ℝ+) ∧ (0 ≤ 5 ∧ 5 < 6)) → (5 mod 6) = 5)
20669, 141, 203, 204, 205mp4an 676 . . . . . . . . . . . . . . 15 (5 mod 6) = 5
207206eqeq2i 2817 . . . . . . . . . . . . . 14 ((𝑘 mod 6) = (5 mod 6) ↔ (𝑘 mod 6) = 5)
208 5nn 11461 . . . . . . . . . . . . . . . 16 5 ∈ ℕ
209208nnzi 11663 . . . . . . . . . . . . . . 15 5 ∈ ℤ
210 moddvds 15210 . . . . . . . . . . . . . . 15 ((6 ∈ ℕ ∧ 𝑘 ∈ ℤ ∧ 5 ∈ ℤ) → ((𝑘 mod 6) = (5 mod 6) ↔ 6 ∥ (𝑘 − 5)))
21164, 209, 210mp3an13 1569 . . . . . . . . . . . . . 14 (𝑘 ∈ ℤ → ((𝑘 mod 6) = (5 mod 6) ↔ 6 ∥ (𝑘 − 5)))
212207, 211syl5bbr 276 . . . . . . . . . . . . 13 (𝑘 ∈ ℤ → ((𝑘 mod 6) = 5 ↔ 6 ∥ (𝑘 − 5)))
213139, 212syl 17 . . . . . . . . . . . 12 (𝑘 ∈ (4...(⌊‘𝑁)) → ((𝑘 mod 6) = 5 ↔ 6 ∥ (𝑘 − 5)))
214213rabbiia 3373 . . . . . . . . . . 11 {𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5} = {𝑘 ∈ (4...(⌊‘𝑁)) ∣ 6 ∥ (𝑘 − 5)}
215214fveq2i 6408 . . . . . . . . . 10 (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}) = (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ 6 ∥ (𝑘 − 5)})
216209a1i 11 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 5 ∈ ℤ)
217154, 156, 163, 216hashdvds 15693 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ 6 ∥ (𝑘 − 5)}) = ((⌊‘(((⌊‘𝑁) − 5) / 6)) − (⌊‘(((4 − 1) − 5) / 6))))
218215, 217syl5eq 2851 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}) = ((⌊‘(((⌊‘𝑁) − 5) / 6)) − (⌊‘(((4 − 1) − 5) / 6))))
219161oveq1i 6881 . . . . . . . . . . . . . . . 16 ((4 − 1) − 5) = (3 − 5)
220 5cn 11380 . . . . . . . . . . . . . . . . 17 5 ∈ ℂ
221220, 158negsubdi2i 10649 . . . . . . . . . . . . . . . 16 -(5 − 3) = (3 − 5)
222 3p2e5 11438 . . . . . . . . . . . . . . . . . . 19 (3 + 2) = 5
223222oveq1i 6881 . . . . . . . . . . . . . . . . . 18 ((3 + 2) − 3) = (5 − 3)
224 pncan2 10570 . . . . . . . . . . . . . . . . . . 19 ((3 ∈ ℂ ∧ 2 ∈ ℂ) → ((3 + 2) − 3) = 2)
225158, 170, 224mp2an 675 . . . . . . . . . . . . . . . . . 18 ((3 + 2) − 3) = 2
226223, 225eqtr3i 2829 . . . . . . . . . . . . . . . . 17 (5 − 3) = 2
227226negeqi 10556 . . . . . . . . . . . . . . . 16 -(5 − 3) = -2
228219, 221, 2273eqtr2i 2833 . . . . . . . . . . . . . . 15 ((4 − 1) − 5) = -2
229228oveq1i 6881 . . . . . . . . . . . . . 14 (((4 − 1) − 5) / 6) = (-2 / 6)
230 divneg 11001 . . . . . . . . . . . . . . 15 ((2 ∈ ℂ ∧ 6 ∈ ℂ ∧ 6 ≠ 0) → -(2 / 6) = (-2 / 6))
231170, 182, 176, 230mp3an 1578 . . . . . . . . . . . . . 14 -(2 / 6) = (-2 / 6)
232229, 231eqtr4i 2830 . . . . . . . . . . . . 13 (((4 − 1) − 5) / 6) = -(2 / 6)
233232fveq2i 6408 . . . . . . . . . . . 12 (⌊‘(((4 − 1) − 5) / 6)) = (⌊‘-(2 / 6))
234177, 91, 188ltleii 10442 . . . . . . . . . . . . . 14 (2 / 6) ≤ 1
235177, 91lenegi 10855 . . . . . . . . . . . . . 14 ((2 / 6) ≤ 1 ↔ -1 ≤ -(2 / 6))
236234, 235mpbi 221 . . . . . . . . . . . . 13 -1 ≤ -(2 / 6)
237175, 177ltnegi 10854 . . . . . . . . . . . . . . 15 (0 < (2 / 6) ↔ -(2 / 6) < -0)
238179, 237mpbi 221 . . . . . . . . . . . . . 14 -(2 / 6) < -0
239 neg0 10609 . . . . . . . . . . . . . . . 16 -0 = 0
240 1pneg1e0 11407 . . . . . . . . . . . . . . . 16 (1 + -1) = 0
241239, 240eqtr4i 2830 . . . . . . . . . . . . . . 15 -0 = (1 + -1)
242 neg1cn 11402 . . . . . . . . . . . . . . . 16 -1 ∈ ℂ
243242, 159addcomi 10509 . . . . . . . . . . . . . . 15 (-1 + 1) = (1 + -1)
244241, 243eqtr4i 2830 . . . . . . . . . . . . . 14 -0 = (-1 + 1)
245238, 244breqtri 4865 . . . . . . . . . . . . 13 -(2 / 6) < (-1 + 1)
246177renegcli 10624 . . . . . . . . . . . . . 14 -(2 / 6) ∈ ℝ
247 neg1z 11675 . . . . . . . . . . . . . 14 -1 ∈ ℤ
248 flbi 12837 . . . . . . . . . . . . . 14 ((-(2 / 6) ∈ ℝ ∧ -1 ∈ ℤ) → ((⌊‘-(2 / 6)) = -1 ↔ (-1 ≤ -(2 / 6) ∧ -(2 / 6) < (-1 + 1))))
249246, 247, 248mp2an 675 . . . . . . . . . . . . 13 ((⌊‘-(2 / 6)) = -1 ↔ (-1 ≤ -(2 / 6) ∧ -(2 / 6) < (-1 + 1)))
250236, 245, 249mpbir2an 693 . . . . . . . . . . . 12 (⌊‘-(2 / 6)) = -1
251233, 250eqtri 2827 . . . . . . . . . . 11 (⌊‘(((4 − 1) − 5) / 6)) = -1
252251oveq2i 6882 . . . . . . . . . 10 ((⌊‘(((⌊‘𝑁) − 5) / 6)) − (⌊‘(((4 − 1) − 5) / 6))) = ((⌊‘(((⌊‘𝑁) − 5) / 6)) − -1)
25373flcld 12819 . . . . . . . . . . . 12 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 5) / 6)) ∈ ℤ)
254253zcnd 11745 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (⌊‘(((⌊‘𝑁) − 5) / 6)) ∈ ℂ)
255 subneg 10612 . . . . . . . . . . 11 (((⌊‘(((⌊‘𝑁) − 5) / 6)) ∈ ℂ ∧ 1 ∈ ℂ) → ((⌊‘(((⌊‘𝑁) − 5) / 6)) − -1) = ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1))
256254, 159, 255sylancl 576 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘(((⌊‘𝑁) − 5) / 6)) − -1) = ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1))
257252, 256syl5eq 2851 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((⌊‘(((⌊‘𝑁) − 5) / 6)) − (⌊‘(((4 − 1) − 5) / 6))) = ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1))
258218, 257eqtrd 2839 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5}) = ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1))
259201, 258oveq12d 6889 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 1}) + (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) = 5})) = ((⌊‘(((⌊‘𝑁) − 1) / 6)) + ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1)))
260138, 259syl5eq 2851 . . . . . 6 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) = ((⌊‘(((⌊‘𝑁) − 1) / 6)) + ((⌊‘(((⌊‘𝑁) − 5) / 6)) + 1)))
26182recnd 10350 . . . . . . . . . . . . 13 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 𝑁 ∈ ℂ)
2622612timesd 11538 . . . . . . . . . . . 12 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (2 · 𝑁) = (𝑁 + 𝑁))
263 df-6 11364 . . . . . . . . . . . . . 14 6 = (5 + 1)
264220, 159addcomi 10509 . . . . . . . . . . . . . 14 (5 + 1) = (1 + 5)
265263, 264eqtri 2827 . . . . . . . . . . . . 13 6 = (1 + 5)
266265a1i 11 . . . . . . . . . . . 12 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 6 = (1 + 5))
267262, 266oveq12d 6889 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((2 · 𝑁) − 6) = ((𝑁 + 𝑁) − (1 + 5)))
268 addsub4 10606 . . . . . . . . . . . . 13 (((𝑁 ∈ ℂ ∧ 𝑁 ∈ ℂ) ∧ (1 ∈ ℂ ∧ 5 ∈ ℂ)) → ((𝑁 + 𝑁) − (1 + 5)) = ((𝑁 − 1) + (𝑁 − 5)))
269159, 220, 268mpanr12 688 . . . . . . . . . . . 12 ((𝑁 ∈ ℂ ∧ 𝑁 ∈ ℂ) → ((𝑁 + 𝑁) − (1 + 5)) = ((𝑁 − 1) + (𝑁 − 5)))
270261, 261, 269syl2anc 575 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((𝑁 + 𝑁) − (1 + 5)) = ((𝑁 − 1) + (𝑁 − 5)))
271267, 270eqtrd 2839 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((2 · 𝑁) − 6) = ((𝑁 − 1) + (𝑁 − 5)))
272271oveq1d 6886 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((2 · 𝑁) − 6) / 6) = (((𝑁 − 1) + (𝑁 − 5)) / 6))
273 mulcl 10302 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (2 · 𝑁) ∈ ℂ)
274170, 261, 273sylancr 577 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (2 · 𝑁) ∈ ℂ)
275182, 176pm3.2i 458 . . . . . . . . . . . 12 (6 ∈ ℂ ∧ 6 ≠ 0)
276 divsubdir 11003 . . . . . . . . . . . 12 (((2 · 𝑁) ∈ ℂ ∧ 6 ∈ ℂ ∧ (6 ∈ ℂ ∧ 6 ≠ 0)) → (((2 · 𝑁) − 6) / 6) = (((2 · 𝑁) / 6) − (6 / 6)))
277182, 275, 276mp3an23 1570 . . . . . . . . . . 11 ((2 · 𝑁) ∈ ℂ → (((2 · 𝑁) − 6) / 6) = (((2 · 𝑁) / 6) − (6 / 6)))
278274, 277syl 17 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((2 · 𝑁) − 6) / 6) = (((2 · 𝑁) / 6) − (6 / 6)))
279 3t2e6 11453 . . . . . . . . . . . . . 14 (3 · 2) = 6
280158, 170mulcomi 10330 . . . . . . . . . . . . . 14 (3 · 2) = (2 · 3)
281279, 280eqtr3i 2829 . . . . . . . . . . . . 13 6 = (2 · 3)
282281oveq2i 6882 . . . . . . . . . . . 12 ((2 · 𝑁) / 6) = ((2 · 𝑁) / (2 · 3))
283 3ne0 11394 . . . . . . . . . . . . . . 15 3 ≠ 0
284158, 283pm3.2i 458 . . . . . . . . . . . . . 14 (3 ∈ ℂ ∧ 3 ≠ 0)
285 2cnne0 11505 . . . . . . . . . . . . . 14 (2 ∈ ℂ ∧ 2 ≠ 0)
286 divcan5 11009 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0) ∧ (2 ∈ ℂ ∧ 2 ≠ 0)) → ((2 · 𝑁) / (2 · 3)) = (𝑁 / 3))
287284, 285, 286mp3an23 1570 . . . . . . . . . . . . 13 (𝑁 ∈ ℂ → ((2 · 𝑁) / (2 · 3)) = (𝑁 / 3))
288261, 287syl 17 . . . . . . . . . . . 12 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((2 · 𝑁) / (2 · 3)) = (𝑁 / 3))
289282, 288syl5eq 2851 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((2 · 𝑁) / 6) = (𝑁 / 3))
290182, 176dividi 11040 . . . . . . . . . . . 12 (6 / 6) = 1
291290a1i 11 . . . . . . . . . . 11 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (6 / 6) = 1)
292289, 291oveq12d 6889 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((2 · 𝑁) / 6) − (6 / 6)) = ((𝑁 / 3) − 1))
293278, 292eqtrd 2839 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((2 · 𝑁) − 6) / 6) = ((𝑁 / 3) − 1))
29479recnd 10350 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (𝑁 − 1) ∈ ℂ)
29584recnd 10350 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (𝑁 − 5) ∈ ℂ)
296 divdir 10992 . . . . . . . . . . 11 (((𝑁 − 1) ∈ ℂ ∧ (𝑁 − 5) ∈ ℂ ∧ (6 ∈ ℂ ∧ 6 ≠ 0)) → (((𝑁 − 1) + (𝑁 − 5)) / 6) = (((𝑁 − 1) / 6) + ((𝑁 − 5) / 6)))
297275, 296mp3an3 1567 . . . . . . . . . 10 (((𝑁 − 1) ∈ ℂ ∧ (𝑁 − 5) ∈ ℂ) → (((𝑁 − 1) + (𝑁 − 5)) / 6) = (((𝑁 − 1) / 6) + ((𝑁 − 5) / 6)))
298294, 295, 297syl2anc 575 . . . . . . . . 9 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((𝑁 − 1) + (𝑁 − 5)) / 6) = (((𝑁 − 1) / 6) + ((𝑁 − 5) / 6)))
299272, 293, 2983eqtr3d 2847 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((𝑁 / 3) − 1) = (((𝑁 − 1) / 6) + ((𝑁 − 5) / 6)))
300299oveq1d 6886 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((𝑁 / 3) − 1) + 1) = ((((𝑁 − 1) / 6) + ((𝑁 − 5) / 6)) + 1))
30121recnd 10350 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (𝑁 / 3) ∈ ℂ)
302 npcan 10572 . . . . . . . 8 (((𝑁 / 3) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑁 / 3) − 1) + 1) = (𝑁 / 3))
303301, 159, 302sylancl 576 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((𝑁 / 3) − 1) + 1) = (𝑁 / 3))
30481recnd 10350 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((𝑁 − 1) / 6) ∈ ℂ)
30586recnd 10350 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((𝑁 − 5) / 6) ∈ ℂ)
306159a1i 11 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 1 ∈ ℂ)
307304, 305, 306addassd 10344 . . . . . . 7 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((((𝑁 − 1) / 6) + ((𝑁 − 5) / 6)) + 1) = (((𝑁 − 1) / 6) + (((𝑁 − 5) / 6) + 1)))
308300, 303, 3073eqtr3d 2847 . . . . . 6 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (𝑁 / 3) = (((𝑁 − 1) / 6) + (((𝑁 − 5) / 6) + 1)))
309113, 260, 3083brtr4d 4872 . . . . 5 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (♯‘{𝑘 ∈ (4...(⌊‘𝑁)) ∣ (𝑘 mod 6) ∈ {1, 5}}) ≤ (𝑁 / 3))
3109, 17, 21, 59, 309letrd 10476 . . . 4 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → ((π𝑁) − 2) ≤ (𝑁 / 3))
3117a1i 11 . . . . 5 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → 2 ∈ ℝ)
3126, 311, 21lesubaddd 10906 . . . 4 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (((π𝑁) − 2) ≤ (𝑁 / 3) ↔ (π𝑁) ≤ ((𝑁 / 3) + 2)))
313310, 312mpbid 223 . . 3 ((𝑁 ∈ ℝ ∧ 3 ≤ 𝑁) → (π𝑁) ≤ ((𝑁 / 3) + 2))
314313adantlr 697 . 2 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 3 ≤ 𝑁) → (π𝑁) ≤ ((𝑁 / 3) + 2))
3155ad2antrr 708 . . 3 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → (π𝑁) ∈ ℝ)
3167a1i 11 . . 3 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → 2 ∈ ℝ)
31720ad2antrr 708 . . . 4 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → (𝑁 / 3) ∈ ℝ)
318 readdcl 10301 . . . 4 (((𝑁 / 3) ∈ ℝ ∧ 2 ∈ ℝ) → ((𝑁 / 3) + 2) ∈ ℝ)
319317, 7, 318sylancl 576 . . 3 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → ((𝑁 / 3) + 2) ∈ ℝ)
320 ppiwordi 25098 . . . . . 6 ((𝑁 ∈ ℝ ∧ 3 ∈ ℝ ∧ 𝑁 ≤ 3) → (π𝑁) ≤ (π‘3))
3211, 320mp3an2 1566 . . . . 5 ((𝑁 ∈ ℝ ∧ 𝑁 ≤ 3) → (π𝑁) ≤ (π‘3))
322321adantlr 697 . . . 4 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → (π𝑁) ≤ (π‘3))
323322, 24syl6breq 4881 . . 3 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → (π𝑁) ≤ 2)
324 3pos 11393 . . . . . 6 0 < 3
325 divge0 11174 . . . . . 6 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ (3 ∈ ℝ ∧ 0 < 3)) → 0 ≤ (𝑁 / 3))
3261, 324, 325mpanr12 688 . . . . 5 ((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) → 0 ≤ (𝑁 / 3))
327326adantr 468 . . . 4 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → 0 ≤ (𝑁 / 3))
328 addge02 10821 . . . . 5 ((2 ∈ ℝ ∧ (𝑁 / 3) ∈ ℝ) → (0 ≤ (𝑁 / 3) ↔ 2 ≤ ((𝑁 / 3) + 2)))
3297, 317, 328sylancr 577 . . . 4 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → (0 ≤ (𝑁 / 3) ↔ 2 ≤ ((𝑁 / 3) + 2)))
330327, 329mpbid 223 . . 3 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → 2 ≤ ((𝑁 / 3) + 2))
331315, 316, 319, 323, 330letrd 10476 . 2 (((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) ∧ 𝑁 ≤ 3) → (π𝑁) ≤ ((𝑁 / 3) + 2))
3322, 3, 314, 331lecasei 10425 1 ((𝑁 ∈ ℝ ∧ 0 ≤ 𝑁) → (π𝑁) ≤ ((𝑁 / 3) + 2))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 197  wa 384  wo 865   = wceq 1637  wcel 2158  wne 2977  {crab 3099  cun 3764  cin 3765  wss 3766  c0 4113  {cpr 4369   class class class wbr 4840  cfv 6098  (class class class)co 6871  cdom 8187  Fincfn 8189  cc 10216  cr 10217  0cc0 10218  1c1 10219   + caddc 10221   · cmul 10223   < clt 10356  cle 10357  cmin 10548  -cneg 10549   / cdiv 10966  cn 11302  2c2 11352  3c3 11353  4c4 11354  5c5 11355  6c6 11356  0cn0 11555  cz 11639  cuz 11900  +crp 12042  ...cfz 12545  cfl 12811   mod cmo 12888  chash 13333  cdvds 15199  cprime 15599  πcppi 25030
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1880  ax-4 1897  ax-5 2004  ax-6 2070  ax-7 2106  ax-8 2160  ax-9 2167  ax-10 2187  ax-11 2203  ax-12 2216  ax-13 2422  ax-ext 2784  ax-rep 4960  ax-sep 4971  ax-nul 4980  ax-pow 5032  ax-pr 5093  ax-un 7176  ax-cnex 10274  ax-resscn 10275  ax-1cn 10276  ax-icn 10277  ax-addcl 10278  ax-addrcl 10279  ax-mulcl 10280  ax-mulrcl 10281  ax-mulcom 10282  ax-addass 10283  ax-mulass 10284  ax-distr 10285  ax-i2m1 10286  ax-1ne0 10287  ax-1rid 10288  ax-rnegex 10289  ax-rrecex 10290  ax-cnre 10291  ax-pre-lttri 10292  ax-pre-lttrn 10293  ax-pre-ltadd 10294  ax-pre-mulgt0 10295  ax-pre-sup 10296
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-3or 1101  df-3an 1102  df-tru 1641  df-ex 1860  df-nf 1865  df-sb 2063  df-eu 2636  df-mo 2637  df-clab 2792  df-cleq 2798  df-clel 2801  df-nfc 2936  df-ne 2978  df-nel 3081  df-ral 3100  df-rex 3101  df-reu 3102  df-rmo 3103  df-rab 3104  df-v 3392  df-sbc 3631  df-csb 3726  df-dif 3769  df-un 3771  df-in 3773  df-ss 3780  df-pss 3782  df-nul 4114  df-if 4277  df-pw 4350  df-sn 4368  df-pr 4370  df-tp 4372  df-op 4374  df-uni 4627  df-int 4666  df-iun 4710  df-br 4841  df-opab 4903  df-mpt 4920  df-tr 4943  df-id 5216  df-eprel 5221  df-po 5229  df-so 5230  df-fr 5267  df-we 5269  df-xp 5314  df-rel 5315  df-cnv 5316  df-co 5317  df-dm 5318  df-rn 5319  df-res 5320  df-ima 5321  df-pred 5890  df-ord 5936  df-on 5937  df-lim 5938  df-suc 5939  df-iota 6061  df-fun 6100  df-fn 6101  df-f 6102  df-f1 6103  df-fo 6104  df-f1o 6105  df-fv 6106  df-riota 6832  df-ov 6874  df-oprab 6875  df-mpt2 6876  df-om 7293  df-1st 7395  df-2nd 7396  df-wrecs 7639  df-recs 7701  df-rdg 7739  df-1o 7793  df-2o 7794  df-oadd 7797  df-er 7976  df-en 8190  df-dom 8191  df-sdom 8192  df-fin 8193  df-sup 8584  df-inf 8585  df-card 9045  df-cda 9272  df-pnf 10358  df-mnf 10359  df-xr 10360  df-ltxr 10361  df-le 10362  df-sub 10550  df-neg 10551  df-div 10967  df-nn 11303  df-2 11360  df-3 11361  df-4 11362  df-5 11363  df-6 11364  df-n0 11556  df-xnn0 11626  df-z 11640  df-uz 11901  df-rp 12043  df-icc 12396  df-fz 12546  df-fl 12813  df-mod 12889  df-seq 13021  df-exp 13080  df-hash 13334  df-cj 14058  df-re 14059  df-im 14060  df-sqrt 14194  df-abs 14195  df-dvds 15200  df-prm 15600  df-ppi 25036
This theorem is referenced by:  bposlem5  25223
  Copyright terms: Public domain W3C validator