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

Theorem pntrlog2bndlem6 25724
Description: Lemma for pntrlog2bnd 25725. 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 𝑅 = (𝑎 ∈ ℝ+ ↦ ((ψ‘𝑎) − 𝑎))
pntrlog2bnd.t 𝑇 = (𝑎 ∈ ℝ ↦ if(𝑎 ∈ ℝ+, (𝑎 · (log‘𝑎)), 0))
pntrlog2bndlem5.1 (𝜑𝐵 ∈ ℝ+)
pntrlog2bndlem5.2 (𝜑 → ∀𝑦 ∈ ℝ+ (abs‘((𝑅𝑦) / 𝑦)) ≤ 𝐵)
pntrlog2bndlem6.1 (𝜑𝐴 ∈ ℝ)
pntrlog2bndlem6.2 (𝜑 → 1 ≤ 𝐴)
Assertion
Ref Expression
pntrlog2bndlem6 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ ≤𝑂(1))
Distinct variable groups:   𝑖,𝑎,𝑛,𝑥,𝑦,𝐴   𝐵,𝑛,𝑥,𝑦   𝜑,𝑛,𝑥   𝑆,𝑛,𝑥,𝑦   𝑅,𝑛,𝑥,𝑦   𝑇,𝑛
Allowed substitution hints:   𝜑(𝑦,𝑖,𝑎)   𝐵(𝑖,𝑎)   𝑅(𝑖,𝑎)   𝑆(𝑖,𝑎)   𝑇(𝑥,𝑦,𝑖,𝑎)

