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

Theorem selberg4lem1 25828
Description: Lemma for selberg4 25829. Equation 10.4.20 of [Shapiro], p. 422. (Contributed by Mario Carneiro, 30-May-2016.)
Hypotheses
Ref Expression
selberg4lem1.1 (𝜑𝐴 ∈ ℝ+)
selberg4lem1.2 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) ≤ 𝐴)
Assertion
Ref Expression
selberg4lem1 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1))
Distinct variable groups:   𝑖,𝑚,𝑛,𝑥,𝑦,𝐴   𝜑,𝑚,𝑛,𝑥
Allowed substitution hints:   𝜑(𝑦,𝑖)

Proof of Theorem selberg4lem1
StepHypRef Expression
1 2cnd 11511 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ∈ ℂ)
2 fzfid 13149 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) ∈ Fin)
3 elfznn 12745 . . . . . . . . . . . . 13 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
43adantl 474 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
5 vmacl 25387 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
64, 5syl 17 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
76, 4nndivred 11487 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
8 elioore 12577 . . . . . . . . . . . . . . 15 (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ)
98adantl 474 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ)
10 1rp 12201 . . . . . . . . . . . . . . 15 1 ∈ ℝ+
1110a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ+)
12 1red 10432 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ)
13 eliooord 12605 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ (1(,)+∞) → (1 < 𝑥𝑥 < +∞))
1413adantl 474 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (1(,)+∞)) → (1 < 𝑥𝑥 < +∞))
1514simpld 487 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 < 𝑥)
1612, 9, 15ltled 10580 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ≤ 𝑥)
179, 11, 16rpgecld 12280 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ+)
1817adantr 473 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ+)
194nnrpd 12239 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ+)
2018, 19rpdivcld 12258 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ+)
2120relogcld 24897 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘(𝑥 / 𝑛)) ∈ ℝ)
227, 21remulcld 10462 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℝ)
232, 22fsumrecl 14941 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℝ)
249, 15rplogcld 24903 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ+)
2523, 24rerpdivcld 12272 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) ∈ ℝ)
2625recnd 10460 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) ∈ ℂ)
2717relogcld 24897 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ)
2827rehalfcld 11687 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / 2) ∈ ℝ)
2928recnd 10460 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / 2) ∈ ℂ)
301, 26, 29subdid 10889 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) = ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (2 · ((log‘𝑥) / 2))))
3127recnd 10460 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℂ)
32 2ne0 11544 . . . . . . . 8 2 ≠ 0
3332a1i 11 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ≠ 0)
3431, 1, 33divcan2d 11211 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · ((log‘𝑥) / 2)) = (log‘𝑥))
3534oveq2d 6986 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (2 · ((log‘𝑥) / 2))) = ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))
3630, 35eqtrd 2808 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) = ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))
3736mpteq2dva 5016 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2)))) = (𝑥 ∈ (1(,)+∞) ↦ ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))))
38 2re 11507 . . . . 5 2 ∈ ℝ
3938a1i 11 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ)
4025, 28resubcld 10861 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2)) ∈ ℝ)
41 ioossre 12607 . . . . . 6 (1(,)+∞) ⊆ ℝ
42 2cn 11508 . . . . . 6 2 ∈ ℂ
43 o1const 14827 . . . . . 6 (((1(,)+∞) ⊆ ℝ ∧ 2 ∈ ℂ) → (𝑥 ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1))
4441, 42, 43mp2an 679 . . . . 5 (𝑥 ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1)
4544a1i 11 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1))
46 vmalogdivsum2 25806 . . . . 5 (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) ∈ 𝑂(1)
4746a1i 11 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) ∈ 𝑂(1))
4839, 40, 45, 47o1mul2 14832 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2)))) ∈ 𝑂(1))
4937, 48eqeltrrd 2861 . 2 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1))
50 fzfid 13149 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘(𝑥 / 𝑛))) ∈ Fin)
51 elfznn 12745 . . . . . . . . . . . 12 (𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛))) → 𝑚 ∈ ℕ)
5251adantl 474 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → 𝑚 ∈ ℕ)
53 vmacl 25387 . . . . . . . . . . 11 (𝑚 ∈ ℕ → (Λ‘𝑚) ∈ ℝ)
5452, 53syl 17 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (Λ‘𝑚) ∈ ℝ)
5552nnrpd 12239 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → 𝑚 ∈ ℝ+)
5655relogcld 24897 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (log‘𝑚) ∈ ℝ)
579adantr 473 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
5857, 4nndivred 11487 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ)
5958adantr 473 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (𝑥 / 𝑛) ∈ ℝ)
6059, 52nndivred 11487 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → ((𝑥 / 𝑛) / 𝑚) ∈ ℝ)
61 chpcl 25393 . . . . . . . . . . . 12 (((𝑥 / 𝑛) / 𝑚) ∈ ℝ → (ψ‘((𝑥 / 𝑛) / 𝑚)) ∈ ℝ)
6260, 61syl 17 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (ψ‘((𝑥 / 𝑛) / 𝑚)) ∈ ℝ)
6356, 62readdcld 10461 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))) ∈ ℝ)
6454, 63remulcld 10462 . . . . . . . . 9 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) ∈ ℝ)
6550, 64fsumrecl 14941 . . . . . . . 8 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) ∈ ℝ)
666, 65remulcld 10462 . . . . . . 7 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℝ)
672, 66fsumrecl 14941 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℝ)
6817, 24rpmulcld 12257 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑥 · (log‘𝑥)) ∈ ℝ+)
6967, 68rerpdivcld 12272 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) ∈ ℝ)
7069, 27resubcld 10861 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) ∈ ℝ)
7170recnd 10460 . . 3 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) ∈ ℂ)
7223recnd 10460 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℂ)
7324rpne0d 12246 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ≠ 0)
7472, 31, 73divcld 11209 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) ∈ ℂ)
751, 74mulcld 10452 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) ∈ ℂ)
7675, 31subcld 10790 . . 3 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)) ∈ ℂ)
7769recnd 10460 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) ∈ ℂ)
7877, 75, 31nnncan2d 10825 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)))))
7967recnd 10460 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℂ)
809recnd 10460 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℂ)
8117rpne0d 12246 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ≠ 0)
8279, 80, 31, 81, 73divdiv1d 11240 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))))
831, 72, 31, 73divassd 11244 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥)) = (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))))
8482, 83oveq12d 6988 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) − ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)))))
8567, 17rerpdivcld 12272 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℝ)
8685recnd 10460 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℂ)
871, 72mulcld 10452 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) ∈ ℂ)
8886, 87, 31, 73divsubdird 11248 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) / (log‘𝑥)) = (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) − ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥))))
8981adantr 473 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ≠ 0)
9066, 57, 89redivcld 11261 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℝ)
9190recnd 10460 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℂ)
9238a1i 11 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℝ)
9392, 22remulcld 10462 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) ∈ ℝ)
9493recnd 10460 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) ∈ ℂ)
952, 91, 94fsumsub 14993 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − Σ𝑛 ∈ (1...(⌊‘𝑥))(2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
966recnd 10460 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℂ)
9765, 57, 89redivcld 11261 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) ∈ ℝ)
9897recnd 10460 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) ∈ ℂ)
99 2cnd 11511 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℂ)
10021recnd 10460 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘(𝑥 / 𝑛)) ∈ ℂ)
1014nncnd 11449 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℂ)
1024nnne0d 11483 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ≠ 0)
103100, 101, 102divcld 11209 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘(𝑥 / 𝑛)) / 𝑛) ∈ ℂ)
10499, 103mulcld 10452 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) ∈ ℂ)
10596, 98, 104subdid 10889 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) = (((Λ‘𝑛) · (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥)) − ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))))
10665recnd 10460 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) ∈ ℂ)
10780adantr 473 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
10896, 106, 107, 89divassd 11244 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) = ((Λ‘𝑛) · (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥)))
10996, 101, 100, 102div32d 11232 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) = ((Λ‘𝑛) · ((log‘(𝑥 / 𝑛)) / 𝑛)))
110109oveq2d 6986 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) = (2 · ((Λ‘𝑛) · ((log‘(𝑥 / 𝑛)) / 𝑛))))
11199, 96, 103mul12d 10641 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · ((Λ‘𝑛) · ((log‘(𝑥 / 𝑛)) / 𝑛))) = ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))
112110, 111eqtrd 2808 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) = ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))
113108, 112oveq12d 6988 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = (((Λ‘𝑛) · (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥)) − ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))))
114105, 113eqtr4d 2811 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) = ((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
115114sumeq2dv 14910 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
11666recnd 10460 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℂ)
1172, 80, 116, 81fsumdivc 14991 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥))
11822recnd 10460 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℂ)
1192, 1, 118fsummulc2 14989 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))))
120117, 119oveq12d 6988 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − Σ𝑛 ∈ (1...(⌊‘𝑥))(2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
12195, 115, 1203eqtr4rd 2819 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))))
122121oveq1d 6985 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) / (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)))
12388, 122eqtr3d 2810 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) − ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)))
12478, 84, 1233eqtr2d 2814 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)))
125124mpteq2dva 5016 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))) = (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))))
126 1red 10432 . . . . 5 (𝜑 → 1 ∈ ℝ)
127 selberg4lem1.1 . . . . . . . 8 (𝜑𝐴 ∈ ℝ+)
128127adantr 473 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐴 ∈ ℝ+)
129128rpred 12241 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐴 ∈ ℝ)
1302, 7fsumrecl 14941 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℝ)
131130, 24rerpdivcld 12272 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) ∈ ℝ)
132127rpcnd 12243 . . . . . . 7 (𝜑𝐴 ∈ ℂ)
133 o1const 14827 . . . . . . 7 (((1(,)+∞) ⊆ ℝ ∧ 𝐴 ∈ ℂ) → (𝑥 ∈ (1(,)+∞) ↦ 𝐴) ∈ 𝑂(1))
13441, 132, 133sylancr 578 . . . . . 6 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 𝐴) ∈ 𝑂(1))
135 1cnd 10426 . . . . . . . 8 (𝜑 → 1 ∈ ℂ)
136 o1const 14827 . . . . . . . 8 (((1(,)+∞) ⊆ ℝ ∧ 1 ∈ ℂ) → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ 𝑂(1))
13741, 135, 136sylancr 578 . . . . . . 7 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ 𝑂(1))
138131recnd 10460 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) ∈ ℂ)
139 1cnd 10426 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℂ)
140130recnd 10460 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
141140, 31, 31, 73divsubdird 11248 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) / (log‘𝑥)) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − ((log‘𝑥) / (log‘𝑥))))
142140, 31subcld 10790 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) ∈ ℂ)
143142, 31, 73divrecd 11212 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) / (log‘𝑥)) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥))))
14431, 73dividd 11207 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / (log‘𝑥)) = 1)
145144oveq2d 6986 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − ((log‘𝑥) / (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1))
146141, 143, 1453eqtr3d 2816 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1))
147146mpteq2dva 5016 . . . . . . . . 9 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥)))) = (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1)))
148130, 27resubcld 10861 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) ∈ ℝ)
14912, 24rerpdivcld 12272 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (1 / (log‘𝑥)) ∈ ℝ)
15017ex 405 . . . . . . . . . . . 12 (𝜑 → (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ+))
151150ssrdv 3860 . . . . . . . . . . 11 (𝜑 → (1(,)+∞) ⊆ ℝ+)
152 vmadivsum 25750 . . . . . . . . . . . 12 (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1)
153152a1i 11 . . . . . . . . . . 11 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1))
154151, 153o1res2 14771 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1))
155 divlogrlim 24909 . . . . . . . . . . 11 (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝𝑟 0
156 rlimo1 14824 . . . . . . . . . . 11 ((𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝𝑟 0 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
157155, 156mp1i 13 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
158148, 149, 154, 157o1mul2 14832 . . . . . . . . 9 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥)))) ∈ 𝑂(1))
159147, 158eqeltrrd 2861 . . . . . . . 8 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1)) ∈ 𝑂(1))
160138, 139, 159o1dif 14837 . . . . . . 7 (𝜑 → ((𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))) ∈ 𝑂(1) ↔ (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ 𝑂(1)))
161137, 160mpbird 249 . . . . . 6 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))) ∈ 𝑂(1))
162129, 131, 134, 161o1mul2 14832 . . . . 5 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))) ∈ 𝑂(1))
163129, 131remulcld 10462 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))) ∈ ℝ)
16421, 4nndivred 11487 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘(𝑥 / 𝑛)) / 𝑛) ∈ ℝ)
16592, 164remulcld 10462 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) ∈ ℝ)
16697, 165resubcld 10861 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) ∈ ℝ)
1676, 166remulcld 10462 . . . . . . . 8 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℝ)
1682, 167fsumrecl 14941 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℝ)
169168, 24rerpdivcld 12272 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)) ∈ ℝ)
170169recnd 10460 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)) ∈ ℂ)
171168recnd 10460 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℂ)
172171abscld 14647 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ∈ ℝ)
173129, 130remulcld 10462 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) ∈ ℝ)
17498, 104subcld 10790 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) ∈ ℂ)
17596, 174mulcld 10452 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℂ)
176175abscld 14647 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ∈ ℝ)
1772, 176fsumrecl 14941 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ∈ ℝ)
178167recnd 10460 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℂ)
1792, 178fsumabs 15006 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
180129adantr 473 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐴 ∈ ℝ)
181180, 7remulcld 10462 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐴 · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
182174abscld 14647 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℝ)
183180, 4nndivred 11487 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐴 / 𝑛) ∈ ℝ)
184 vmage0 25390 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
1854, 184syl 17 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (Λ‘𝑛))
186106, 107, 101, 89, 102divdiv2d 11241 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) · 𝑛) / 𝑥))
187106, 101, 107, 89div23d 11246 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) · 𝑛) / 𝑥) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛))
188186, 187eqtrd 2808 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛))
18999, 103, 101mulassd 10455 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛) = (2 · (((log‘(𝑥 / 𝑛)) / 𝑛) · 𝑛)))
190100, 101, 102divcan1d 11210 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((log‘(𝑥 / 𝑛)) / 𝑛) · 𝑛) = (log‘(𝑥 / 𝑛)))
191190oveq2d 6986 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((log‘(𝑥 / 𝑛)) / 𝑛) · 𝑛)) = (2 · (log‘(𝑥 / 𝑛))))
192189, 191eqtr2d 2809 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (log‘(𝑥 / 𝑛))) = ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛))
193188, 192oveq12d 6988 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛)))) = (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛) − ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛)))
19498, 104, 101subdird 10890 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛) = (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛) − ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛)))
195193, 194eqtr4d 2811 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛)))) = (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛))
196195fveq2d 6497 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) = (abs‘(((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛)))
197174, 101absmuld 14665 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛)) = ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · (abs‘𝑛)))
1984nnred 11448 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
19919rpge0d 12245 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ 𝑛)
200198, 199absidd 14633 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘𝑛) = 𝑛)
201200oveq2d 6986 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · (abs‘𝑛)) = ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛))
202196, 197, 2013eqtrd 2812 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) = ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛))
203 fveq2 6493 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑚 → (Λ‘𝑖) = (Λ‘𝑚))
204 fveq2 6493 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑚 → (log‘𝑖) = (log‘𝑚))
205 oveq2 6978 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑖 = 𝑚 → (𝑦 / 𝑖) = (𝑦 / 𝑚))
206205fveq2d 6497 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑚 → (ψ‘(𝑦 / 𝑖)) = (ψ‘(𝑦 / 𝑚)))
207204, 206oveq12d 6988 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑚 → ((log‘𝑖) + (ψ‘(𝑦 / 𝑖))) = ((log‘𝑚) + (ψ‘(𝑦 / 𝑚))))
208203, 207oveq12d 6988 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝑚 → ((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) = ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))))
209208cbvsumv 14903 . . . . . . . . . . . . . . . . . . . . . 22 Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) = Σ𝑚 ∈ (1...(⌊‘𝑦))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚))))
210 fveq2 6493 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑥 / 𝑛) → (⌊‘𝑦) = (⌊‘(𝑥 / 𝑛)))
211210oveq2d 6986 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = (𝑥 / 𝑛) → (1...(⌊‘𝑦)) = (1...(⌊‘(𝑥 / 𝑛))))
212 fvoveq1 6993 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = (𝑥 / 𝑛) → (ψ‘(𝑦 / 𝑚)) = (ψ‘((𝑥 / 𝑛) / 𝑚)))
213212oveq2d 6986 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 = (𝑥 / 𝑛) → ((log‘𝑚) + (ψ‘(𝑦 / 𝑚))) = ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))
214213oveq2d 6986 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑥 / 𝑛) → ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))) = ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
215214adantr 473 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑦 = (𝑥 / 𝑛) ∧ 𝑚 ∈ (1...(⌊‘𝑦))) → ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))) = ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
216211, 215sumeq12dv 14913 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = (𝑥 / 𝑛) → Σ𝑚 ∈ (1...(⌊‘𝑦))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))) = Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
217209, 216syl5eq 2820 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = (𝑥 / 𝑛) → Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) = Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
218 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = (𝑥 / 𝑛) → 𝑦 = (𝑥 / 𝑛))
219217, 218oveq12d 6988 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 / 𝑛) → (Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) = (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)))
220 fveq2 6493 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = (𝑥 / 𝑛) → (log‘𝑦) = (log‘(𝑥 / 𝑛)))
221220oveq2d 6986 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 / 𝑛) → (2 · (log‘𝑦)) = (2 · (log‘(𝑥 / 𝑛))))
222219, 221oveq12d 6988 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝑥 / 𝑛) → ((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦))) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛)))))
223222fveq2d 6497 . . . . . . . . . . . . . . . . . 18 (𝑦 = (𝑥 / 𝑛) → (abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) = (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))))
224223breq1d 4933 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝑥 / 𝑛) → ((abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) ≤ 𝐴 ↔ (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) ≤ 𝐴))
225 selberg4lem1.2 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) ≤ 𝐴)
226225ad2antrr 713 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ∀𝑦 ∈ (1[,)+∞)(abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) ≤ 𝐴)
227101mulid2d 10450 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 · 𝑛) = 𝑛)
228 fznnfl 13038 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ℝ → (𝑛 ∈ (1...(⌊‘𝑥)) ↔ (𝑛 ∈ ℕ ∧ 𝑛𝑥)))
2299, 228syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑛 ∈ (1...(⌊‘𝑥)) ↔ (𝑛 ∈ ℕ ∧ 𝑛𝑥)))
230229simplbda 492 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛𝑥)
231227, 230eqbrtrd 4945 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 · 𝑛) ≤ 𝑥)
232 1red 10432 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
233232, 57, 19lemuldivd 12290 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 · 𝑛) ≤ 𝑥 ↔ 1 ≤ (𝑥 / 𝑛)))
234231, 233mpbid 224 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ (𝑥 / 𝑛))
235 1re 10431 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℝ
236 elicopnf 12642 . . . . . . . . . . . . . . . . . . 19 (1 ∈ ℝ → ((𝑥 / 𝑛) ∈ (1[,)+∞) ↔ ((𝑥 / 𝑛) ∈ ℝ ∧ 1 ≤ (𝑥 / 𝑛))))
237235, 236ax-mp 5 . . . . . . . . . . . . . . . . . 18 ((𝑥 / 𝑛) ∈ (1[,)+∞) ↔ ((𝑥 / 𝑛) ∈ ℝ ∧ 1 ≤ (𝑥 / 𝑛)))
23858, 234, 237sylanbrc 575 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ (1[,)+∞))
239224, 226, 238rspcdva 3535 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) ≤ 𝐴)
240202, 239eqbrtrrd 4947 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛) ≤ 𝐴)
241182, 180, 19lemuldivd 12290 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛) ≤ 𝐴 ↔ (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ≤ (𝐴 / 𝑛)))
242240, 241mpbid 224 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ≤ (𝐴 / 𝑛))
243182, 183, 6, 185, 242lemul2ad 11373 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ ((Λ‘𝑛) · (𝐴 / 𝑛)))
24496, 174absmuld 14665 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) = ((abs‘(Λ‘𝑛)) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
2456, 185absidd 14633 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(Λ‘𝑛)) = (Λ‘𝑛))
246245oveq1d 6985 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(Λ‘𝑛)) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) = ((Λ‘𝑛) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
247244, 246eqtrd 2808 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) = ((Λ‘𝑛) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
248132ad2antrr 713 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐴 ∈ ℂ)
249248, 96, 101, 102div12d 11245 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐴 · ((Λ‘𝑛) / 𝑛)) = ((Λ‘𝑛) · (𝐴 / 𝑛)))
250243, 247, 2493brtr4d 4955 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ (𝐴 · ((Λ‘𝑛) / 𝑛)))
2512, 176, 181, 250fsumle 15004 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))(𝐴 · ((Λ‘𝑛) / 𝑛)))
252132adantr 473 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐴 ∈ ℂ)
2537recnd 10460 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℂ)
2542, 252, 253fsummulc2 14989 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) = Σ𝑛 ∈ (1...(⌊‘𝑥))(𝐴 · ((Λ‘𝑛) / 𝑛)))
255251, 254breqtrrd 4951 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)))
256172, 177, 173, 179, 255letrd 10589 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)))
257172, 173, 24, 256lediv1dd 12299 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)) ≤ ((𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) / (log‘𝑥)))
258252, 140, 31, 73divassd 11244 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) / (log‘𝑥)) = (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
259257, 258breqtrd 4949 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)) ≤ (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
260171, 31, 73absdivd 14666 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) = ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (abs‘(log‘𝑥))))
26124rpge0d 12245 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ (log‘𝑥))
26227, 261absidd 14633 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(log‘𝑥)) = (log‘𝑥))
263262oveq2d 6986 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (abs‘(log‘𝑥))) = ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)))
264260, 263eqtrd 2808 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) = ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)))
265128rpge0d 12245 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ 𝐴)
2666, 19, 185divge0d 12281 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((Λ‘𝑛) / 𝑛))
2672, 7, 266fsumge0 15000 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛))
268130, 24, 267divge0d 12281 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))
269129, 131, 265, 268mulge0d 11010 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
270163, 269absidd 14633 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))) = (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
271259, 264, 2703brtr4d 4955 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) ≤ (abs‘(𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))))
272271adantrr 704 . . . . 5 ((𝜑 ∧ (𝑥 ∈ (1(,)+∞) ∧ 1 ≤ 𝑥)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) ≤ (abs‘(𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))))
273126, 162, 163, 170, 272o1le 14860 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) ∈ 𝑂(1))
274125, 273eqeltrd 2860 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))) ∈ 𝑂(1))
27571, 76, 274o1dif 14837 . 2 (𝜑 → ((𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1) ↔ (𝑥 ∈ (1(,)+∞) ↦ ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1)))
27649, 275mpbird 249 1 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 198  wa 387   = wceq 1507  wcel 2048  wne 2961  wral 3082  wss 3825   class class class wbr 4923  cmpt 5002  cfv 6182  (class class class)co 6970  cc 10325  cr 10326  0cc0 10327  1c1 10328   + caddc 10330   · cmul 10332  +∞cpnf 10463   < clt 10466  cle 10467  cmin 10662   / cdiv 11090  cn 11431  2c2 11488  +crp 12197  (,)cioo 12547  [,)cico 12549  ...cfz 12701  cfl 12968  abscabs 14444  𝑟 crli 14693  𝑂(1)co1 14694  Σcsu 14893  logclog 24829  Λcvma 25361  ψcchp 25362
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1964  ax-8 2050  ax-9 2057  ax-10 2077  ax-11 2091  ax-12 2104  ax-13 2299  ax-ext 2745  ax-rep 5043  ax-sep 5054  ax-nul 5061  ax-pow 5113  ax-pr 5180  ax-un 7273  ax-inf2 8890  ax-cnex 10383  ax-resscn 10384  ax-1cn 10385  ax-icn 10386  ax-addcl 10387  ax-addrcl 10388  ax-mulcl 10389  ax-mulrcl 10390  ax-mulcom 10391  ax-addass 10392  ax-mulass 10393  ax-distr 10394  ax-i2m1 10395  ax-1ne0 10396  ax-1rid 10397  ax-rnegex 10398  ax-rrecex 10399  ax-cnre 10400  ax-pre-lttri 10401  ax-pre-lttrn 10402  ax-pre-ltadd 10403  ax-pre-mulgt0 10404  ax-pre-sup 10405  ax-addf 10406  ax-mulf 10407
This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-fal 1520  df-ex 1743  df-nf 1747  df-sb 2014  df-mo 2544  df-eu 2580  df-clab 2754  df-cleq 2765  df-clel 2840  df-nfc 2912  df-ne 2962  df-nel 3068  df-ral 3087  df-rex 3088  df-reu 3089  df-rmo 3090  df-rab 3091  df-v 3411  df-sbc 3678  df-csb 3783  df-dif 3828  df-un 3830  df-in 3832  df-ss 3839  df-pss 3841  df-nul 4174  df-if 4345  df-pw 4418  df-sn 4436  df-pr 4438  df-tp 4440  df-op 4442  df-uni 4707  df-int 4744  df-iun 4788  df-iin 4789  df-br 4924  df-opab 4986  df-mpt 5003  df-tr 5025  df-id 5305  df-eprel 5310  df-po 5319  df-so 5320  df-fr 5359  df-se 5360  df-we 5361  df-xp 5406  df-rel 5407  df-cnv 5408  df-co 5409  df-dm 5410  df-rn 5411  df-res 5412  df-ima 5413  df-pred 5980  df-ord 6026  df-on 6027  df-lim 6028  df-suc 6029  df-iota 6146  df-fun 6184  df-fn 6185  df-f 6186  df-f1 6187  df-fo 6188  df-f1o 6189  df-fv 6190  df-isom 6191  df-riota 6931  df-ov 6973  df-oprab 6974  df-mpo 6975  df-of 7221  df-om 7391  df-1st 7494  df-2nd 7495  df-supp 7627  df-wrecs 7743  df-recs 7805  df-rdg 7843  df-1o 7897  df-2o 7898  df-oadd 7901  df-er 8081  df-map 8200  df-pm 8201  df-ixp 8252  df-en 8299  df-dom 8300  df-sdom 8301  df-fin 8302  df-fsupp 8621  df-fi 8662  df-sup 8693  df-inf 8694  df-oi 8761  df-dju 9116  df-card 9154  df-cda 9380  df-pnf 10468  df-mnf 10469  df-xr 10470  df-ltxr 10471  df-le 10472  df-sub 10664  df-neg 10665  df-div 11091  df-nn 11432  df-2 11496  df-3 11497  df-4 11498  df-5 11499  df-6 11500  df-7 11501  df-8 11502  df-9 11503  df-n0 11701  df-xnn0 11773  df-z 11787  df-dec 11905  df-uz 12052  df-q 12156  df-rp 12198  df-xneg 12317  df-xadd 12318  df-xmul 12319  df-ioo 12551  df-ioc 12552  df-ico 12553  df-icc 12554  df-fz 12702  df-fzo 12843  df-fl 12970  df-mod 13046  df-seq 13178  df-exp 13238  df-fac 13442  df-bc 13471  df-hash 13499  df-shft 14277  df-cj 14309  df-re 14310  df-im 14311  df-sqrt 14445  df-abs 14446  df-limsup 14679  df-clim 14696  df-rlim 14697  df-o1 14698  df-lo1 14699  df-sum 14894  df-ef 15271  df-e 15272  df-sin 15273  df-cos 15274  df-tan 15275  df-pi 15276  df-dvds 15458  df-gcd 15694  df-prm 15862  df-pc 16020  df-struct 16331  df-ndx 16332  df-slot 16333  df-base 16335  df-sets 16336  df-ress 16337  df-plusg 16424  df-mulr 16425  df-starv 16426  df-sca 16427  df-vsca 16428  df-ip 16429  df-tset 16430  df-ple 16431  df-ds 16433  df-unif 16434  df-hom 16435  df-cco 16436  df-rest 16542  df-topn 16543  df-0g 16561  df-gsum 16562  df-topgen 16563  df-pt 16564  df-prds 16567  df-xrs 16621  df-qtop 16626  df-imas 16627  df-xps 16629  df-mre 16705  df-mrc 16706  df-acs 16708  df-mgm 17700  df-sgrp 17742  df-mnd 17753  df-submnd 17794  df-mulg 18002  df-cntz 18208  df-cmn 18658  df-psmet 20229  df-xmet 20230  df-met 20231  df-bl 20232  df-mopn 20233  df-fbas 20234  df-fg 20235  df-cnfld 20238  df-top 21196  df-topon 21213  df-topsp 21235  df-bases 21248  df-cld 21321  df-ntr 21322  df-cls 21323  df-nei 21400  df-lp 21438  df-perf 21439  df-cn 21529  df-cnp 21530  df-haus 21617  df-cmp 21689  df-tx 21864  df-hmeo 22057  df-fil 22148  df-fm 22240  df-flim 22241  df-flf 22242  df-xms 22623  df-ms 22624  df-tms 22625  df-cncf 23179  df-limc 24157  df-dv 24158  df-ulm 24658  df-log 24831  df-cxp 24832  df-atan 25136  df-em 25262  df-cht 25366  df-vma 25367  df-chp 25368  df-ppi 25369
This theorem is referenced by:  selberg4  25829
  Copyright terms: Public domain W3C validator