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

Theorem chtppilimlem1 27436
Description: Lemma for chtppilim 27438. (Contributed by Mario Carneiro, 22-Sep-2014.)
Hypotheses
Ref Expression
chtppilim.1 (𝜑𝐴 ∈ ℝ+)
chtppilim.2 (𝜑𝐴 < 1)
chtppilim.3 (𝜑𝑁 ∈ (2[,)+∞))
chtppilim.4 (𝜑 → ((𝑁𝑐𝐴) / (π𝑁)) < (1 − 𝐴))
Assertion
Ref Expression
chtppilimlem1 (𝜑 → ((𝐴↑2) · ((π𝑁) · (log‘𝑁))) < (θ‘𝑁))

Proof of Theorem chtppilimlem1
Dummy variable 𝑝 is distinct from all other variables.
StepHypRef Expression
1 chtppilim.1 . . . . . . 7 (𝜑𝐴 ∈ ℝ+)
21rpred 12986 . . . . . 6 (𝜑𝐴 ∈ ℝ)
32recnd 11173 . . . . 5 (𝜑𝐴 ∈ ℂ)
43sqvald 14105 . . . 4 (𝜑 → (𝐴↑2) = (𝐴 · 𝐴))
54oveq1d 7382 . . 3 (𝜑 → ((𝐴↑2) · ((π𝑁) · (log‘𝑁))) = ((𝐴 · 𝐴) · ((π𝑁) · (log‘𝑁))))
6 chtppilim.3 . . . . . . . . 9 (𝜑𝑁 ∈ (2[,)+∞))
7 2re 12255 . . . . . . . . . 10 2 ∈ ℝ
8 elicopnf 13398 . . . . . . . . . 10 (2 ∈ ℝ → (𝑁 ∈ (2[,)+∞) ↔ (𝑁 ∈ ℝ ∧ 2 ≤ 𝑁)))
97, 8ax-mp 5 . . . . . . . . 9 (𝑁 ∈ (2[,)+∞) ↔ (𝑁 ∈ ℝ ∧ 2 ≤ 𝑁))
106, 9sylib 218 . . . . . . . 8 (𝜑 → (𝑁 ∈ ℝ ∧ 2 ≤ 𝑁))
1110simpld 494 . . . . . . 7 (𝜑𝑁 ∈ ℝ)
12 ppicl 27094 . . . . . . 7 (𝑁 ∈ ℝ → (π𝑁) ∈ ℕ0)
1311, 12syl 17 . . . . . 6 (𝜑 → (π𝑁) ∈ ℕ0)
1413nn0red 12499 . . . . 5 (𝜑 → (π𝑁) ∈ ℝ)
1514recnd 11173 . . . 4 (𝜑 → (π𝑁) ∈ ℂ)
16 0red 11147 . . . . . . . 8 (𝜑 → 0 ∈ ℝ)
177a1i 11 . . . . . . . 8 (𝜑 → 2 ∈ ℝ)
18 2pos 12284 . . . . . . . . 9 0 < 2
1918a1i 11 . . . . . . . 8 (𝜑 → 0 < 2)
2010simprd 495 . . . . . . . 8 (𝜑 → 2 ≤ 𝑁)
2116, 17, 11, 19, 20ltletrd 11306 . . . . . . 7 (𝜑 → 0 < 𝑁)
2211, 21elrpd 12983 . . . . . 6 (𝜑𝑁 ∈ ℝ+)
2322relogcld 26587 . . . . 5 (𝜑 → (log‘𝑁) ∈ ℝ)
2423recnd 11173 . . . 4 (𝜑 → (log‘𝑁) ∈ ℂ)
253, 3, 15, 24mul4d 11358 . . 3 (𝜑 → ((𝐴 · 𝐴) · ((π𝑁) · (log‘𝑁))) = ((𝐴 · (π𝑁)) · (𝐴 · (log‘𝑁))))
265, 25eqtrd 2771 . 2 (𝜑 → ((𝐴↑2) · ((π𝑁) · (log‘𝑁))) = ((𝐴 · (π𝑁)) · (𝐴 · (log‘𝑁))))
272, 14remulcld 11175 . . . 4 (𝜑 → (𝐴 · (π𝑁)) ∈ ℝ)
282, 23remulcld 11175 . . . 4 (𝜑 → (𝐴 · (log‘𝑁)) ∈ ℝ)
2927, 28remulcld 11175 . . 3 (𝜑 → ((𝐴 · (π𝑁)) · (𝐴 · (log‘𝑁))) ∈ ℝ)
3022, 2rpcxpcld 26697 . . . . . . . 8 (𝜑 → (𝑁𝑐𝐴) ∈ ℝ+)
3130rpred 12986 . . . . . . 7 (𝜑 → (𝑁𝑐𝐴) ∈ ℝ)
32 ppicl 27094 . . . . . . 7 ((𝑁𝑐𝐴) ∈ ℝ → (π‘(𝑁𝑐𝐴)) ∈ ℕ0)
3331, 32syl 17 . . . . . 6 (𝜑 → (π‘(𝑁𝑐𝐴)) ∈ ℕ0)
3433nn0red 12499 . . . . 5 (𝜑 → (π‘(𝑁𝑐𝐴)) ∈ ℝ)
3514, 34resubcld 11578 . . . 4 (𝜑 → ((π𝑁) − (π‘(𝑁𝑐𝐴))) ∈ ℝ)
3635, 28remulcld 11175 . . 3 (𝜑 → (((π𝑁) − (π‘(𝑁𝑐𝐴))) · (𝐴 · (log‘𝑁))) ∈ ℝ)
37 chtcl 27072 . . . 4 (𝑁 ∈ ℝ → (θ‘𝑁) ∈ ℝ)
3811, 37syl 17 . . 3 (𝜑 → (θ‘𝑁) ∈ ℝ)
39 1red 11145 . . . . . . 7 (𝜑 → 1 ∈ ℝ)
40 1lt2 12347 . . . . . . . 8 1 < 2
4140a1i 11 . . . . . . 7 (𝜑 → 1 < 2)
4239, 17, 11, 41, 20ltletrd 11306 . . . . . 6 (𝜑 → 1 < 𝑁)
4311, 42rplogcld 26593 . . . . 5 (𝜑 → (log‘𝑁) ∈ ℝ+)
441, 43rpmulcld 13002 . . . 4 (𝜑 → (𝐴 · (log‘𝑁)) ∈ ℝ+)
4514, 31resubcld 11578 . . . . 5 (𝜑 → ((π𝑁) − (𝑁𝑐𝐴)) ∈ ℝ)
46 ppinncl 27137 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 2 ≤ 𝑁) → (π𝑁) ∈ ℕ)
4710, 46syl 17 . . . . . . . . 9 (𝜑 → (π𝑁) ∈ ℕ)
4831, 47nndivred 12231 . . . . . . . 8 (𝜑 → ((𝑁𝑐𝐴) / (π𝑁)) ∈ ℝ)
49 chtppilim.4 . . . . . . . 8 (𝜑 → ((𝑁𝑐𝐴) / (π𝑁)) < (1 − 𝐴))
5048, 39, 2, 49ltsub13d 11756 . . . . . . 7 (𝜑𝐴 < (1 − ((𝑁𝑐𝐴) / (π𝑁))))
5131recnd 11173 . . . . . . . . 9 (𝜑 → (𝑁𝑐𝐴) ∈ ℂ)
5247nnrpd 12984 . . . . . . . . . 10 (𝜑 → (π𝑁) ∈ ℝ+)
5352rpcnne0d 12995 . . . . . . . . 9 (𝜑 → ((π𝑁) ∈ ℂ ∧ (π𝑁) ≠ 0))
54 divsubdir 11848 . . . . . . . . 9 (((π𝑁) ∈ ℂ ∧ (𝑁𝑐𝐴) ∈ ℂ ∧ ((π𝑁) ∈ ℂ ∧ (π𝑁) ≠ 0)) → (((π𝑁) − (𝑁𝑐𝐴)) / (π𝑁)) = (((π𝑁) / (π𝑁)) − ((𝑁𝑐𝐴) / (π𝑁))))
5515, 51, 53, 54syl3anc 1374 . . . . . . . 8 (𝜑 → (((π𝑁) − (𝑁𝑐𝐴)) / (π𝑁)) = (((π𝑁) / (π𝑁)) − ((𝑁𝑐𝐴) / (π𝑁))))
56 divid 11840 . . . . . . . . . 10 (((π𝑁) ∈ ℂ ∧ (π𝑁) ≠ 0) → ((π𝑁) / (π𝑁)) = 1)
5753, 56syl 17 . . . . . . . . 9 (𝜑 → ((π𝑁) / (π𝑁)) = 1)
5857oveq1d 7382 . . . . . . . 8 (𝜑 → (((π𝑁) / (π𝑁)) − ((𝑁𝑐𝐴) / (π𝑁))) = (1 − ((𝑁𝑐𝐴) / (π𝑁))))
5955, 58eqtrd 2771 . . . . . . 7 (𝜑 → (((π𝑁) − (𝑁𝑐𝐴)) / (π𝑁)) = (1 − ((𝑁𝑐𝐴) / (π𝑁))))
6050, 59breqtrrd 5113 . . . . . 6 (𝜑𝐴 < (((π𝑁) − (𝑁𝑐𝐴)) / (π𝑁)))
612, 45, 52ltmuldivd 13033 . . . . . 6 (𝜑 → ((𝐴 · (π𝑁)) < ((π𝑁) − (𝑁𝑐𝐴)) ↔ 𝐴 < (((π𝑁) − (𝑁𝑐𝐴)) / (π𝑁))))
6260, 61mpbird 257 . . . . 5 (𝜑 → (𝐴 · (π𝑁)) < ((π𝑁) − (𝑁𝑐𝐴)))
63 ppiltx 27140 . . . . . . 7 ((𝑁𝑐𝐴) ∈ ℝ+ → (π‘(𝑁𝑐𝐴)) < (𝑁𝑐𝐴))
6430, 63syl 17 . . . . . 6 (𝜑 → (π‘(𝑁𝑐𝐴)) < (𝑁𝑐𝐴))
6534, 31, 14, 64ltsub2dd 11763 . . . . 5 (𝜑 → ((π𝑁) − (𝑁𝑐𝐴)) < ((π𝑁) − (π‘(𝑁𝑐𝐴))))
6627, 45, 35, 62, 65lttrd 11307 . . . 4 (𝜑 → (𝐴 · (π𝑁)) < ((π𝑁) − (π‘(𝑁𝑐𝐴))))
6727, 35, 44, 66ltmul1dd 13041 . . 3 (𝜑 → ((𝐴 · (π𝑁)) · (𝐴 · (log‘𝑁))) < (((π𝑁) − (π‘(𝑁𝑐𝐴))) · (𝐴 · (log‘𝑁))))
68 fzfid 13935 . . . . . 6 (𝜑 → (((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∈ Fin)
69 inss1 4177 . . . . . 6 ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ) ⊆ (((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁))
70 ssfi 9107 . . . . . 6 (((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∈ Fin ∧ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ) ⊆ (((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁))) → ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ) ∈ Fin)
7168, 69, 70sylancl 587 . . . . 5 (𝜑 → ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ) ∈ Fin)
72 simpr 484 . . . . . . . 8 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ))
7372elin2d 4145 . . . . . . 7 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ℙ)
74 prmnn 16643 . . . . . . . 8 (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
7574nnrpd 12984 . . . . . . 7 (𝑝 ∈ ℙ → 𝑝 ∈ ℝ+)
7673, 75syl 17 . . . . . 6 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ℝ+)
7776relogcld 26587 . . . . 5 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (log‘𝑝) ∈ ℝ)
7871, 77fsumrecl 15696 . . . 4 (𝜑 → Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝) ∈ ℝ)
7928recnd 11173 . . . . . . 7 (𝜑 → (𝐴 · (log‘𝑁)) ∈ ℂ)
80 fsumconst 15752 . . . . . . 7 ((((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ) ∈ Fin ∧ (𝐴 · (log‘𝑁)) ∈ ℂ) → Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(𝐴 · (log‘𝑁)) = ((♯‘((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) · (𝐴 · (log‘𝑁))))
8171, 79, 80syl2anc 585 . . . . . 6 (𝜑 → Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(𝐴 · (log‘𝑁)) = ((♯‘((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) · (𝐴 · (log‘𝑁))))
82 ppifl 27123 . . . . . . . . . 10 (𝑁 ∈ ℝ → (π‘(⌊‘𝑁)) = (π𝑁))
8311, 82syl 17 . . . . . . . . 9 (𝜑 → (π‘(⌊‘𝑁)) = (π𝑁))
84 ppifl 27123 . . . . . . . . . 10 ((𝑁𝑐𝐴) ∈ ℝ → (π‘(⌊‘(𝑁𝑐𝐴))) = (π‘(𝑁𝑐𝐴)))
8531, 84syl 17 . . . . . . . . 9 (𝜑 → (π‘(⌊‘(𝑁𝑐𝐴))) = (π‘(𝑁𝑐𝐴)))
8683, 85oveq12d 7385 . . . . . . . 8 (𝜑 → ((π‘(⌊‘𝑁)) − (π‘(⌊‘(𝑁𝑐𝐴)))) = ((π𝑁) − (π‘(𝑁𝑐𝐴))))
8739, 11, 42ltled 11294 . . . . . . . . . . . 12 (𝜑 → 1 ≤ 𝑁)
88 chtppilim.2 . . . . . . . . . . . . 13 (𝜑𝐴 < 1)
89 1re 11144 . . . . . . . . . . . . . 14 1 ∈ ℝ
90 ltle 11234 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℝ ∧ 1 ∈ ℝ) → (𝐴 < 1 → 𝐴 ≤ 1))
912, 89, 90sylancl 587 . . . . . . . . . . . . 13 (𝜑 → (𝐴 < 1 → 𝐴 ≤ 1))
9288, 91mpd 15 . . . . . . . . . . . 12 (𝜑𝐴 ≤ 1)
9311, 87, 2, 39, 92cxplead 26685 . . . . . . . . . . 11 (𝜑 → (𝑁𝑐𝐴) ≤ (𝑁𝑐1))
9411recnd 11173 . . . . . . . . . . . 12 (𝜑𝑁 ∈ ℂ)
9594cxp1d 26670 . . . . . . . . . . 11 (𝜑 → (𝑁𝑐1) = 𝑁)
9693, 95breqtrd 5111 . . . . . . . . . 10 (𝜑 → (𝑁𝑐𝐴) ≤ 𝑁)
97 flword2 13772 . . . . . . . . . 10 (((𝑁𝑐𝐴) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ (𝑁𝑐𝐴) ≤ 𝑁) → (⌊‘𝑁) ∈ (ℤ‘(⌊‘(𝑁𝑐𝐴))))
9831, 11, 96, 97syl3anc 1374 . . . . . . . . 9 (𝜑 → (⌊‘𝑁) ∈ (ℤ‘(⌊‘(𝑁𝑐𝐴))))
99 ppidif 27126 . . . . . . . . 9 ((⌊‘𝑁) ∈ (ℤ‘(⌊‘(𝑁𝑐𝐴))) → ((π‘(⌊‘𝑁)) − (π‘(⌊‘(𝑁𝑐𝐴)))) = (♯‘((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)))
10098, 99syl 17 . . . . . . . 8 (𝜑 → ((π‘(⌊‘𝑁)) − (π‘(⌊‘(𝑁𝑐𝐴)))) = (♯‘((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)))
10186, 100eqtr3d 2773 . . . . . . 7 (𝜑 → ((π𝑁) − (π‘(𝑁𝑐𝐴))) = (♯‘((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)))
102101oveq1d 7382 . . . . . 6 (𝜑 → (((π𝑁) − (π‘(𝑁𝑐𝐴))) · (𝐴 · (log‘𝑁))) = ((♯‘((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) · (𝐴 · (log‘𝑁))))
10381, 102eqtr4d 2774 . . . . 5 (𝜑 → Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(𝐴 · (log‘𝑁)) = (((π𝑁) − (π‘(𝑁𝑐𝐴))) · (𝐴 · (log‘𝑁))))
10428adantr 480 . . . . . 6 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (𝐴 · (log‘𝑁)) ∈ ℝ)
10531adantr 480 . . . . . . . . 9 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (𝑁𝑐𝐴) ∈ ℝ)
106 reflcl 13755 . . . . . . . . . . 11 ((𝑁𝑐𝐴) ∈ ℝ → (⌊‘(𝑁𝑐𝐴)) ∈ ℝ)
107 peano2re 11319 . . . . . . . . . . 11 ((⌊‘(𝑁𝑐𝐴)) ∈ ℝ → ((⌊‘(𝑁𝑐𝐴)) + 1) ∈ ℝ)
10831, 106, 1073syl 18 . . . . . . . . . 10 (𝜑 → ((⌊‘(𝑁𝑐𝐴)) + 1) ∈ ℝ)
109108adantr 480 . . . . . . . . 9 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → ((⌊‘(𝑁𝑐𝐴)) + 1) ∈ ℝ)
11076rpred 12986 . . . . . . . . 9 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ℝ)
111 fllep1 13760 . . . . . . . . . . 11 ((𝑁𝑐𝐴) ∈ ℝ → (𝑁𝑐𝐴) ≤ ((⌊‘(𝑁𝑐𝐴)) + 1))
11231, 111syl 17 . . . . . . . . . 10 (𝜑 → (𝑁𝑐𝐴) ≤ ((⌊‘(𝑁𝑐𝐴)) + 1))
113112adantr 480 . . . . . . . . 9 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (𝑁𝑐𝐴) ≤ ((⌊‘(𝑁𝑐𝐴)) + 1))
11472elin1d 4144 . . . . . . . . . 10 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ (((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)))
115 elfzle1 13481 . . . . . . . . . 10 (𝑝 ∈ (((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) → ((⌊‘(𝑁𝑐𝐴)) + 1) ≤ 𝑝)
116114, 115syl 17 . . . . . . . . 9 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → ((⌊‘(𝑁𝑐𝐴)) + 1) ≤ 𝑝)
117105, 109, 110, 113, 116letrd 11303 . . . . . . . 8 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (𝑁𝑐𝐴) ≤ 𝑝)
11822rpne0d 12991 . . . . . . . . . . 11 (𝜑𝑁 ≠ 0)
11994, 118, 3cxpefd 26676 . . . . . . . . . 10 (𝜑 → (𝑁𝑐𝐴) = (exp‘(𝐴 · (log‘𝑁))))
120119eqcomd 2742 . . . . . . . . 9 (𝜑 → (exp‘(𝐴 · (log‘𝑁))) = (𝑁𝑐𝐴))
121120adantr 480 . . . . . . . 8 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (exp‘(𝐴 · (log‘𝑁))) = (𝑁𝑐𝐴))
12276reeflogd 26588 . . . . . . . 8 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (exp‘(log‘𝑝)) = 𝑝)
123117, 121, 1223brtr4d 5117 . . . . . . 7 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (exp‘(𝐴 · (log‘𝑁))) ≤ (exp‘(log‘𝑝)))
124 efle 16085 . . . . . . . 8 (((𝐴 · (log‘𝑁)) ∈ ℝ ∧ (log‘𝑝) ∈ ℝ) → ((𝐴 · (log‘𝑁)) ≤ (log‘𝑝) ↔ (exp‘(𝐴 · (log‘𝑁))) ≤ (exp‘(log‘𝑝))))
125104, 77, 124syl2anc 585 . . . . . . 7 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → ((𝐴 · (log‘𝑁)) ≤ (log‘𝑝) ↔ (exp‘(𝐴 · (log‘𝑁))) ≤ (exp‘(log‘𝑝))))
126123, 125mpbird 257 . . . . . 6 ((𝜑𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)) → (𝐴 · (log‘𝑁)) ≤ (log‘𝑝))
12771, 104, 77, 126fsumle 15762 . . . . 5 (𝜑 → Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(𝐴 · (log‘𝑁)) ≤ Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝))
128103, 127eqbrtrrd 5109 . . . 4 (𝜑 → (((π𝑁) − (π‘(𝑁𝑐𝐴))) · (𝐴 · (log‘𝑁))) ≤ Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝))
129 fzfid 13935 . . . . . . 7 (𝜑 → (1...(⌊‘𝑁)) ∈ Fin)
130 inss1 4177 . . . . . . 7 ((1...(⌊‘𝑁)) ∩ ℙ) ⊆ (1...(⌊‘𝑁))
131 ssfi 9107 . . . . . . 7 (((1...(⌊‘𝑁)) ∈ Fin ∧ ((1...(⌊‘𝑁)) ∩ ℙ) ⊆ (1...(⌊‘𝑁))) → ((1...(⌊‘𝑁)) ∩ ℙ) ∈ Fin)
132129, 130, 131sylancl 587 . . . . . 6 (𝜑 → ((1...(⌊‘𝑁)) ∩ ℙ) ∈ Fin)
133 simpr 484 . . . . . . . . . . . . 13 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ))
134133elin2d 4145 . . . . . . . . . . . 12 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ℙ)
135 prmuz2 16665 . . . . . . . . . . . 12 (𝑝 ∈ ℙ → 𝑝 ∈ (ℤ‘2))
136134, 135syl 17 . . . . . . . . . . 11 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ (ℤ‘2))
137 eluz2b2 12871 . . . . . . . . . . 11 (𝑝 ∈ (ℤ‘2) ↔ (𝑝 ∈ ℕ ∧ 1 < 𝑝))
138136, 137sylib 218 . . . . . . . . . 10 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → (𝑝 ∈ ℕ ∧ 1 < 𝑝))
139138simpld 494 . . . . . . . . 9 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ℕ)
140139nnred 12189 . . . . . . . 8 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → 𝑝 ∈ ℝ)
141138simprd 495 . . . . . . . 8 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → 1 < 𝑝)
142140, 141rplogcld 26593 . . . . . . 7 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → (log‘𝑝) ∈ ℝ+)
143142rpred 12986 . . . . . 6 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → (log‘𝑝) ∈ ℝ)
144142rpge0d 12990 . . . . . 6 ((𝜑𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)) → 0 ≤ (log‘𝑝))
14530rpge0d 12990 . . . . . . . . . 10 (𝜑 → 0 ≤ (𝑁𝑐𝐴))
146 flge0nn0 13779 . . . . . . . . . 10 (((𝑁𝑐𝐴) ∈ ℝ ∧ 0 ≤ (𝑁𝑐𝐴)) → (⌊‘(𝑁𝑐𝐴)) ∈ ℕ0)
14731, 145, 146syl2anc 585 . . . . . . . . 9 (𝜑 → (⌊‘(𝑁𝑐𝐴)) ∈ ℕ0)
148 nn0p1nn 12476 . . . . . . . . 9 ((⌊‘(𝑁𝑐𝐴)) ∈ ℕ0 → ((⌊‘(𝑁𝑐𝐴)) + 1) ∈ ℕ)
149147, 148syl 17 . . . . . . . 8 (𝜑 → ((⌊‘(𝑁𝑐𝐴)) + 1) ∈ ℕ)
150 nnuz 12827 . . . . . . . 8 ℕ = (ℤ‘1)
151149, 150eleqtrdi 2846 . . . . . . 7 (𝜑 → ((⌊‘(𝑁𝑐𝐴)) + 1) ∈ (ℤ‘1))
152 fzss1 13517 . . . . . . 7 (((⌊‘(𝑁𝑐𝐴)) + 1) ∈ (ℤ‘1) → (((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ⊆ (1...(⌊‘𝑁)))
153 ssrin 4182 . . . . . . 7 ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ⊆ (1...(⌊‘𝑁)) → ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ) ⊆ ((1...(⌊‘𝑁)) ∩ ℙ))
154151, 152, 1533syl 18 . . . . . 6 (𝜑 → ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ) ⊆ ((1...(⌊‘𝑁)) ∩ ℙ))
155132, 143, 144, 154fsumless 15759 . . . . 5 (𝜑 → Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝) ≤ Σ𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝))
156 chtval 27073 . . . . . . 7 (𝑁 ∈ ℝ → (θ‘𝑁) = Σ𝑝 ∈ ((0[,]𝑁) ∩ ℙ)(log‘𝑝))
15711, 156syl 17 . . . . . 6 (𝜑 → (θ‘𝑁) = Σ𝑝 ∈ ((0[,]𝑁) ∩ ℙ)(log‘𝑝))
158 2eluzge1 12832 . . . . . . . 8 2 ∈ (ℤ‘1)
159 ppisval2 27068 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ 2 ∈ (ℤ‘1)) → ((0[,]𝑁) ∩ ℙ) = ((1...(⌊‘𝑁)) ∩ ℙ))
16011, 158, 159sylancl 587 . . . . . . 7 (𝜑 → ((0[,]𝑁) ∩ ℙ) = ((1...(⌊‘𝑁)) ∩ ℙ))
161160sumeq1d 15662 . . . . . 6 (𝜑 → Σ𝑝 ∈ ((0[,]𝑁) ∩ ℙ)(log‘𝑝) = Σ𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝))
162157, 161eqtrd 2771 . . . . 5 (𝜑 → (θ‘𝑁) = Σ𝑝 ∈ ((1...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝))
163155, 162breqtrrd 5113 . . . 4 (𝜑 → Σ𝑝 ∈ ((((⌊‘(𝑁𝑐𝐴)) + 1)...(⌊‘𝑁)) ∩ ℙ)(log‘𝑝) ≤ (θ‘𝑁))
16436, 78, 38, 128, 163letrd 11303 . . 3 (𝜑 → (((π𝑁) − (π‘(𝑁𝑐𝐴))) · (𝐴 · (log‘𝑁))) ≤ (θ‘𝑁))
16529, 36, 38, 67, 164ltletrd 11306 . 2 (𝜑 → ((𝐴 · (π𝑁)) · (𝐴 · (log‘𝑁))) < (θ‘𝑁))
16626, 165eqbrtrd 5107 1 (𝜑 → ((𝐴↑2) · ((π𝑁) · (log‘𝑁))) < (θ‘𝑁))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1542  wcel 2114  wne 2932  cin 3888  wss 3889   class class class wbr 5085  cfv 6498  (class class class)co 7367  Fincfn 8893  cc 11036  cr 11037  0cc0 11038  1c1 11039   + caddc 11041   · cmul 11043  +∞cpnf 11176   < clt 11179  cle 11180  cmin 11377   / cdiv 11807  cn 12174  2c2 12236  0cn0 12437  cuz 12788  +crp 12942  [,)cico 13300  [,]cicc 13301  ...cfz 13461  cfl 13749  cexp 14023  chash 14292  Σcsu 15648  expce 16026  cprime 16640  logclog 26518  𝑐ccxp 26519  θccht 27054  πcppi 27057
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2708  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5307  ax-pr 5375  ax-un 7689  ax-inf2 9562  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116  ax-addf 11117
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3062  df-rmo 3342  df-reu 3343  df-rab 3390  df-v 3431  df-sbc 3729  df-csb 3838  df-dif 3892  df-un 3894  df-in 3896  df-ss 3906  df-pss 3909  df-nul 4274  df-if 4467  df-pw 4543  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4851  df-int 4890  df-iun 4935  df-iin 4936  df-br 5086  df-opab 5148  df-mpt 5167  df-tr 5193  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-se 5585  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6265  df-ord 6326  df-on 6327  df-lim 6328  df-suc 6329  df-iota 6454  df-fun 6500  df-fn 6501  df-f 6502  df-f1 6503  df-fo 6504  df-f1o 6505  df-fv 6506  df-isom 6507  df-riota 7324  df-ov 7370  df-oprab 7371  df-mpo 7372  df-of 7631  df-om 7818  df-1st 7942  df-2nd 7943  df-supp 8111  df-frecs 8231  df-wrecs 8262  df-recs 8311  df-rdg 8349  df-1o 8405  df-2o 8406  df-oadd 8409  df-er 8643  df-map 8775  df-pm 8776  df-ixp 8846  df-en 8894  df-dom 8895  df-sdom 8896  df-fin 8897  df-fsupp 9275  df-fi 9324  df-sup 9355  df-inf 9356  df-oi 9425  df-dju 9825  df-card 9863  df-pnf 11181  df-mnf 11182  df-xr 11183  df-ltxr 11184  df-le 11185  df-sub 11379  df-neg 11380  df-div 11808  df-nn 12175  df-2 12244  df-3 12245  df-4 12246  df-5 12247  df-6 12248  df-7 12249  df-8 12250  df-9 12251  df-n0 12438  df-xnn0 12511  df-z 12525  df-dec 12645  df-uz 12789  df-q 12899  df-rp 12943  df-xneg 13063  df-xadd 13064  df-xmul 13065  df-ioo 13302  df-ioc 13303  df-ico 13304  df-icc 13305  df-fz 13462  df-fzo 13609  df-fl 13751  df-mod 13829  df-seq 13964  df-exp 14024  df-fac 14236  df-bc 14265  df-hash 14293  df-shft 15029  df-cj 15061  df-re 15062  df-im 15063  df-sqrt 15197  df-abs 15198  df-limsup 15433  df-clim 15450  df-rlim 15451  df-sum 15649  df-ef 16032  df-sin 16034  df-cos 16035  df-pi 16037  df-dvds 16222  df-prm 16641  df-struct 17117  df-sets 17134  df-slot 17152  df-ndx 17164  df-base 17180  df-ress 17201  df-plusg 17233  df-mulr 17234  df-starv 17235  df-sca 17236  df-vsca 17237  df-ip 17238  df-tset 17239  df-ple 17240  df-ds 17242  df-unif 17243  df-hom 17244  df-cco 17245  df-rest 17385  df-topn 17386  df-0g 17404  df-gsum 17405  df-topgen 17406  df-pt 17407  df-prds 17410  df-xrs 17466  df-qtop 17471  df-imas 17472  df-xps 17474  df-mre 17548  df-mrc 17549  df-acs 17551  df-mgm 18608  df-sgrp 18687  df-mnd 18703  df-submnd 18752  df-mulg 19044  df-cntz 19292  df-cmn 19757  df-psmet 21344  df-xmet 21345  df-met 21346  df-bl 21347  df-mopn 21348  df-fbas 21349  df-fg 21350  df-cnfld 21353  df-top 22859  df-topon 22876  df-topsp 22898  df-bases 22911  df-cld 22984  df-ntr 22985  df-cls 22986  df-nei 23063  df-lp 23101  df-perf 23102  df-cn 23192  df-cnp 23193  df-haus 23280  df-tx 23527  df-hmeo 23720  df-fil 23811  df-fm 23903  df-flim 23904  df-flf 23905  df-xms 24285  df-ms 24286  df-tms 24287  df-cncf 24845  df-limc 25833  df-dv 25834  df-log 26520  df-cxp 26521  df-cht 27060  df-ppi 27063
This theorem is referenced by:  chtppilimlem2  27437
  Copyright terms: Public domain W3C validator