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

Theorem selberg34r 27629
Description: The sum of selberg3r 27627 and selberg4r 27628. (Contributed by Mario Carneiro, 31-May-2016.)
Hypothesis
Ref Expression
pntrval.r 𝑅 = (𝑎 ∈ ℝ+ ↦ ((ψ‘𝑎) − 𝑎))
Assertion
Ref Expression
selberg34r (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 𝑥)) ∈ 𝑂(1)
Distinct variable groups:   𝑚,𝑎,𝑛,𝑥   𝑦,𝑚,𝑅,𝑛,𝑥
Allowed substitution hint:   𝑅(𝑎)

Proof of Theorem selberg34r
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 2re 12337 . . . . . . . . . 10 2 ∈ ℝ
21a1i 11 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ)
3 elioore 13413 . . . . . . . . . . . . 13 (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ)
43adantl 481 . . . . . . . . . . . 12 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ)
5 1rp 13035 . . . . . . . . . . . . 13 1 ∈ ℝ+
65a1i 11 . . . . . . . . . . . 12 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ+)
7 1red 11259 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ)
8 eliooord 13442 . . . . . . . . . . . . . . 15 (𝑥 ∈ (1(,)+∞) → (1 < 𝑥𝑥 < +∞))
98adantl 481 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (1 < 𝑥𝑥 < +∞))
109simpld 494 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 1 < 𝑥)
117, 4, 10ltled 11406 . . . . . . . . . . . 12 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 1 ≤ 𝑥)
124, 6, 11rpgecld 13113 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ+)
13 pntrval.r . . . . . . . . . . . . 13 𝑅 = (𝑎 ∈ ℝ+ ↦ ((ψ‘𝑎) − 𝑎))
1413pntrf 27621 . . . . . . . . . . . 12 𝑅:ℝ+⟶ℝ
1514ffvelcdmi 7102 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → (𝑅𝑥) ∈ ℝ)
1612, 15syl 17 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (𝑅𝑥) ∈ ℝ)
1712relogcld 26679 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ)
1816, 17remulcld 11288 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((𝑅𝑥) · (log‘𝑥)) ∈ ℝ)
192, 18remulcld 11288 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (2 · ((𝑅𝑥) · (log‘𝑥))) ∈ ℝ)
2019recnd 11286 . . . . . . 7 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (2 · ((𝑅𝑥) · (log‘𝑥))) ∈ ℂ)
214, 10rplogcld 26685 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ+)
222, 21rerpdivcld 13105 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℝ)
2322recnd 11286 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (2 / (log‘𝑥)) ∈ ℂ)
24 fzfid 14010 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) ∈ Fin)
2512adantr 480 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ+)
26 elfznn 13589 . . . . . . . . . . . . . . 15 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
2726adantl 481 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
2827nnrpd 13072 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ+)
2925, 28rpdivcld 13091 . . . . . . . . . . . 12 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ+)
3014ffvelcdmi 7102 . . . . . . . . . . . 12 ((𝑥 / 𝑛) ∈ ℝ+ → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
3129, 30syl 17 . . . . . . . . . . 11 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
32 fzfid 14010 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1...𝑛) ∈ Fin)
33 dvdsssfz1 16351 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → {𝑦 ∈ ℕ ∣ 𝑦𝑛} ⊆ (1...𝑛))
3427, 33syl 17 . . . . . . . . . . . . . 14 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → {𝑦 ∈ ℕ ∣ 𝑦𝑛} ⊆ (1...𝑛))
3532, 34ssfid 9298 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → {𝑦 ∈ ℕ ∣ 𝑦𝑛} ∈ Fin)
36 ssrab2 4089 . . . . . . . . . . . . . . . 16 {𝑦 ∈ ℕ ∣ 𝑦𝑛} ⊆ ℕ
37 simpr 484 . . . . . . . . . . . . . . . 16 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})
3836, 37sselid 3992 . . . . . . . . . . . . . . 15 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → 𝑚 ∈ ℕ)
39 vmacl 27175 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ → (Λ‘𝑚) ∈ ℝ)
4038, 39syl 17 . . . . . . . . . . . . . 14 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → (Λ‘𝑚) ∈ ℝ)
41 dvdsdivcl 16349 . . . . . . . . . . . . . . . . 17 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → (𝑛 / 𝑚) ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})
4227, 41sylan 580 . . . . . . . . . . . . . . . 16 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → (𝑛 / 𝑚) ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})
4336, 42sselid 3992 . . . . . . . . . . . . . . 15 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → (𝑛 / 𝑚) ∈ ℕ)
44 vmacl 27175 . . . . . . . . . . . . . . 15 ((𝑛 / 𝑚) ∈ ℕ → (Λ‘(𝑛 / 𝑚)) ∈ ℝ)
4543, 44syl 17 . . . . . . . . . . . . . 14 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → (Λ‘(𝑛 / 𝑚)) ∈ ℝ)
4640, 45remulcld 11288 . . . . . . . . . . . . 13 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) ∈ ℝ)
4735, 46fsumrecl 15766 . . . . . . . . . . . 12 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) ∈ ℝ)
48 vmacl 27175 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
4927, 48syl 17 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
5028relogcld 26679 . . . . . . . . . . . . 13 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℝ)
5149, 50remulcld 11288 . . . . . . . . . . . 12 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (log‘𝑛)) ∈ ℝ)
5247, 51resubcld 11688 . . . . . . . . . . 11 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))) ∈ ℝ)
5331, 52remulcld 11288 . . . . . . . . . 10 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) ∈ ℝ)
5424, 53fsumrecl 15766 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) ∈ ℝ)
5554recnd 11286 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) ∈ ℂ)
5623, 55mulcld 11278 . . . . . . 7 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) ∈ ℂ)
5720, 56subcld 11617 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) ∈ ℂ)
584recnd 11286 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℂ)
59 2cnd 12341 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 2 ∈ ℂ)
6012rpne0d 13079 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 𝑥 ≠ 0)
61 2ne0 12367 . . . . . . 7 2 ≠ 0
6261a1i 11 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → 2 ≠ 0)
6357, 58, 59, 60, 62divdiv32d 12065 . . . . 5 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) / 2) = ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 2) / 𝑥))
6457, 58, 60divcld 12040 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) ∈ ℂ)
6564, 59, 62divrecd 12043 . . . . 5 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) / 2) = ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) · (1 / 2)))
6620, 56, 59, 62divsubdird 12079 . . . . . . 7 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 2) = (((2 · ((𝑅𝑥) · (log‘𝑥))) / 2) − (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) / 2)))
6718recnd 11286 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((𝑅𝑥) · (log‘𝑥)) ∈ ℂ)
6867, 59, 62divcan3d 12045 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) / 2) = ((𝑅𝑥) · (log‘𝑥)))
6921rpcnd 13076 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℂ)
7021rpne0d 13079 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ≠ 0)
7159, 69, 55, 70div32d 12063 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) = (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))))
7271oveq1d 7445 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) / 2) = ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 2))
7354, 21rerpdivcld 13105 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥)) ∈ ℝ)
7473recnd 11286 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥)) ∈ ℂ)
7574, 59, 62divcan3d 12045 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 2) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥)))
7672, 75eqtrd 2774 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) / 2) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥)))
7768, 76oveq12d 7448 . . . . . . 7 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) / 2) − (((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) / 2)) = (((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))))
7866, 77eqtrd 2774 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 2) = (((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))))
7978oveq1d 7445 . . . . 5 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 2) / 𝑥) = ((((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 𝑥))
8063, 65, 793eqtr3d 2782 . . . 4 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) · (1 / 2)) = ((((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 𝑥))
8180mpteq2dva 5247 . . 3 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) · (1 / 2))) = (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 𝑥)))
8222, 54remulcld 11288 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) ∈ ℝ)
8319, 82resubcld 11688 . . . . 5 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) ∈ ℝ)
8483, 12rerpdivcld 13105 . . . 4 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) ∈ ℝ)
857rehalfcld 12510 . . . 4 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (1 / 2) ∈ ℝ)
8631recnd 11286 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑅‘(𝑥 / 𝑛)) ∈ ℂ)
8747recnd 11286 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) ∈ ℂ)
8849recnd 11286 . . . . . . . . . . . . . . . . . 18 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℂ)
8950recnd 11286 . . . . . . . . . . . . . . . . . 18 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘𝑛) ∈ ℂ)
9088, 89mulcld 11278 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (log‘𝑛)) ∈ ℂ)
9186, 87, 90subdid 11716 . . . . . . . . . . . . . . . 16 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) = (((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑛) · (log‘𝑛)))))
9286, 88, 89mul12d 11467 . . . . . . . . . . . . . . . . . 18 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑛) · (log‘𝑛))) = ((Λ‘𝑛) · ((𝑅‘(𝑥 / 𝑛)) · (log‘𝑛))))
9388, 86, 89mulassd 11281 . . . . . . . . . . . . . . . . . 18 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) = ((Λ‘𝑛) · ((𝑅‘(𝑥 / 𝑛)) · (log‘𝑛))))
9492, 93eqtr4d 2777 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑛) · (log‘𝑛))) = (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))
9594oveq2d 7446 . . . . . . . . . . . . . . . 16 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑛) · (log‘𝑛)))) = (((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
9691, 95eqtrd 2774 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) = (((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
9796sumeq2dv 15734 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
9886, 87mulcld 11278 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) ∈ ℂ)
9988, 86mulcld 11278 . . . . . . . . . . . . . . . 16 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) ∈ ℂ)
10099, 89mulcld 11278 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℂ)
10124, 98, 100fsumsub 15820 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
10246recnd 11286 . . . . . . . . . . . . . . . . . 18 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛}) → ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) ∈ ℂ)
10335, 86, 102fsummulc2 15816 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) = Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))))
104103sumeq2dv 15734 . . . . . . . . . . . . . . . 16 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))))
105 oveq2 7438 . . . . . . . . . . . . . . . . . . 19 (𝑛 = (𝑚 · 𝑘) → (𝑥 / 𝑛) = (𝑥 / (𝑚 · 𝑘)))
106105fveq2d 6910 . . . . . . . . . . . . . . . . . 18 (𝑛 = (𝑚 · 𝑘) → (𝑅‘(𝑥 / 𝑛)) = (𝑅‘(𝑥 / (𝑚 · 𝑘))))
107 fvoveq1 7453 . . . . . . . . . . . . . . . . . . 19 (𝑛 = (𝑚 · 𝑘) → (Λ‘(𝑛 / 𝑚)) = (Λ‘((𝑚 · 𝑘) / 𝑚)))
108107oveq2d 7446 . . . . . . . . . . . . . . . . . 18 (𝑛 = (𝑚 · 𝑘) → ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) = ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚))))
109106, 108oveq12d 7448 . . . . . . . . . . . . . . . . 17 (𝑛 = (𝑚 · 𝑘) → ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) = ((𝑅‘(𝑥 / (𝑚 · 𝑘))) · ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚)))))
11031adantrr 717 . . . . . . . . . . . . . . . . . . 19 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})) → (𝑅‘(𝑥 / 𝑛)) ∈ ℝ)
11140anasss 466 . . . . . . . . . . . . . . . . . . . 20 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})) → (Λ‘𝑚) ∈ ℝ)
11245anasss 466 . . . . . . . . . . . . . . . . . . . 20 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})) → (Λ‘(𝑛 / 𝑚)) ∈ ℝ)
113111, 112remulcld 11288 . . . . . . . . . . . . . . . . . . 19 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})) → ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) ∈ ℝ)
114110, 113remulcld 11288 . . . . . . . . . . . . . . . . . 18 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})) → ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) ∈ ℝ)
115114recnd 11286 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ (𝑛 ∈ (1...(⌊‘𝑥)) ∧ 𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛})) → ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) ∈ ℂ)
116109, 4, 115dvdsflsumcom 27245 . . . . . . . . . . . . . . . 16 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((𝑅‘(𝑥 / 𝑛)) · ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) = Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((𝑅‘(𝑥 / (𝑚 · 𝑘))) · ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚)))))
11758ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑥 ∈ ℂ)
118 elfznn 13589 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑚 ∈ (1...(⌊‘𝑥)) → 𝑚 ∈ ℕ)
119118adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℕ)
120119nnrpd 13072 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → 𝑚 ∈ ℝ+)
121120adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑚 ∈ ℝ+)
122121rpcnd 13076 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑚 ∈ ℂ)
123 elfznn 13589 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚))) → 𝑘 ∈ ℕ)
124123adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑘 ∈ ℕ)
125124nncnd 12279 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑘 ∈ ℂ)
126121rpne0d 13079 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑚 ≠ 0)
127124nnne0d 12313 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑘 ≠ 0)
128117, 122, 125, 126, 127divdiv1d 12071 . . . . . . . . . . . . . . . . . . . . . . 23 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((𝑥 / 𝑚) / 𝑘) = (𝑥 / (𝑚 · 𝑘)))
129128eqcomd 2740 . . . . . . . . . . . . . . . . . . . . . 22 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (𝑥 / (𝑚 · 𝑘)) = ((𝑥 / 𝑚) / 𝑘))
130129fveq2d 6910 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (𝑅‘(𝑥 / (𝑚 · 𝑘))) = (𝑅‘((𝑥 / 𝑚) / 𝑘)))
131125, 122, 126divcan3d 12045 . . . . . . . . . . . . . . . . . . . . . . 23 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((𝑚 · 𝑘) / 𝑚) = 𝑘)
132131fveq2d 6910 . . . . . . . . . . . . . . . . . . . . . 22 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (Λ‘((𝑚 · 𝑘) / 𝑚)) = (Λ‘𝑘))
133132oveq2d 7446 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚))) = ((Λ‘𝑚) · (Λ‘𝑘)))
134130, 133oveq12d 7448 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((𝑅‘(𝑥 / (𝑚 · 𝑘))) · ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚)))) = ((𝑅‘((𝑥 / 𝑚) / 𝑘)) · ((Λ‘𝑚) · (Λ‘𝑘))))
13512ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑥 ∈ ℝ+)
136135, 121rpdivcld 13091 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (𝑥 / 𝑚) ∈ ℝ+)
137124nnrpd 13072 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → 𝑘 ∈ ℝ+)
138136, 137rpdivcld 13091 . . . . . . . . . . . . . . . . . . . . . . 23 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((𝑥 / 𝑚) / 𝑘) ∈ ℝ+)
13914ffvelcdmi 7102 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑥 / 𝑚) / 𝑘) ∈ ℝ+ → (𝑅‘((𝑥 / 𝑚) / 𝑘)) ∈ ℝ)
140138, 139syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (𝑅‘((𝑥 / 𝑚) / 𝑘)) ∈ ℝ)
141140recnd 11286 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (𝑅‘((𝑥 / 𝑚) / 𝑘)) ∈ ℂ)
142119, 39syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑚) ∈ ℝ)
143142recnd 11286 . . . . . . . . . . . . . . . . . . . . . . 23 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑚) ∈ ℂ)
144143adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (Λ‘𝑚) ∈ ℂ)
145 vmacl 27175 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ ℕ → (Λ‘𝑘) ∈ ℝ)
146124, 145syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (Λ‘𝑘) ∈ ℝ)
147146recnd 11286 . . . . . . . . . . . . . . . . . . . . . 22 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (Λ‘𝑘) ∈ ℂ)
148144, 147mulcld 11278 . . . . . . . . . . . . . . . . . . . . 21 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((Λ‘𝑚) · (Λ‘𝑘)) ∈ ℂ)
149141, 148mulcomd 11279 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((𝑅‘((𝑥 / 𝑚) / 𝑘)) · ((Λ‘𝑚) · (Λ‘𝑘))) = (((Λ‘𝑚) · (Λ‘𝑘)) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))
150144, 147, 141mulassd 11281 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → (((Λ‘𝑚) · (Λ‘𝑘)) · (𝑅‘((𝑥 / 𝑚) / 𝑘))) = ((Λ‘𝑚) · ((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))
151134, 149, 1503eqtrd 2778 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((𝑅‘(𝑥 / (𝑚 · 𝑘))) · ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚)))) = ((Λ‘𝑚) · ((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))
152151sumeq2dv 15734 . . . . . . . . . . . . . . . . . 18 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((𝑅‘(𝑥 / (𝑚 · 𝑘))) · ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚)))) = Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑚) · ((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))
153 fzfid 14010 . . . . . . . . . . . . . . . . . . 19 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘(𝑥 / 𝑚))) ∈ Fin)
154146, 140remulcld 11288 . . . . . . . . . . . . . . . . . . . 20 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))) ∈ ℝ)
155154recnd 11286 . . . . . . . . . . . . . . . . . . 19 ((((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) ∧ 𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))) → ((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))) ∈ ℂ)
156153, 143, 155fsummulc2 15816 . . . . . . . . . . . . . . . . . 18 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) = Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑚) · ((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))
157152, 156eqtr4d 2777 . . . . . . . . . . . . . . . . 17 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((𝑅‘(𝑥 / (𝑚 · 𝑘))) · ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚)))) = ((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))
158157sumeq2dv 15734 . . . . . . . . . . . . . . . 16 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑚 ∈ (1...(⌊‘𝑥))Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((𝑅‘(𝑥 / (𝑚 · 𝑘))) · ((Λ‘𝑚) · (Λ‘((𝑚 · 𝑘) / 𝑚)))) = Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))
159104, 116, 1583eqtrd 2778 . . . . . . . . . . . . . . 15 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) = Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))
160159oveq1d 7445 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚)))) − Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) − Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
16197, 101, 1603eqtrd 2778 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) = (Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) − Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))
162161oveq2d 7446 . . . . . . . . . . . 12 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) = ((2 / (log‘𝑥)) · (Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) − Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
163153, 154fsumrecl 15766 . . . . . . . . . . . . . . . 16 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))) ∈ ℝ)
164142, 163remulcld 11288 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑚 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) ∈ ℝ)
16524, 164fsumrecl 15766 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) ∈ ℝ)
166165recnd 11286 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) ∈ ℂ)
16749, 31remulcld 11288 . . . . . . . . . . . . . . . 16 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) ∈ ℝ)
168167, 50remulcld 11288 . . . . . . . . . . . . . . 15 (((⊤ ∧ 𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
16924, 168fsumrecl 15766 . . . . . . . . . . . . . 14 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℝ)
170169recnd 11286 . . . . . . . . . . . . 13 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)) ∈ ℂ)
17123, 166, 170subdid 11716 . . . . . . . . . . . 12 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · (Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))) − Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) = (((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
172162, 171eqtrd 2774 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛))))) = (((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
173172oveq2d 7446 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) = ((2 · ((𝑅𝑥) · (log‘𝑥))) − (((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))))
17423, 166mulcld 11278 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))) ∈ ℂ)
17522, 169remulcld 11288 . . . . . . . . . . . 12 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ∈ ℝ)
176175recnd 11286 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))) ∈ ℂ)
17720, 174, 176subsub3d 11647 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) − (((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛))))) = (((2 · ((𝑅𝑥) · (log‘𝑥))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))))
178173, 177eqtrd 2774 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) = (((2 · ((𝑅𝑥) · (log‘𝑥))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))))
179672timesd 12506 . . . . . . . . . . . 12 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (2 · ((𝑅𝑥) · (log‘𝑥))) = (((𝑅𝑥) · (log‘𝑥)) + ((𝑅𝑥) · (log‘𝑥))))
180179oveq1d 7445 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) = ((((𝑅𝑥) · (log‘𝑥)) + ((𝑅𝑥) · (log‘𝑥))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
18167, 176, 67add32d 11486 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((𝑅𝑥) · (log‘𝑥))) = ((((𝑅𝑥) · (log‘𝑥)) + ((𝑅𝑥) · (log‘𝑥))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))))
182180, 181eqtr4d 2777 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) = ((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((𝑅𝑥) · (log‘𝑥))))
183182oveq1d 7445 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) = (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))))
18418, 175readdcld 11287 . . . . . . . . . . 11 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) ∈ ℝ)
185184recnd 11286 . . . . . . . . . 10 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) ∈ ℂ)
186185, 67, 174addsubassd 11637 . . . . . . . . 9 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) = ((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + (((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))))))
187178, 183, 1863eqtrd 2778 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) = ((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + (((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))))))
188187oveq1d 7445 . . . . . . 7 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) = (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + (((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))))) / 𝑥))
18967, 174subcld 11617 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) ∈ ℂ)
190185, 189, 58, 60divdird 12078 . . . . . . 7 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) + (((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))))) / 𝑥) = (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + ((((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) / 𝑥)))
191188, 190eqtrd 2774 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) = (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + ((((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) / 𝑥)))
192191mpteq2dva 5247 . . . . 5 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥)) = (𝑥 ∈ (1(,)+∞) ↦ (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + ((((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) / 𝑥))))
193184, 12rerpdivcld 13105 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) ∈ ℝ)
19422, 165remulcld 11288 . . . . . . . 8 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘))))) ∈ ℝ)
19518, 194resubcld 11688 . . . . . . 7 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → (((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) ∈ ℝ)
196195, 12rerpdivcld 13105 . . . . . 6 ((⊤ ∧ 𝑥 ∈ (1(,)+∞)) → ((((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) / 𝑥) ∈ ℝ)
19713selberg3r 27627 . . . . . . 7 (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ 𝑂(1)
198197a1i 11 . . . . . 6 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥)) ∈ 𝑂(1))
19913selberg4r 27628 . . . . . . 7 (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) / 𝑥)) ∈ 𝑂(1)
200199a1i 11 . . . . . 6 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) / 𝑥)) ∈ 𝑂(1))
201193, 196, 198, 200o1add2 15656 . . . . 5 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ (((((𝑅𝑥) · (log‘𝑥)) + ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · (𝑅‘(𝑥 / 𝑛))) · (log‘𝑛)))) / 𝑥) + ((((𝑅𝑥) · (log‘𝑥)) − ((2 / (log‘𝑥)) · Σ𝑚 ∈ (1...(⌊‘𝑥))((Λ‘𝑚) · Σ𝑘 ∈ (1...(⌊‘(𝑥 / 𝑚)))((Λ‘𝑘) · (𝑅‘((𝑥 / 𝑚) / 𝑘)))))) / 𝑥))) ∈ 𝑂(1))
202192, 201eqeltrd 2838 . . . 4 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ (((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥)) ∈ 𝑂(1))
203 ioossre 13444 . . . . 5 (1(,)+∞) ⊆ ℝ
204 1cnd 11253 . . . . . 6 (⊤ → 1 ∈ ℂ)
205204halfcld 12508 . . . . 5 (⊤ → (1 / 2) ∈ ℂ)
206 o1const 15652 . . . . 5 (((1(,)+∞) ⊆ ℝ ∧ (1 / 2) ∈ ℂ) → (𝑥 ∈ (1(,)+∞) ↦ (1 / 2)) ∈ 𝑂(1))
207203, 205, 206sylancr 587 . . . 4 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ (1 / 2)) ∈ 𝑂(1))
20884, 85, 202, 207o1mul2 15657 . . 3 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ ((((2 · ((𝑅𝑥) · (log‘𝑥))) − ((2 / (log‘𝑥)) · Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))))) / 𝑥) · (1 / 2))) ∈ 𝑂(1))
20981, 208eqeltrrd 2839 . 2 (⊤ → (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 𝑥)) ∈ 𝑂(1))
210209mptru 1543 1 (𝑥 ∈ (1(,)+∞) ↦ ((((𝑅𝑥) · (log‘𝑥)) − (Σ𝑛 ∈ (1...(⌊‘𝑥))((𝑅‘(𝑥 / 𝑛)) · (Σ𝑚 ∈ {𝑦 ∈ ℕ ∣ 𝑦𝑛} ((Λ‘𝑚) · (Λ‘(𝑛 / 𝑚))) − ((Λ‘𝑛) · (log‘𝑛)))) / (log‘𝑥))) / 𝑥)) ∈ 𝑂(1)
Colors of variables: wff setvar class
Syntax hints:  wa 395   = wceq 1536  wtru 1537  wcel 2105  wne 2937  {crab 3432  wss 3962   class class class wbr 5147  cmpt 5230  cfv 6562  (class class class)co 7430  cc 11150  cr 11151  0cc0 11152  1c1 11153   + caddc 11155   · cmul 11157  +∞cpnf 11289   < clt 11292  cmin 11489   / cdiv 11917  cn 12263  2c2 12318  +crp 13031  (,)cioo 13383  ...cfz 13543  cfl 13826  𝑂(1)co1 15518  Σcsu 15718  cdvds 16286  logclog 26610  Λcvma 27149  ψcchp 27150
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1791  ax-4 1805  ax-5 1907  ax-6 1964  ax-7 2004  ax-8 2107  ax-9 2115  ax-10 2138  ax-11 2154  ax-12 2174  ax-ext 2705  ax-rep 5284  ax-sep 5301  ax-nul 5311  ax-pow 5370  ax-pr 5437  ax-un 7753  ax-inf2 9678  ax-cnex 11208  ax-resscn 11209  ax-1cn 11210  ax-icn 11211  ax-addcl 11212  ax-addrcl 11213  ax-mulcl 11214  ax-mulrcl 11215  ax-mulcom 11216  ax-addass 11217  ax-mulass 11218  ax-distr 11219  ax-i2m1 11220  ax-1ne0 11221  ax-1rid 11222  ax-rnegex 11223  ax-rrecex 11224  ax-cnre 11225  ax-pre-lttri 11226  ax-pre-lttrn 11227  ax-pre-ltadd 11228  ax-pre-mulgt0 11229  ax-pre-sup 11230  ax-addf 11231
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1539  df-fal 1549  df-ex 1776  df-nf 1780  df-sb 2062  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2726  df-clel 2813  df-nfc 2889  df-ne 2938  df-nel 3044  df-ral 3059  df-rex 3068  df-rmo 3377  df-reu 3378  df-rab 3433  df-v 3479  df-sbc 3791  df-csb 3908  df-dif 3965  df-un 3967  df-in 3969  df-ss 3979  df-pss 3982  df-nul 4339  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-tp 4635  df-op 4637  df-uni 4912  df-int 4951  df-iun 4997  df-iin 4998  df-disj 5115  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5582  df-eprel 5588  df-po 5596  df-so 5597  df-fr 5640  df-se 5641  df-we 5642  df-xp 5694  df-rel 5695  df-cnv 5696  df-co 5697  df-dm 5698  df-rn 5699  df-res 5700  df-ima 5701  df-pred 6322  df-ord 6388  df-on 6389  df-lim 6390  df-suc 6391  df-iota 6515  df-fun 6564  df-fn 6565  df-f 6566  df-f1 6567  df-fo 6568  df-f1o 6569  df-fv 6570  df-isom 6571  df-riota 7387  df-ov 7433  df-oprab 7434  df-mpo 7435  df-of 7696  df-om 7887  df-1st 8012  df-2nd 8013  df-supp 8184  df-frecs 8304  df-wrecs 8335  df-recs 8409  df-rdg 8448  df-1o 8504  df-2o 8505  df-oadd 8508  df-er 8743  df-map 8866  df-pm 8867  df-ixp 8936  df-en 8984  df-dom 8985  df-sdom 8986  df-fin 8987  df-fsupp 9399  df-fi 9448  df-sup 9479  df-inf 9480  df-oi 9547  df-dju 9938  df-card 9976  df-pnf 11294  df-mnf 11295  df-xr 11296  df-ltxr 11297  df-le 11298  df-sub 11491  df-neg 11492  df-div 11918  df-nn 12264  df-2 12326  df-3 12327  df-4 12328  df-5 12329  df-6 12330  df-7 12331  df-8 12332  df-9 12333  df-n0 12524  df-xnn0 12597  df-z 12611  df-dec 12731  df-uz 12876  df-q 12988  df-rp 13032  df-xneg 13151  df-xadd 13152  df-xmul 13153  df-ioo 13387  df-ioc 13388  df-ico 13389  df-icc 13390  df-fz 13544  df-fzo 13691  df-fl 13828  df-mod 13906  df-seq 14039  df-exp 14099  df-fac 14309  df-bc 14338  df-hash 14366  df-shft 15102  df-cj 15134  df-re 15135  df-im 15136  df-sqrt 15270  df-abs 15271  df-limsup 15503  df-clim 15520  df-rlim 15521  df-o1 15522  df-lo1 15523  df-sum 15719  df-ef 16099  df-e 16100  df-sin 16101  df-cos 16102  df-tan 16103  df-pi 16104  df-dvds 16287  df-gcd 16528  df-prm 16705  df-pc 16870  df-struct 17180  df-sets 17197  df-slot 17215  df-ndx 17227  df-base 17245  df-ress 17274  df-plusg 17310  df-mulr 17311  df-starv 17312  df-sca 17313  df-vsca 17314  df-ip 17315  df-tset 17316  df-ple 17317  df-ds 17319  df-unif 17320  df-hom 17321  df-cco 17322  df-rest 17468  df-topn 17469  df-0g 17487  df-gsum 17488  df-topgen 17489  df-pt 17490  df-prds 17493  df-xrs 17548  df-qtop 17553  df-imas 17554  df-xps 17556  df-mre 17630  df-mrc 17631  df-acs 17633  df-mgm 18665  df-sgrp 18744  df-mnd 18760  df-submnd 18809  df-mulg 19098  df-cntz 19347  df-cmn 19814  df-psmet 21373  df-xmet 21374  df-met 21375  df-bl 21376  df-mopn 21377  df-fbas 21378  df-fg 21379  df-cnfld 21382  df-top 22915  df-topon 22932  df-topsp 22954  df-bases 22968  df-cld 23042  df-ntr 23043  df-cls 23044  df-nei 23121  df-lp 23159  df-perf 23160  df-cn 23250  df-cnp 23251  df-haus 23338  df-cmp 23410  df-tx 23585  df-hmeo 23778  df-fil 23869  df-fm 23961  df-flim 23962  df-flf 23963  df-xms 24345  df-ms 24346  df-tms 24347  df-cncf 24917  df-limc 25915  df-dv 25916  df-ulm 26434  df-log 26612  df-cxp 26613  df-atan 26924  df-em 27050  df-cht 27154  df-vma 27155  df-chp 27156  df-ppi 27157  df-mu 27158
This theorem is referenced by:  pntrlog2bndlem1  27635
  Copyright terms: Public domain W3C validator