| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | breq2 5146 | . . . . . . 7
⊢ (𝑧 = 𝑥 → (𝑦 < 𝑧 ↔ 𝑦 < 𝑥)) | 
| 2 |  | oveq2 7440 | . . . . . . . 8
⊢ (𝑧 = 𝑥 → ((1 + (𝐿 · 𝐸)) · 𝑧) = ((1 + (𝐿 · 𝐸)) · 𝑥)) | 
| 3 | 2 | breq1d 5152 | . . . . . . 7
⊢ (𝑧 = 𝑥 → (((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦) ↔ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦))) | 
| 4 | 1, 3 | anbi12d 632 | . . . . . 6
⊢ (𝑧 = 𝑥 → ((𝑦 < 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ↔ (𝑦 < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦)))) | 
| 5 |  | id 22 | . . . . . . . 8
⊢ (𝑧 = 𝑥 → 𝑧 = 𝑥) | 
| 6 | 5, 2 | oveq12d 7450 | . . . . . . 7
⊢ (𝑧 = 𝑥 → (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧)) = (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))) | 
| 7 | 6 | raleqdv 3325 | . . . . . 6
⊢ (𝑧 = 𝑥 → (∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸 ↔ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸)) | 
| 8 | 4, 7 | anbi12d 632 | . . . . 5
⊢ (𝑧 = 𝑥 → (((𝑦 < 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸) ↔ ((𝑦 < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) | 
| 9 | 8 | cbvrexvw 3237 | . . . 4
⊢
(∃𝑧 ∈
ℝ+ ((𝑦
< 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸) ↔ ∃𝑥 ∈ ℝ+ ((𝑦 < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸)) | 
| 10 |  | breq1 5145 | . . . . . . 7
⊢ (𝑦 = (𝐾↑𝐽) → (𝑦 < 𝑥 ↔ (𝐾↑𝐽) < 𝑥)) | 
| 11 |  | oveq2 7440 | . . . . . . . 8
⊢ (𝑦 = (𝐾↑𝐽) → (𝐾 · 𝑦) = (𝐾 · (𝐾↑𝐽))) | 
| 12 | 11 | breq2d 5154 | . . . . . . 7
⊢ (𝑦 = (𝐾↑𝐽) → (((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦) ↔ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽)))) | 
| 13 | 10, 12 | anbi12d 632 | . . . . . 6
⊢ (𝑦 = (𝐾↑𝐽) → ((𝑦 < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦)) ↔ ((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))))) | 
| 14 | 13 | anbi1d 631 | . . . . 5
⊢ (𝑦 = (𝐾↑𝐽) → (((𝑦 < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸) ↔ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) | 
| 15 | 14 | rexbidv 3178 | . . . 4
⊢ (𝑦 = (𝐾↑𝐽) → (∃𝑥 ∈ ℝ+ ((𝑦 < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸) ↔ ∃𝑥 ∈ ℝ+ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) | 
| 16 | 9, 15 | bitrid 283 | . . 3
⊢ (𝑦 = (𝐾↑𝐽) → (∃𝑧 ∈ ℝ+ ((𝑦 < 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸) ↔ ∃𝑥 ∈ ℝ+ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) | 
| 17 |  | pntlem1.K | . . . 4
⊢ (𝜑 → ∀𝑦 ∈ (𝑋(,)+∞)∃𝑧 ∈ ℝ+ ((𝑦 < 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸)) | 
| 18 | 17 | adantr 480 | . . 3
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → ∀𝑦 ∈ (𝑋(,)+∞)∃𝑧 ∈ ℝ+ ((𝑦 < 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸)) | 
| 19 |  | pntlem1.r | . . . . . . . 8
⊢ 𝑅 = (𝑎 ∈ ℝ+ ↦
((ψ‘𝑎) −
𝑎)) | 
| 20 |  | pntlem1.a | . . . . . . . 8
⊢ (𝜑 → 𝐴 ∈
ℝ+) | 
| 21 |  | pntlem1.b | . . . . . . . 8
⊢ (𝜑 → 𝐵 ∈
ℝ+) | 
| 22 |  | pntlem1.l | . . . . . . . 8
⊢ (𝜑 → 𝐿 ∈ (0(,)1)) | 
| 23 |  | pntlem1.d | . . . . . . . 8
⊢ 𝐷 = (𝐴 + 1) | 
| 24 |  | pntlem1.f | . . . . . . . 8
⊢ 𝐹 = ((1 − (1 / 𝐷)) · ((𝐿 / (;32 · 𝐵)) / (𝐷↑2))) | 
| 25 |  | pntlem1.u | . . . . . . . 8
⊢ (𝜑 → 𝑈 ∈
ℝ+) | 
| 26 |  | pntlem1.u2 | . . . . . . . 8
⊢ (𝜑 → 𝑈 ≤ 𝐴) | 
| 27 |  | pntlem1.e | . . . . . . . 8
⊢ 𝐸 = (𝑈 / 𝐷) | 
| 28 |  | pntlem1.k | . . . . . . . 8
⊢ 𝐾 = (exp‘(𝐵 / 𝐸)) | 
| 29 | 19, 20, 21, 22, 23, 24, 25, 26, 27, 28 | pntlemc 27640 | . . . . . . 7
⊢ (𝜑 → (𝐸 ∈ ℝ+ ∧ 𝐾 ∈ ℝ+
∧ (𝐸 ∈ (0(,)1)
∧ 1 < 𝐾 ∧ (𝑈 − 𝐸) ∈
ℝ+))) | 
| 30 | 29 | simp2d 1143 | . . . . . 6
⊢ (𝜑 → 𝐾 ∈
ℝ+) | 
| 31 |  | elfzoelz 13700 | . . . . . 6
⊢ (𝐽 ∈ (𝑀..^𝑁) → 𝐽 ∈ ℤ) | 
| 32 |  | rpexpcl 14122 | . . . . . 6
⊢ ((𝐾 ∈ ℝ+
∧ 𝐽 ∈ ℤ)
→ (𝐾↑𝐽) ∈
ℝ+) | 
| 33 | 30, 31, 32 | syl2an 596 | . . . . 5
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → (𝐾↑𝐽) ∈
ℝ+) | 
| 34 | 33 | rpred 13078 | . . . 4
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → (𝐾↑𝐽) ∈ ℝ) | 
| 35 |  | elfzofz 13716 | . . . . . 6
⊢ (𝐽 ∈ (𝑀..^𝑁) → 𝐽 ∈ (𝑀...𝑁)) | 
| 36 |  | pntlem1.y | . . . . . . 7
⊢ (𝜑 → (𝑌 ∈ ℝ+ ∧ 1 ≤
𝑌)) | 
| 37 |  | pntlem1.x | . . . . . . 7
⊢ (𝜑 → (𝑋 ∈ ℝ+ ∧ 𝑌 < 𝑋)) | 
| 38 |  | pntlem1.c | . . . . . . 7
⊢ (𝜑 → 𝐶 ∈
ℝ+) | 
| 39 |  | pntlem1.w | . . . . . . 7
⊢ 𝑊 = (((𝑌 + (4 / (𝐿 · 𝐸)))↑2) + (((𝑋 · (𝐾↑2))↑4) + (exp‘(((;32 · 𝐵) / ((𝑈 − 𝐸) · (𝐿 · (𝐸↑2)))) · ((𝑈 · 3) + 𝐶))))) | 
| 40 |  | pntlem1.z | . . . . . . 7
⊢ (𝜑 → 𝑍 ∈ (𝑊[,)+∞)) | 
| 41 |  | pntlem1.m | . . . . . . 7
⊢ 𝑀 =
((⌊‘((log‘𝑋) / (log‘𝐾))) + 1) | 
| 42 |  | pntlem1.n | . . . . . . 7
⊢ 𝑁 =
(⌊‘(((log‘𝑍) / (log‘𝐾)) / 2)) | 
| 43 | 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 36, 37, 38, 39, 40, 41, 42 | pntlemh 27644 | . . . . . 6
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀...𝑁)) → (𝑋 < (𝐾↑𝐽) ∧ (𝐾↑𝐽) ≤ (√‘𝑍))) | 
| 44 | 35, 43 | sylan2 593 | . . . . 5
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → (𝑋 < (𝐾↑𝐽) ∧ (𝐾↑𝐽) ≤ (√‘𝑍))) | 
| 45 | 44 | simpld 494 | . . . 4
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → 𝑋 < (𝐾↑𝐽)) | 
| 46 | 37 | simpld 494 | . . . . . 6
⊢ (𝜑 → 𝑋 ∈
ℝ+) | 
| 47 | 46 | adantr 480 | . . . . 5
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → 𝑋 ∈
ℝ+) | 
| 48 |  | rpxr 13045 | . . . . 5
⊢ (𝑋 ∈ ℝ+
→ 𝑋 ∈
ℝ*) | 
| 49 |  | elioopnf 13484 | . . . . 5
⊢ (𝑋 ∈ ℝ*
→ ((𝐾↑𝐽) ∈ (𝑋(,)+∞) ↔ ((𝐾↑𝐽) ∈ ℝ ∧ 𝑋 < (𝐾↑𝐽)))) | 
| 50 | 47, 48, 49 | 3syl 18 | . . . 4
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → ((𝐾↑𝐽) ∈ (𝑋(,)+∞) ↔ ((𝐾↑𝐽) ∈ ℝ ∧ 𝑋 < (𝐾↑𝐽)))) | 
| 51 | 34, 45, 50 | mpbir2and 713 | . . 3
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → (𝐾↑𝐽) ∈ (𝑋(,)+∞)) | 
| 52 | 16, 18, 51 | rspcdva 3622 | . 2
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → ∃𝑥 ∈ ℝ+ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸)) | 
| 53 | 20 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝐴 ∈
ℝ+) | 
| 54 | 21 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝐵 ∈
ℝ+) | 
| 55 | 22 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝐿 ∈ (0(,)1)) | 
| 56 | 25 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝑈 ∈
ℝ+) | 
| 57 | 26 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝑈 ≤ 𝐴) | 
| 58 | 36 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → (𝑌 ∈ ℝ+ ∧ 1 ≤
𝑌)) | 
| 59 | 37 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → (𝑋 ∈ ℝ+ ∧ 𝑌 < 𝑋)) | 
| 60 | 38 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝐶 ∈
ℝ+) | 
| 61 | 40 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝑍 ∈ (𝑊[,)+∞)) | 
| 62 |  | pntlem1.U | . . . 4
⊢ (𝜑 → ∀𝑧 ∈ (𝑌[,)+∞)(abs‘((𝑅‘𝑧) / 𝑧)) ≤ 𝑈) | 
| 63 | 62 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → ∀𝑧 ∈ (𝑌[,)+∞)(abs‘((𝑅‘𝑧) / 𝑧)) ≤ 𝑈) | 
| 64 | 17 | ad2antrr 726 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → ∀𝑦 ∈ (𝑋(,)+∞)∃𝑧 ∈ ℝ+ ((𝑦 < 𝑧 ∧ ((1 + (𝐿 · 𝐸)) · 𝑧) < (𝐾 · 𝑦)) ∧ ∀𝑢 ∈ (𝑧[,]((1 + (𝐿 · 𝐸)) · 𝑧))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸)) | 
| 65 |  | pntlem1.o | . . 3
⊢ 𝑂 = (((⌊‘(𝑍 / (𝐾↑(𝐽 + 1)))) + 1)...(⌊‘(𝑍 / (𝐾↑𝐽)))) | 
| 66 |  | simprl 770 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝑥 ∈ ℝ+) | 
| 67 |  | simprr 772 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸)) | 
| 68 |  | simplr 768 | . . 3
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → 𝐽 ∈ (𝑀..^𝑁)) | 
| 69 |  | eqid 2736 | . . 3
⊢
(((⌊‘(𝑍
/ ((1 + (𝐿 · 𝐸)) · 𝑥))) + 1)...(⌊‘(𝑍 / 𝑥))) = (((⌊‘(𝑍 / ((1 + (𝐿 · 𝐸)) · 𝑥))) + 1)...(⌊‘(𝑍 / 𝑥))) | 
| 70 | 19, 53, 54, 55, 23, 24, 56, 57, 27, 28, 58, 59, 60, 39, 61, 41, 42, 63, 64, 65, 66, 67, 68, 69 | pntlemj 27648 | . 2
⊢ (((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) ∧ (𝑥 ∈ ℝ+ ∧ (((𝐾↑𝐽) < 𝑥 ∧ ((1 + (𝐿 · 𝐸)) · 𝑥) < (𝐾 · (𝐾↑𝐽))) ∧ ∀𝑢 ∈ (𝑥[,]((1 + (𝐿 · 𝐸)) · 𝑥))(abs‘((𝑅‘𝑢) / 𝑢)) ≤ 𝐸))) → ((𝑈 − 𝐸) · (((𝐿 · 𝐸) / 8) · (log‘𝑍))) ≤ Σ𝑛 ∈ 𝑂 (((𝑈 / 𝑛) − (abs‘((𝑅‘(𝑍 / 𝑛)) / 𝑍))) · (log‘𝑛))) | 
| 71 | 52, 70 | rexlimddv 3160 | 1
⊢ ((𝜑 ∧ 𝐽 ∈ (𝑀..^𝑁)) → ((𝑈 − 𝐸) · (((𝐿 · 𝐸) / 8) · (log‘𝑍))) ≤ Σ𝑛 ∈ 𝑂 (((𝑈 / 𝑛) − (abs‘((𝑅‘(𝑍 / 𝑛)) / 𝑍))) · (log‘𝑛))) |