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

Theorem pntrlog2bndlem3 27428
Description: Lemma for pntrlog2bnd 27433. Bound on the difference between the Selberg function and its approximation, inside a sum. (Contributed by Mario Carneiro, 31-May-2016.)
Hypotheses
Ref Expression
pntsval.1 𝑆 = (π‘Ž ∈ ℝ ↦ Σ𝑖 ∈ (1...(βŒŠβ€˜π‘Ž))((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))))
pntrlog2bnd.r 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
pntrlog2bndlem3.1 (πœ‘ β†’ 𝐴 ∈ ℝ+)
pntrlog2bndlem3.2 (πœ‘ β†’ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝐴)
Assertion
Ref Expression
pntrlog2bndlem3 (πœ‘ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
Distinct variable groups:   𝑖,π‘Ž,𝑛,π‘₯,𝑦,𝐴   πœ‘,𝑛,π‘₯   𝑆,𝑛,π‘₯,𝑦   𝑅,𝑛,π‘₯,𝑦
Allowed substitution hints:   πœ‘(𝑦,𝑖,π‘Ž)   𝑅(𝑖,π‘Ž)   𝑆(𝑖,π‘Ž)

Proof of Theorem pntrlog2bndlem3
Dummy variable 𝑐 is distinct from all other variables.
StepHypRef Expression
1 1red 11212 . 2 (πœ‘ β†’ 1 ∈ ℝ)
2 pntrlog2bndlem3.1 . . . . 5 (πœ‘ β†’ 𝐴 ∈ ℝ+)
32rpred 13013 . . . 4 (πœ‘ β†’ 𝐴 ∈ ℝ)
43adantr 480 . . 3 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 𝐴 ∈ ℝ)
5 fzfid 13935 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1...(βŒŠβ€˜π‘₯)) ∈ Fin)
6 elfznn 13527 . . . . . . . 8 (𝑛 ∈ (1...(βŒŠβ€˜π‘₯)) β†’ 𝑛 ∈ β„•)
76adantl 481 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„•)
87nnred 12224 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ)
9 elioore 13351 . . . . . . . . . . . . . 14 (π‘₯ ∈ (1(,)+∞) β†’ π‘₯ ∈ ℝ)
109adantl 481 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ ∈ ℝ)
11 1rp 12975 . . . . . . . . . . . . . 14 1 ∈ ℝ+
1211a1i 11 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ∈ ℝ+)
13 1red 11212 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ∈ ℝ)
14 eliooord 13380 . . . . . . . . . . . . . . . 16 (π‘₯ ∈ (1(,)+∞) β†’ (1 < π‘₯ ∧ π‘₯ < +∞))
1514adantl 481 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (1 < π‘₯ ∧ π‘₯ < +∞))
1615simpld 494 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 < π‘₯)
1713, 10, 16ltled 11359 . . . . . . . . . . . . 13 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 1 ≀ π‘₯)
1810, 12, 17rpgecld 13052 . . . . . . . . . . . 12 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ π‘₯ ∈ ℝ+)
1918adantr 480 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ π‘₯ ∈ ℝ+)
207nnrpd 13011 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ ℝ+)
2111a1i 11 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ∈ ℝ+)
2220, 21rpaddcld 13028 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 + 1) ∈ ℝ+)
2319, 22rpdivcld 13030 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ / (𝑛 + 1)) ∈ ℝ+)
24 pntrlog2bnd.r . . . . . . . . . . . 12 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
2524pntrf 27412 . . . . . . . . . . 11 𝑅:ℝ+βŸΆβ„
2625ffvelcdmi 7075 . . . . . . . . . 10 ((π‘₯ / (𝑛 + 1)) ∈ ℝ+ β†’ (π‘…β€˜(π‘₯ / (𝑛 + 1))) ∈ ℝ)
2723, 26syl 17 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / (𝑛 + 1))) ∈ ℝ)
2827recnd 11239 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / (𝑛 + 1))) ∈ β„‚)
2919, 20rpdivcld 13030 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘₯ / 𝑛) ∈ ℝ+)
3025ffvelcdmi 7075 . . . . . . . . . 10 ((π‘₯ / 𝑛) ∈ ℝ+ β†’ (π‘…β€˜(π‘₯ / 𝑛)) ∈ ℝ)
3129, 30syl 17 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / 𝑛)) ∈ ℝ)
3231recnd 11239 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘…β€˜(π‘₯ / 𝑛)) ∈ β„‚)
3328, 32subcld 11568 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))) ∈ β„‚)
3433abscld 15380 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))) ∈ ℝ)
358, 34remulcld 11241 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) ∈ ℝ)
365, 35fsumrecl 15677 . . . 4 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) ∈ ℝ)
3710, 16rplogcld 26479 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (logβ€˜π‘₯) ∈ ℝ+)
3818, 37rpmulcld 13029 . . . 4 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) ∈ ℝ+)
3936, 38rerpdivcld 13044 . . 3 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ ℝ)
40 ioossre 13382 . . . 4 (1(,)+∞) βŠ† ℝ
412rpcnd 13015 . . . 4 (πœ‘ β†’ 𝐴 ∈ β„‚)
42 o1const 15561 . . . 4 (((1(,)+∞) βŠ† ℝ ∧ 𝐴 ∈ β„‚) β†’ (π‘₯ ∈ (1(,)+∞) ↦ 𝐴) ∈ 𝑂(1))
4340, 41, 42sylancr 586 . . 3 (πœ‘ β†’ (π‘₯ ∈ (1(,)+∞) ↦ 𝐴) ∈ 𝑂(1))
44 chpo1ubb 27330 . . . 4 βˆƒπ‘ ∈ ℝ+ βˆ€π‘¦ ∈ ℝ+ (Οˆβ€˜π‘¦) ≀ (𝑐 Β· 𝑦)
45 pntsval.1 . . . . . 6 𝑆 = (π‘Ž ∈ ℝ ↦ Σ𝑖 ∈ (1...(βŒŠβ€˜π‘Ž))((Ξ›β€˜π‘–) Β· ((logβ€˜π‘–) + (Οˆβ€˜(π‘Ž / 𝑖)))))
46 simpl 482 . . . . . 6 ((𝑐 ∈ ℝ+ ∧ βˆ€π‘¦ ∈ ℝ+ (Οˆβ€˜π‘¦) ≀ (𝑐 Β· 𝑦)) β†’ 𝑐 ∈ ℝ+)
47 simpr 484 . . . . . 6 ((𝑐 ∈ ℝ+ ∧ βˆ€π‘¦ ∈ ℝ+ (Οˆβ€˜π‘¦) ≀ (𝑐 Β· 𝑦)) β†’ βˆ€π‘¦ ∈ ℝ+ (Οˆβ€˜π‘¦) ≀ (𝑐 Β· 𝑦))
4845, 24, 46, 47pntrlog2bndlem2 27427 . . . . 5 ((𝑐 ∈ ℝ+ ∧ βˆ€π‘¦ ∈ ℝ+ (Οˆβ€˜π‘¦) ≀ (𝑐 Β· 𝑦)) β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
4948rexlimiva 3139 . . . 4 (βˆƒπ‘ ∈ ℝ+ βˆ€π‘¦ ∈ ℝ+ (Οˆβ€˜π‘¦) ≀ (𝑐 Β· 𝑦) β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
5044, 49mp1i 13 . . 3 (πœ‘ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
514, 39, 43, 50o1mul2 15566 . 2 (πœ‘ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯))))) ∈ 𝑂(1))
524, 39remulcld 11241 . 2 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ℝ)
5332abscld 15380 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) ∈ ℝ)
5428abscld 15380 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))) ∈ ℝ)
5553, 54resubcld 11639 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) ∈ ℝ)
5645pntsf 27422 . . . . . . . . 9 𝑆:β„βŸΆβ„
5756ffvelcdmi 7075 . . . . . . . 8 (𝑛 ∈ ℝ β†’ (π‘†β€˜π‘›) ∈ ℝ)
588, 57syl 17 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘†β€˜π‘›) ∈ ℝ)
59 2re 12283 . . . . . . . . 9 2 ∈ ℝ
6059a1i 11 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 2 ∈ ℝ)
6120relogcld 26473 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (logβ€˜π‘›) ∈ ℝ)
628, 61remulcld 11241 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (logβ€˜π‘›)) ∈ ℝ)
6360, 62remulcld 11241 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (𝑛 Β· (logβ€˜π‘›))) ∈ ℝ)
6458, 63resubcld 11639 . . . . . 6 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))) ∈ ℝ)
6555, 64remulcld 11241 . . . . 5 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ ℝ)
665, 65fsumrecl 15677 . . . 4 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ ℝ)
6766, 38rerpdivcld 13044 . . 3 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ ℝ)
6867recnd 11239 . 2 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯))) ∈ β„‚)
6968abscld 15380 . . . 4 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ ℝ)
7052recnd 11239 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ β„‚)
7170abscld 15380 . . . 4 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯))))) ∈ ℝ)
7266recnd 11239 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ β„‚)
7372abscld 15380 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ∈ ℝ)
744, 36remulcld 11241 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (𝐴 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))) ∈ ℝ)
7565recnd 11239 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ β„‚)
7675abscld 15380 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ∈ ℝ)
775, 76fsumrecl 15677 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(absβ€˜(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ∈ ℝ)
785, 75fsumabs 15744 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ≀ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(absβ€˜(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))))
794adantr 480 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝐴 ∈ ℝ)
8079, 35remulcld 11241 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐴 Β· (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))) ∈ ℝ)
8155recnd 11239 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) ∈ β„‚)
8281abscld 15380 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))))) ∈ ℝ)
8364recnd 11239 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))) ∈ β„‚)
8483abscld 15380 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ∈ ℝ)
8579, 8remulcld 11241 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐴 Β· 𝑛) ∈ ℝ)
8681absge0d 15388 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 0 ≀ (absβ€˜((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))))))
8783absge0d 15388 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 0 ≀ (absβ€˜((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
8832, 28abs2difabsd 15403 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))))) ≀ (absβ€˜((π‘…β€˜(π‘₯ / 𝑛)) βˆ’ (π‘…β€˜(π‘₯ / (𝑛 + 1))))))
8932, 28abssubd 15397 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((π‘…β€˜(π‘₯ / 𝑛)) βˆ’ (π‘…β€˜(π‘₯ / (𝑛 + 1))))) = (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))
9088, 89breqtrd 5164 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))))) ≀ (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))
9158recnd 11239 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (π‘†β€˜π‘›) ∈ β„‚)
928recnd 11239 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ β„‚)
937nnne0d 12259 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 β‰  0)
9491, 92, 93divcld 11987 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((π‘†β€˜π‘›) / 𝑛) ∈ β„‚)
95 2cnd 12287 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 2 ∈ β„‚)
9661recnd 11239 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (logβ€˜π‘›) ∈ β„‚)
9795, 96mulcld 11231 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (2 Β· (logβ€˜π‘›)) ∈ β„‚)
9894, 97subcld 11568 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›))) ∈ β„‚)
9998, 92absmuld 15398 . . . . . . . . . . . . 13 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›))) Β· 𝑛)) = ((absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) Β· (absβ€˜π‘›)))
10094, 97, 92subdird 11668 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›))) Β· 𝑛) = ((((π‘†β€˜π‘›) / 𝑛) Β· 𝑛) βˆ’ ((2 Β· (logβ€˜π‘›)) Β· 𝑛)))
10191, 92, 93divcan1d 11988 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (((π‘†β€˜π‘›) / 𝑛) Β· 𝑛) = (π‘†β€˜π‘›))
10295, 92, 96mul32d 11421 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((2 Β· 𝑛) Β· (logβ€˜π‘›)) = ((2 Β· (logβ€˜π‘›)) Β· 𝑛))
10395, 92, 96mulassd 11234 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((2 Β· 𝑛) Β· (logβ€˜π‘›)) = (2 Β· (𝑛 Β· (logβ€˜π‘›))))
104102, 103eqtr3d 2766 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((2 Β· (logβ€˜π‘›)) Β· 𝑛) = (2 Β· (𝑛 Β· (logβ€˜π‘›))))
105101, 104oveq12d 7419 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((((π‘†β€˜π‘›) / 𝑛) Β· 𝑛) βˆ’ ((2 Β· (logβ€˜π‘›)) Β· 𝑛)) = ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))
106100, 105eqtrd 2764 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›))) Β· 𝑛) = ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))
107106fveq2d 6885 . . . . . . . . . . . . 13 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›))) Β· 𝑛)) = (absβ€˜((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))))
10820rpge0d 13017 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 0 ≀ 𝑛)
1098, 108absidd 15366 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜π‘›) = 𝑛)
110109oveq2d 7417 . . . . . . . . . . . . 13 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) Β· (absβ€˜π‘›)) = ((absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) Β· 𝑛))
11199, 107, 1103eqtr3d 2772 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) = ((absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) Β· 𝑛))
11298abscld 15380 . . . . . . . . . . . . 13 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) ∈ ℝ)
113 fveq2 6881 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑛 β†’ (π‘†β€˜π‘¦) = (π‘†β€˜π‘›))
114 id 22 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑛 β†’ 𝑦 = 𝑛)
115113, 114oveq12d 7419 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑛 β†’ ((π‘†β€˜π‘¦) / 𝑦) = ((π‘†β€˜π‘›) / 𝑛))
116 fveq2 6881 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑛 β†’ (logβ€˜π‘¦) = (logβ€˜π‘›))
117116oveq2d 7417 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑛 β†’ (2 Β· (logβ€˜π‘¦)) = (2 Β· (logβ€˜π‘›)))
118115, 117oveq12d 7419 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑛 β†’ (((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦))) = (((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›))))
119118fveq2d 6885 . . . . . . . . . . . . . . 15 (𝑦 = 𝑛 β†’ (absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) = (absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))))
120119breq1d 5148 . . . . . . . . . . . . . 14 (𝑦 = 𝑛 β†’ ((absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝐴 ↔ (absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) ≀ 𝐴))
121 pntrlog2bndlem3.2 . . . . . . . . . . . . . . 15 (πœ‘ β†’ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝐴)
122121ad2antrr 723 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ βˆ€π‘¦ ∈ (1[,)+∞)(absβ€˜(((π‘†β€˜π‘¦) / 𝑦) βˆ’ (2 Β· (logβ€˜π‘¦)))) ≀ 𝐴)
1237nnge1d 12257 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 1 ≀ 𝑛)
124 1re 11211 . . . . . . . . . . . . . . . 16 1 ∈ ℝ
125 elicopnf 13419 . . . . . . . . . . . . . . . 16 (1 ∈ ℝ β†’ (𝑛 ∈ (1[,)+∞) ↔ (𝑛 ∈ ℝ ∧ 1 ≀ 𝑛)))
126124, 125ax-mp 5 . . . . . . . . . . . . . . 15 (𝑛 ∈ (1[,)+∞) ↔ (𝑛 ∈ ℝ ∧ 1 ≀ 𝑛))
1278, 123, 126sylanbrc 582 . . . . . . . . . . . . . 14 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝑛 ∈ (1[,)+∞))
128120, 122, 127rspcdva 3605 . . . . . . . . . . . . 13 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) ≀ 𝐴)
129112, 79, 8, 108, 128lemul1ad 12150 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜(((π‘†β€˜π‘›) / 𝑛) βˆ’ (2 Β· (logβ€˜π‘›)))) Β· 𝑛) ≀ (𝐴 Β· 𝑛))
130111, 129eqbrtrd 5160 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) ≀ (𝐴 Β· 𝑛))
13182, 34, 84, 85, 86, 87, 90, 130lemul12ad 12153 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((absβ€˜((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))))) Β· (absβ€˜((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ≀ ((absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))) Β· (𝐴 Β· 𝑛)))
13281, 83absmuld 15398 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) = ((absβ€˜((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1)))))) Β· (absβ€˜((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))))
13341ad2antrr 723 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ 𝐴 ∈ β„‚)
13434recnd 11239 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))) ∈ β„‚)
135133, 92, 134mulassd 11234 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝐴 Β· 𝑛) Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) = (𝐴 Β· (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))))
136133, 92mulcld 11231 . . . . . . . . . . . 12 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐴 Β· 𝑛) ∈ β„‚)
137136, 134mulcomd 11232 . . . . . . . . . . 11 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ ((𝐴 Β· 𝑛) Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) = ((absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))) Β· (𝐴 Β· 𝑛)))
138135, 137eqtr3d 2766 . . . . . . . . . 10 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝐴 Β· (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))) = ((absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))) Β· (𝐴 Β· 𝑛)))
139131, 132, 1383brtr4d 5170 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (absβ€˜(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ≀ (𝐴 Β· (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))))
1405, 76, 80, 139fsumle 15742 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(absβ€˜(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ≀ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝐴 Β· (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))))
14141adantr 480 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 𝐴 ∈ β„‚)
14235recnd 11239 . . . . . . . . 9 (((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(βŒŠβ€˜π‘₯))) β†’ (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) ∈ β„‚)
1435, 141, 142fsummulc2 15727 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (𝐴 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))) = Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝐴 Β· (𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))))
144140, 143breqtrrd 5166 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(absβ€˜(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ≀ (𝐴 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))))
14573, 77, 74, 78, 144letrd 11368 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) ≀ (𝐴 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))))
14673, 74, 38, 145lediv1dd 13071 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))) ≀ ((𝐴 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))) / (π‘₯ Β· (logβ€˜π‘₯))))
14738rpcnd 13015 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) ∈ β„‚)
14838rpne0d 13018 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) β‰  0)
14972, 147, 148absdivd 15399 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) = ((absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (absβ€˜(π‘₯ Β· (logβ€˜π‘₯)))))
15038rpred 13013 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (π‘₯ Β· (logβ€˜π‘₯)) ∈ ℝ)
15138rpge0d 13017 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ 0 ≀ (π‘₯ Β· (logβ€˜π‘₯)))
152150, 151absidd 15366 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(π‘₯ Β· (logβ€˜π‘₯))) = (π‘₯ Β· (logβ€˜π‘₯)))
153152oveq2d 7417 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (absβ€˜(π‘₯ Β· (logβ€˜π‘₯)))) = ((absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))))
154149, 153eqtr2d 2765 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((absβ€˜Ξ£π‘› ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›)))))) / (π‘₯ Β· (logβ€˜π‘₯))) = (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))))
15536recnd 11239 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) ∈ β„‚)
156141, 155, 147, 148divassd 12022 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ ((𝐴 Β· Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛)))))) / (π‘₯ Β· (logβ€˜π‘₯))) = (𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))))
157146, 154, 1563brtr3d 5169 . . . 4 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ≀ (𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))))
15852leabsd 15358 . . . 4 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ≀ (absβ€˜(𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯))))))
15969, 52, 71, 157, 158letrd 11368 . . 3 ((πœ‘ ∧ π‘₯ ∈ (1(,)+∞)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ≀ (absβ€˜(𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯))))))
160159adantrr 714 . 2 ((πœ‘ ∧ (π‘₯ ∈ (1(,)+∞) ∧ 1 ≀ π‘₯)) β†’ (absβ€˜(Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ≀ (absβ€˜(𝐴 Β· (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(𝑛 Β· (absβ€˜((π‘…β€˜(π‘₯ / (𝑛 + 1))) βˆ’ (π‘…β€˜(π‘₯ / 𝑛))))) / (π‘₯ Β· (logβ€˜π‘₯))))))
1611, 51, 52, 68, 160o1le 15596 1 (πœ‘ β†’ (π‘₯ ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(βŒŠβ€˜π‘₯))(((absβ€˜(π‘…β€˜(π‘₯ / 𝑛))) βˆ’ (absβ€˜(π‘…β€˜(π‘₯ / (𝑛 + 1))))) Β· ((π‘†β€˜π‘›) βˆ’ (2 Β· (𝑛 Β· (logβ€˜π‘›))))) / (π‘₯ Β· (logβ€˜π‘₯)))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 395   = wceq 1533   ∈ wcel 2098  βˆ€wral 3053  βˆƒwrex 3062   βŠ† wss 3940   class class class wbr 5138   ↦ cmpt 5221  β€˜cfv 6533  (class class class)co 7401  β„‚cc 11104  β„cr 11105  1c1 11107   + caddc 11109   Β· cmul 11111  +∞cpnf 11242   < clt 11245   ≀ cle 11246   βˆ’ cmin 11441   / cdiv 11868  β„•cn 12209  2c2 12264  β„+crp 12971  (,)cioo 13321  [,)cico 13323  ...cfz 13481  βŒŠcfl 13752  abscabs 15178  π‘‚(1)co1 15427  Ξ£csu 15629  logclog 26405  Ξ›cvma 26940  Οˆcchp 26941
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-iin 4990  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-om 7849  df-1st 7968  df-2nd 7969  df-supp 8141  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-xnn0 12542  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ioc 13326  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-fl 13754  df-mod 13832  df-seq 13964  df-exp 14025  df-fac 14231  df-bc 14260  df-hash 14288  df-shft 15011  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-limsup 15412  df-clim 15429  df-rlim 15430  df-o1 15431  df-lo1 15432  df-sum 15630  df-ef 16008  df-e 16009  df-sin 16010  df-cos 16011  df-pi 16013  df-dvds 16195  df-gcd 16433  df-prm 16606  df-pc 16769  df-struct 17079  df-sets 17096  df-slot 17114  df-ndx 17126  df-base 17144  df-ress 17173  df-plusg 17209  df-mulr 17210  df-starv 17211  df-sca 17212  df-vsca 17213  df-ip 17214  df-tset 17215  df-ple 17216  df-ds 17218  df-unif 17219  df-hom 17220  df-cco 17221  df-rest 17367  df-topn 17368  df-0g 17386  df-gsum 17387  df-topgen 17388  df-pt 17389  df-prds 17392  df-xrs 17447  df-qtop 17452  df-imas 17453  df-xps 17455  df-mre 17529  df-mrc 17530  df-acs 17532  df-mgm 18563  df-sgrp 18642  df-mnd 18658  df-submnd 18704  df-mulg 18986  df-cntz 19223  df-cmn 19692  df-psmet 21220  df-xmet 21221  df-met 21222  df-bl 21223  df-mopn 21224  df-fbas 21225  df-fg 21226  df-cnfld 21229  df-top 22718  df-topon 22735  df-topsp 22757  df-bases 22771  df-cld 22845  df-ntr 22846  df-cls 22847  df-nei 22924  df-lp 22962  df-perf 22963  df-cn 23053  df-cnp 23054  df-haus 23141  df-tx 23388  df-hmeo 23581  df-fil 23672  df-fm 23764  df-flim 23765  df-flf 23766  df-xms 24148  df-ms 24149  df-tms 24150  df-cncf 24720  df-limc 25717  df-dv 25718  df-log 26407  df-cxp 26408  df-em 26841  df-cht 26945  df-vma 26946  df-chp 26947  df-ppi 26948
This theorem is referenced by:  pntrlog2bndlem4  27429
  Copyright terms: Public domain W3C validator