Proof of Theorem pntrlog2bndlem6
StepHypRef Expression
1 elioore 12517 . . . . . . . . . . . . 13 (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ)
21adantl 475 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ)
3 1rp 12141 . . . . . . . . . . . . 13 1 ∈ ℝ+
43a1i 11 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ+)
5 1red 10377 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ)
6 eliooord 12545 . . . . . . . . . . . . . . 15 (𝑥 ∈ (1(,)+∞) → (1 < 𝑥𝑥 < +∞))
76adantl 475 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → (1 < 𝑥𝑥 < +∞))
87simpld 490 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 < 𝑥)
95, 2, 8ltled 10524 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ≤ 𝑥)
102, 4, 9rpgecld 12220 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ+)
11 pntrlog2bnd.r . . . . . . . . . . . . 13 𝑅 = (𝑎 ∈ ℝ+ ↦ ((ψ‘𝑎) − 𝑎))
1211pntrf 25704 . . . . . . . . . . . 12 𝑅:ℝ+⟶ℝ
1312ffvelrni 6622 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → (𝑅𝑥) ∈ ℝ)
1410, 13syl 17 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑅𝑥) ∈ ℝ)
1514recnd 10405 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑅𝑥) ∈ ℂ)
1615abscld 14583 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(𝑅𝑥)) ∈ ℝ)
1710relogcld 24806 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ)
1816, 17remulcld 10407 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅𝑥)) · (log‘𝑥)) ∈ ℝ)
19 2re 11449 . . . . . . . . . 10 2 ∈ ℝ
2019a1i 11 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ)
212, 8rplogcld 24812 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ+)
2220, 21rerpdivcld 12212 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℝ)
23 fzfid 13091 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) ∈ Fin)
2410adantr 474 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ+)
25 elfznn 12687 . . . . . . . . . . . . . . . 16 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
2625adantl 475 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
2726nnrpd 12179 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ+)
2824, 27rpdivcld 12198 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ+)
2912ffvelrni 6622 . . . . . . . . . . . . 13 ((𝑥 / 𝑛) ∈ ℝ+ → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
3028, 29syl 17 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
3130recnd 10405 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℂ)
3231abscld 14583 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
3327relogcld 24806 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℝ)
3432, 33remulcld 10407 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
3523, 34fsumrecl 14872 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
3622, 35remulcld 10407 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ∈ ℝ)
3718, 36resubcld 10803 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) ∈ ℝ)
3837recnd 10405 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) ∈ ℂ)
39 fzfid 13091 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥)) ∈ Fin)
40 ssun2 3999 . . . . . . . . . . 11 (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥)) ⊆ ((1...(⌊‘(𝑥 / 𝐴))) ∪ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥)))
41 pntsval.1 . . . . . . . . . . . 12 𝑆 = (𝑎 ∈ ℝ ↦ Σ𝑖 ∈ (1...(⌊‘𝑎))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑎 / 𝑖)))))
42 pntrlog2bnd.t . . . . . . . . . . . 12 𝑇 = (𝑎 ∈ ℝ ↦ if(𝑎 ∈ ℝ+, (𝑎 · (log‘𝑎)), 0))
43 pntrlog2bndlem5.1 . . . . . . . . . . . 12 (𝜑𝐵 ∈ ℝ+)
44 pntrlog2bndlem5.2 . . . . . . . . . . . 12 (𝜑 → ∀𝑦 ∈ ℝ+ (abs‘((𝑅𝑦) / 𝑦)) ≤ 𝐵)
45 pntrlog2bndlem6.1 . . . . . . . . . . . 12 (𝜑𝐴 ∈ ℝ)
46 pntrlog2bndlem6.2 . . . . . . . . . . . 12 (𝜑 → 1 ≤ 𝐴)
4741, 11, 42, 43, 44, 45, 46pntrlog2bndlem6a 25723 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) = ((1...(⌊‘(𝑥 / 𝐴))) ∪ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))))
4840, 47syl5sseqr 3872 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥)) ⊆ (1...(⌊‘𝑥)))
4948sselda 3820 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛 ∈ (1...(⌊‘𝑥)))
5049, 34syldan 585 . . . . . . . 8 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
5139, 50fsumrecl 14872 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
5222, 51remulcld 10407 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ∈ ℝ)
5352recnd 10405 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ∈ ℂ)
542recnd 10405 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℂ)
5510rpne0d 12186 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ≠ 0)
5638, 53, 54, 55divdird 11189 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) = (((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥)))
5718recnd 10405 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘(𝑅𝑥)) · (log‘𝑥)) ∈ ℂ)
5836recnd 10405 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ∈ ℂ)
5957, 58, 53subsubd 10762 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅𝑥)) · (log‘𝑥)) − (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))) = ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
6022recnd 10405 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℂ)
6135recnd 10405 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℂ)
6251recnd 10405 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℂ)
6360, 61, 62subdid 10831 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) − Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) = (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
643a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜑 → 1 ∈ ℝ+)
6545, 64, 46rpgecld 12220 . . . . . . . . . . . . . . . . 17 (𝜑𝐴 ∈ ℝ+)
6665adantr 474 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐴 ∈ ℝ+)
672, 66rerpdivcld 12212 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑥 / 𝐴) ∈ ℝ)
68 reflcl 12916 . . . . . . . . . . . . . . 15 ((𝑥 / 𝐴) ∈ ℝ → (⌊‘(𝑥 / 𝐴)) ∈ ℝ)
6967, 68syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → (⌊‘(𝑥 / 𝐴)) ∈ ℝ)
7069ltp1d 11308 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → (⌊‘(𝑥 / 𝐴)) < ((⌊‘(𝑥 / 𝐴)) + 1))
71 fzdisj 12685 . . . . . . . . . . . . 13 ((⌊‘(𝑥 / 𝐴)) < ((⌊‘(𝑥 / 𝐴)) + 1) → ((1...(⌊‘(𝑥 / 𝐴))) ∩ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) = ∅)
7270, 71syl 17 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → ((1...(⌊‘(𝑥 / 𝐴))) ∩ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) = ∅)
7334recnd 10405 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℂ)
7472, 47, 23, 73fsumsplit 14878 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) = (Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) + Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
7574oveq1d 6937 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) − Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) = ((Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) + Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) − Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
76 fzfid 13091 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → (1...(⌊‘(𝑥 / 𝐴))) ∈ Fin)
77 ssun1 3998 . . . . . . . . . . . . . . . 16 (1...(⌊‘(𝑥 / 𝐴))) ⊆ ((1...(⌊‘(𝑥 / 𝐴))) ∪ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥)))
7877, 47syl5sseqr 3872 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (1(,)+∞)) → (1...(⌊‘(𝑥 / 𝐴))) ⊆ (1...(⌊‘𝑥)))
7978sselda 3820 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))) → 𝑛 ∈ (1...(⌊‘𝑥)))
8079, 34syldan 585 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
8176, 80fsumrecl 14872 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
8281recnd 10405 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℂ)
8382, 62pncand 10735 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) + Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) − Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) = Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
8475, 83eqtrd 2813 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) − Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) = Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
8584oveq2d 6938 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) − Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
8663, 85eqtr3d 2815 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) = ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
8786oveq2d 6938 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((abs‘(𝑅𝑥)) · (log‘𝑥)) − (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))) = (((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
8859, 87eqtr3d 2815 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) = (((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
8988oveq1d 6937 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) = ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥))
9056, 89eqtr3d 2815 . . 3 ((𝜑𝑥 ∈ (1(,)+∞)) → (((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥)) = ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥))
9190mpteq2dva 4979 . 2 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥))) = (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)))
9237, 10rerpdivcld 12212 . . 3 ((𝜑𝑥 ∈ (1(,)+∞)) → ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) ∈ ℝ)
9352, 10rerpdivcld 12212 . . 3 ((𝜑𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥) ∈ ℝ)
9441, 11, 42, 43, 44pntrlog2bndlem5 25722 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ ≤𝑂(1))
95 ioossre 12547 . . . . 5 (1(,)+∞) ⊆ ℝ
9695a1i 11 . . . 4 (𝜑 → (1(,)+∞) ⊆ ℝ)
97 1red 10377 . . . 4 (𝜑 → 1 ∈ ℝ)
9819a1i 11 . . . . 5 (𝜑 → 2 ∈ ℝ)
9943rpred 12181 . . . . . 6 (𝜑𝐵 ∈ ℝ)
10065relogcld 24806 . . . . . . 7 (𝜑 → (log‘𝐴) ∈ ℝ)
101100, 97readdcld 10406 . . . . . 6 (𝜑 → ((log‘𝐴) + 1) ∈ ℝ)
10299, 101remulcld 10407 . . . . 5 (𝜑 → (𝐵 · ((log‘𝐴) + 1)) ∈ ℝ)
10398, 102remulcld 10407 . . . 4 (𝜑 → (2 · (𝐵 · ((log‘𝐴) + 1))) ∈ ℝ)
10451, 21rerpdivcld 12212 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ∈ ℝ)
10599adantr 474 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ)
10666relogcld 24806 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝐴) ∈ ℝ)
107106, 5readdcld 10406 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝐴) + 1) ∈ ℝ)
108105, 107remulcld 10407 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐵 · ((log‘𝐴) + 1)) ∈ ℝ)
1092, 108remulcld 10407 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑥 · (𝐵 · ((log‘𝐴) + 1))) ∈ ℝ)
110 2rp 12142 . . . . . . . . . 10 2 ∈ ℝ+
111110a1i 11 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ+)
112111rpge0d 12185 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ 2)
113105, 2remulcld 10407 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐵 · 𝑥) ∈ ℝ)
11449, 25syl 17 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
115114nnrecred 11426 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℝ)
11639, 115fsumrecl 14872 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛) ∈ ℝ)
117113, 116remulcld 10407 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐵 · 𝑥) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛)) ∈ ℝ)
11821adantr 474 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (log‘𝑥) ∈ ℝ+)
11950, 118rerpdivcld 12212 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ∈ ℝ)
120105adantr 474 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝐵 ∈ ℝ)
1212adantr 474 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
122120, 121remulcld 10407 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝐵 · 𝑥) ∈ ℝ)
123122, 115remulcld 10407 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((𝐵 · 𝑥) · (1 / 𝑛)) ∈ ℝ)
12449, 32syldan 585 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
125121, 114nndivred 11429 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ)
126120, 125remulcld 10407 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝐵 · (𝑥 / 𝑛)) ∈ ℝ)
12749, 27syldan 585 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛 ∈ ℝ+)
128127relogcld 24806 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (log‘𝑛) ∈ ℝ)
12910adantr 474 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑥 ∈ ℝ+)
130129relogcld 24806 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (log‘𝑥) ∈ ℝ)
13149, 31syldan 585 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℂ)
132131absge0d 14591 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 0 ≤ (abs‘(𝑅‘(𝑥 / 𝑛))))
133 elfzle2 12662 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥)) → 𝑛 ≤ (⌊‘𝑥))
134133adantl 475 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛 ≤ (⌊‘𝑥))
135114nnzd 11833 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛 ∈ ℤ)
136 flge 12925 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ℝ ∧ 𝑛 ∈ ℤ) → (𝑛𝑥𝑛 ≤ (⌊‘𝑥)))
137121, 135, 136syl2anc 579 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝑛𝑥𝑛 ≤ (⌊‘𝑥)))
138134, 137mpbird 249 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛𝑥)
139127, 129logled 24810 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝑛𝑥 ↔ (log‘𝑛) ≤ (log‘𝑥)))
140138, 139mpbid 224 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (log‘𝑛) ≤ (log‘𝑥))
141128, 130, 124, 132, 140lemul2ad 11318 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ≤ ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑥)))
14250, 124, 118ledivmul2d 12235 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ≤ (abs‘(𝑅‘(𝑥 / 𝑛))) ↔ ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ≤ ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑥))))
143141, 142mpbird 249 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ≤ (abs‘(𝑅‘(𝑥 / 𝑛))))
144125recnd 10405 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℂ)
14549, 28syldan 585 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ+)
146145rpne0d 12186 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝑥 / 𝑛) ≠ 0)
147131, 144, 146absdivd 14602 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))))
14810rpge0d 12185 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ 𝑥)
149148adantr 474 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 0 ≤ 𝑥)
150121, 127, 149divge0d 12221 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 0 ≤ (𝑥 / 𝑛))
151125, 150absidd 14569 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (abs‘(𝑥 / 𝑛)) = (𝑥 / 𝑛))
152151oveq2d 6938 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (abs‘(𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
153147, 152eqtrd 2813 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) = ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)))
154 fveq2 6446 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝑥 / 𝑛) → (𝑅𝑦) = (𝑅‘(𝑥 / 𝑛)))
155 id 22 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝑥 / 𝑛) → 𝑦 = (𝑥 / 𝑛))
156154, 155oveq12d 6940 . . . . . . . . . . . . . . . . . 18 (𝑦 = (𝑥 / 𝑛) → ((𝑅𝑦) / 𝑦) = ((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛)))
157156fveq2d 6450 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝑥 / 𝑛) → (abs‘((𝑅𝑦) / 𝑦)) = (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))))
158157breq1d 4896 . . . . . . . . . . . . . . . 16 (𝑦 = (𝑥 / 𝑛) → ((abs‘((𝑅𝑦) / 𝑦)) ≤ 𝐵 ↔ (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵))
15944ad2antrr 716 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ∀𝑦 ∈ ℝ+ (abs‘((𝑅𝑦) / 𝑦)) ≤ 𝐵)
160158, 159, 145rspcdva 3516 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (abs‘((𝑅‘(𝑥 / 𝑛)) / (𝑥 / 𝑛))) ≤ 𝐵)
161153, 160eqbrtrrd 4910 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)) ≤ 𝐵)
162124, 120, 145ledivmul2d 12235 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) / (𝑥 / 𝑛)) ≤ 𝐵 ↔ (abs‘(𝑅‘(𝑥 / 𝑛))) ≤ (𝐵 · (𝑥 / 𝑛))))
163161, 162mpbid 224 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (abs‘(𝑅‘(𝑥 / 𝑛))) ≤ (𝐵 · (𝑥 / 𝑛)))
164119, 124, 126, 143, 163letrd 10533 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ≤ (𝐵 · (𝑥 / 𝑛)))
165120recnd 10405 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝐵 ∈ ℂ)
16654adantr 474 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
167114nncnd 11392 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛 ∈ ℂ)
168114nnne0d 11425 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → 𝑛 ≠ 0)
169165, 166, 167, 168divassd 11186 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((𝐵 · 𝑥) / 𝑛) = (𝐵 · (𝑥 / 𝑛)))
170165, 166mulcld 10397 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝐵 · 𝑥) ∈ ℂ)
171170, 167, 168divrecd 11154 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((𝐵 · 𝑥) / 𝑛) = ((𝐵 · 𝑥) · (1 / 𝑛)))
172169, 171eqtr3d 2815 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (𝐵 · (𝑥 / 𝑛)) = ((𝐵 · 𝑥) · (1 / 𝑛)))
173164, 172breqtrd 4912 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ≤ ((𝐵 · 𝑥) · (1 / 𝑛)))
17439, 119, 123, 173fsumle 14935 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ≤ Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((𝐵 · 𝑥) · (1 / 𝑛)))
17517recnd 10405 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℂ)
17649, 73syldan 585 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → ((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℂ)
17721rpne0d 12186 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ≠ 0)
17839, 175, 176, 177fsumdivc 14922 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) = Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)))
179105recnd 10405 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℂ)
180179, 54mulcld 10397 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐵 · 𝑥) ∈ ℂ)
181115recnd 10405 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℂ)
18239, 180, 181fsummulc2 14920 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐵 · 𝑥) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛)) = Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((𝐵 · 𝑥) · (1 / 𝑛)))
183174, 178, 1823brtr4d 4918 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ≤ ((𝐵 · 𝑥) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛)))
18443adantr 474 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐵 ∈ ℝ+)
185184rpge0d 12185 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ 𝐵)
186105, 2, 185, 148mulge0d 10952 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ (𝐵 · 𝑥))
18726nnrecred 11426 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℝ)
18823, 187fsumrecl 14872 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ∈ ℝ)
18917, 106resubcld 10803 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) − (log‘𝐴)) ∈ ℝ)
19017, 5readdcld 10406 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) + 1) ∈ ℝ)
19179, 187syldan 585 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))) → (1 / 𝑛) ∈ ℝ)
19276, 191fsumrecl 14872 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛) ∈ ℝ)
193 harmonicubnd 25188 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ ∧ 1 ≤ 𝑥) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ≤ ((log‘𝑥) + 1))
1942, 9, 193syl2anc 579 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) ≤ ((log‘𝑥) + 1))
19510, 66relogdivd 24809 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘(𝑥 / 𝐴)) = ((log‘𝑥) − (log‘𝐴)))
19610, 66rpdivcld 12198 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑥 / 𝐴) ∈ ℝ+)
197 harmoniclbnd 25187 . . . . . . . . . . . . . . 15 ((𝑥 / 𝐴) ∈ ℝ+ → (log‘(𝑥 / 𝐴)) ≤ Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛))
198196, 197syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘(𝑥 / 𝐴)) ≤ Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛))
199195, 198eqbrtrrd 4910 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) − (log‘𝐴)) ≤ Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛))
200188, 189, 190, 192, 194, 199le2subd 10995 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) − Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛)) ≤ (((log‘𝑥) + 1) − ((log‘𝑥) − (log‘𝐴))))
20179, 25syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))) → 𝑛 ∈ ℕ)
202201nnrecred 11426 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))) → (1 / 𝑛) ∈ ℝ)
20376, 202fsumrecl 14872 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛) ∈ ℝ)
204203recnd 10405 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛) ∈ ℂ)
205116recnd 10405 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛) ∈ ℂ)
20626nncnd 11392 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℂ)
20726nnne0d 11425 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ≠ 0)
208206, 207reccld 11144 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 / 𝑛) ∈ ℂ)
20972, 47, 23, 208fsumsplit 14878 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) = (Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛) + Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛)))
210204, 205, 209mvrladdd 10788 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(1 / 𝑛) − Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))(1 / 𝑛)) = Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛))
211 1cnd 10371 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℂ)
212106recnd 10405 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝐴) ∈ ℂ)
213175, 211, 212pnncand 10773 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) − ((log‘𝑥) − (log‘𝐴))) = (1 + (log‘𝐴)))
214211, 212addcomd 10578 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → (1 + (log‘𝐴)) = ((log‘𝐴) + 1))
215213, 214eqtrd 2813 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → (((log‘𝑥) + 1) − ((log‘𝑥) − (log‘𝐴))) = ((log‘𝐴) + 1))
216200, 210, 2153brtr3d 4917 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛) ≤ ((log‘𝐴) + 1))
217116, 107, 113, 186, 216lemul2ad 11318 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐵 · 𝑥) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛)) ≤ ((𝐵 · 𝑥) · ((log‘𝐴) + 1)))
218107recnd 10405 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝐴) + 1) ∈ ℂ)
219179, 54, 218mulassd 10400 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐵 · 𝑥) · ((log‘𝐴) + 1)) = (𝐵 · (𝑥 · ((log‘𝐴) + 1))))
220179, 54, 218mul12d 10585 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐵 · (𝑥 · ((log‘𝐴) + 1))) = (𝑥 · (𝐵 · ((log‘𝐴) + 1))))
221219, 220eqtrd 2813 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐵 · 𝑥) · ((log‘𝐴) + 1)) = (𝑥 · (𝐵 · ((log‘𝐴) + 1))))
222217, 221breqtrd 4912 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐵 · 𝑥) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))(1 / 𝑛)) ≤ (𝑥 · (𝐵 · ((log‘𝐴) + 1))))
223104, 117, 109, 183, 222letrd 10533 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥)) ≤ (𝑥 · (𝐵 · ((log‘𝐴) + 1))))
224104, 109, 20, 112, 223lemul2ad 11318 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · (Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥))) ≤ (2 · (𝑥 · (𝐵 · ((log‘𝐴) + 1)))))
225 2cnd 11453 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ∈ ℂ)
226225, 175, 62, 177div32d 11174 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) = (2 · (Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) / (log‘𝑥))))
227212, 211addcld 10396 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝐴) + 1) ∈ ℂ)
228179, 227mulcld 10397 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐵 · ((log‘𝐴) + 1)) ∈ ℂ)
22954, 225, 228mul12d 10585 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑥 · (2 · (𝐵 · ((log‘𝐴) + 1)))) = (2 · (𝑥 · (𝐵 · ((log‘𝐴) + 1)))))
230224, 226, 2293brtr4d 4918 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ≤ (𝑥 · (2 · (𝐵 · ((log‘𝐴) + 1)))))
231103adantr 474 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · (𝐵 · ((log‘𝐴) + 1))) ∈ ℝ)
23252, 231, 10ledivmuld 12234 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → ((((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥) ≤ (2 · (𝐵 · ((log‘𝐴) + 1))) ↔ ((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ≤ (𝑥 · (2 · (𝐵 · ((log‘𝐴) + 1))))))
233230, 232mpbird 249 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥) ≤ (2 · (𝐵 · ((log‘𝐴) + 1))))
234233adantrr 707 . . . 4 ((𝜑 ∧ (𝑥 ∈ (1(,)+∞) ∧ 1 ≤ 𝑥)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥) ≤ (2 · (𝐵 · ((log‘𝐴) + 1))))
23596, 93, 97, 103, 234ello1d 14662 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥)) ∈ ≤𝑂(1))
23692, 93, 94, 235lo1add 14765 . 2 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + (((2 / (log‘𝑥)) · Σ𝑛 ∈ (((⌊‘(𝑥 / 𝐴)) + 1)...(⌊‘𝑥))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) / 𝑥))) ∈ ≤𝑂(1))
23791, 236eqeltrrd 2859 1 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((((abs‘(𝑅𝑥)) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘(𝑥 / 𝐴)))((abs‘(𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ ≤𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 198  wa 386   = wceq 1601  wcel 2106  wral 3089  cun 3789  cin 3790  wss 3791  c0 4140  ifcif 4306   class class class wbr 4886  cmpt 4965  cfv 6135  (class class class)co 6922  cc 10270  cr 10271  0cc0 10272  1c1 10273   + caddc 10275   · cmul 10277  +∞cpnf 10408   < clt 10411  cle 10412  cmin 10606   / cdiv 11032  cn 11374  2c2 11430  cz 11728  +crp 12137  (,)cioo 12487  ...cfz 12643  cfl 12910  abscabs 14381  ≤𝑂(1)clo1 14626  Σcsu 14824  logclog 24738  Λcvma 25270  ψcchp 25271
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1839  ax-4 1853  ax-5 1953  ax-6 2021  ax-7 2054  ax-8 2108  ax-9 2115  ax-10 2134  ax-11 2149  ax-12 2162  ax-13 2333  ax-ext 2753  ax-rep 5006  ax-sep 5017  ax-nul 5025  ax-pow 5077  ax-pr 5138  ax-un 7226  ax-inf2 8835  ax-cnex 10328  ax-resscn 10329  ax-1cn 10330  ax-icn 10331  ax-addcl 10332  ax-addrcl 10333  ax-mulcl 10334  ax-mulrcl 10335  ax-mulcom 10336  ax-addass 10337  ax-mulass 10338  ax-distr 10339  ax-i2m1 10340  ax-1ne0 10341  ax-1rid 10342  ax-rnegex 10343  ax-rrecex 10344  ax-cnre 10345  ax-pre-lttri 10346  ax-pre-lttrn 10347  ax-pre-ltadd 10348  ax-pre-mulgt0 10349  ax-pre-sup 10350  ax-addf 10351  ax-mulf 10352
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 837  df-3or 1072  df-3an 1073  df-tru 1605  df-fal 1615  df-ex 1824  df-nf 1828  df-sb 2012  df-mo 2550  df-eu 2586  df-clab 2763  df-cleq 2769  df-clel 2773  df-nfc 2920  df-ne 2969  df-nel 3075  df-ral 3094  df-rex 3095  df-reu 3096  df-rmo 3097  df-rab 3098  df-v 3399  df-sbc 3652  df-csb 3751  df-dif 3794  df-un 3796  df-in 3798  df-ss 3805  df-pss 3807  df-nul 4141  df-if 4307  df-pw 4380  df-sn 4398  df-pr 4400  df-tp 4402  df-op 4404  df-uni 4672  df-int 4711  df-iun 4755  df-iin 4756  df-disj 4855  df-br 4887  df-opab 4949  df-mpt 4966  df-tr 4988  df-id 5261  df-eprel 5266  df-po 5274  df-so 5275  df-fr 5314  df-se 5315  df-we 5316  df-xp 5361  df-rel 5362  df-cnv 5363  df-co 5364  df-dm 5365  df-rn 5366  df-res 5367  df-ima 5368  df-pred 5933  df-ord 5979  df-on 5980  df-lim 5981  df-suc 5982  df-iota 6099  df-fun 6137  df-fn 6138  df-f 6139  df-f1 6140  df-fo 6141  df-f1o 6142  df-fv 6143  df-isom 6144  df-riota 6883  df-ov 6925  df-oprab 6926  df-mpt2 6927  df-of 7174  df-om 7344  df-1st 7445  df-2nd 7446  df-supp 7577  df-wrecs 7689  df-recs 7751  df-rdg 7789  df-1o 7843  df-2o 7844  df-oadd 7847  df-er 8026  df-map 8142  df-pm 8143  df-ixp 8195  df-en 8242  df-dom 8243  df-sdom 8244  df-fin 8245  df-fsupp 8564  df-fi 8605  df-sup 8636  df-inf 8637  df-oi 8704  df-card 9098  df-cda 9325  df-pnf 10413  df-mnf 10414  df-xr 10415  df-ltxr 10416  df-le 10417  df-sub 10608  df-neg 10609  df-div 11033  df-nn 11375  df-2 11438  df-3 11439  df-4 11440  df-5 11441  df-6 11442  df-7 11443  df-8 11444  df-9 11445  df-n0 11643  df-xnn0 11715  df-z 11729  df-dec 11846  df-uz 11993  df-q 12096  df-rp 12138  df-xneg 12257  df-xadd 12258  df-xmul 12259  df-ioo 12491  df-ioc 12492  df-ico 12493  df-icc 12494  df-fz 12644  df-fzo 12785  df-fl 12912  df-mod 12988  df-seq 13120  df-exp 13179  df-fac 13379  df-bc 13408  df-hash 13436  df-shft 14214  df-cj 14246  df-re 14247  df-im 14248  df-sqrt 14382  df-abs 14383  df-limsup 14610  df-clim 14627  df-rlim 14628  df-o1 14629  df-lo1 14630  df-sum 14825  df-ef 15200  df-e 15201  df-sin 15202  df-cos 15203  df-pi 15205  df-dvds 15388  df-gcd 15623  df-prm 15791  df-pc 15946  df-struct 16257  df-ndx 16258  df-slot 16259  df-base 16261  df-sets 16262  df-ress 16263  df-plusg 16351  df-mulr 16352  df-starv 16353  df-sca 16354  df-vsca 16355  df-ip 16356  df-tset 16357  df-ple 16358  df-ds 16360  df-unif 16361  df-hom 16362  df-cco 16363  df-rest 16469  df-topn 16470  df-0g 16488  df-gsum 16489  df-topgen 16490  df-pt 16491  df-prds 16494  df-xrs 16548  df-qtop 16553  df-imas 16554  df-xps 16556  df-mre 16632  df-mrc 16633  df-acs 16635  df-mgm 17628  df-sgrp 17670  df-mnd 17681  df-submnd 17722  df-mulg 17928  df-cntz 18133  df-cmn 18581  df-psmet 20134  df-xmet 20135  df-met 20136  df-bl 20137  df-mopn 20138  df-fbas 20139  df-fg 20140  df-cnfld 20143  df-top 21106  df-topon 21123  df-topsp 21145  df-bases 21158  df-cld 21231  df-ntr 21232  df-cls 21233  df-nei 21310  df-lp 21348  df-perf 21349  df-cn 21439  df-cnp 21440  df-haus 21527  df-cmp 21599  df-tx 21774  df-hmeo 21967  df-fil 22058  df-fm 22150  df-flim 22151  df-flf 22152  df-xms 22533  df-ms 22534  df-tms 22535  df-cncf 23089  df-limc 24067  df-dv 24068  df-log 24740  df-cxp 24741  df-em 25171  df-cht 25275  df-vma 25276  df-chp 25277  df-ppi 25278  df-mu 25279
This theorem is referenced by:  pntrlog2bnd  25725
  Copyright terms: Public domain W3C validator