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

Theorem selberg4lem1 27624
Description: Lemma for selberg4 27625. 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 12296 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ∈ ℂ)
2 fzfid 13986 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (1...(⌊‘𝑥)) ∈ Fin)
3 elfznn 13558 . . . . . . . . . . . . 13 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
43adantl 485 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
5 vmacl 27182 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
64, 5syl 17 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
76, 4nndivred 12267 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
8 elioore 13379 . . . . . . . . . . . . . . 15 (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ)
98adantl 485 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ)
10 1rp 12997 . . . . . . . . . . . . . . 15 1 ∈ ℝ+
1110a1i 11 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ+)
12 1red 11182 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℝ)
13 eliooord 13409 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ (1(,)+∞) → (1 < 𝑥𝑥 < +∞))
1413adantl 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (1(,)+∞)) → (1 < 𝑥𝑥 < +∞))
1514simpld 498 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 < 𝑥)
1612, 9, 15ltled 11331 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ≤ 𝑥)
179, 11, 16rpgecld 13076 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℝ+)
1817adantr 484 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ+)
194nnrpd 13035 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ+)
2018, 19rpdivcld 13054 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ+)
2120relogcld 26688 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘(𝑥 / 𝑛)) ∈ ℝ)
227, 21remulcld 11212 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℝ)
232, 22fsumrecl 15761 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℝ)
249, 15rplogcld 26694 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ+)
2523, 24rerpdivcld 13068 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) ∈ ℝ)
2625recnd 11210 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) ∈ ℂ)
2717relogcld 26688 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℝ)
2827rehalfcld 12468 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / 2) ∈ ℝ)
2928recnd 11210 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / 2) ∈ ℂ)
301, 26, 29subdid 11643 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) = ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (2 · ((log‘𝑥) / 2))))
3127recnd 11210 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ∈ ℂ)
32 2ne0 12324 . . . . . . . 8 2 ≠ 0
3332a1i 11 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ≠ 0)
3431, 1, 33divcan2d 11969 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · ((log‘𝑥) / 2)) = (log‘𝑥))
3534oveq2d 7412 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (2 · ((log‘𝑥) / 2))) = ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))
3630, 35eqtrd 2797 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) = ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))
3736mpteq2dva 5193 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2)))) = (𝑥 ∈ (1(,)+∞) ↦ ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))))
38 2re 12292 . . . . 5 2 ∈ ℝ
3938a1i 11 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → 2 ∈ ℝ)
4025, 28resubcld 11615 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2)) ∈ ℝ)
41 ioossre 13411 . . . . . 6 (1(,)+∞) ⊆ ℝ
42 2cn 12293 . . . . . 6 2 ∈ ℂ
43 o1const 15647 . . . . . 6 (((1(,)+∞) ⊆ ℝ ∧ 2 ∈ ℂ) → (𝑥 ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1))
4441, 42, 43mp2an 702 . . . . 5 (𝑥 ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1)
4544a1i 11 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 2) ∈ 𝑂(1))
46 vmalogdivsum2 27602 . . . . 5 (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) ∈ 𝑂(1)
4746a1i 11 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2))) ∈ 𝑂(1))
4839, 40, 45, 47o1mul2 15652 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (2 · ((Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) − ((log‘𝑥) / 2)))) ∈ 𝑂(1))
4937, 48eqeltrrd 2863 . 2 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1))
50 fzfid 13986 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1...(⌊‘(𝑥 / 𝑛))) ∈ Fin)
51 elfznn 13558 . . . . . . . . . . . 12 (𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛))) → 𝑚 ∈ ℕ)
5251adantl 485 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → 𝑚 ∈ ℕ)
53 vmacl 27182 . . . . . . . . . . 11 (𝑚 ∈ ℕ → (Λ‘𝑚) ∈ ℝ)
5452, 53syl 17 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (Λ‘𝑚) ∈ ℝ)
5552nnrpd 13035 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → 𝑚 ∈ ℝ+)
5655relogcld 26688 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (log‘𝑚) ∈ ℝ)
579adantr 484 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
5857, 4nndivred 12267 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ)
5958adantr 484 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (𝑥 / 𝑛) ∈ ℝ)
6059, 52nndivred 12267 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → ((𝑥 / 𝑛) / 𝑚) ∈ ℝ)
61 chpcl 27188 . . . . . . . . . . . 12 (((𝑥 / 𝑛) / 𝑚) ∈ ℝ → (ψ‘((𝑥 / 𝑛) / 𝑚)) ∈ ℝ)
6260, 61syl 17 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → (ψ‘((𝑥 / 𝑛) / 𝑚)) ∈ ℝ)
6356, 62readdcld 11211 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))) ∈ ℝ)
6454, 63remulcld 11212 . . . . . . . . 9 ((((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) ∧ 𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))) → ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) ∈ ℝ)
6550, 64fsumrecl 15761 . . . . . . . 8 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) ∈ ℝ)
666, 65remulcld 11212 . . . . . . 7 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℝ)
672, 66fsumrecl 15761 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℝ)
6817, 24rpmulcld 13053 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑥 · (log‘𝑥)) ∈ ℝ+)
6967, 68rerpdivcld 13068 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) ∈ ℝ)
7069, 27resubcld 11615 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) ∈ ℝ)
7170recnd 11210 . . 3 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) ∈ ℂ)
7223recnd 11210 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℂ)
7324rpne0d 13042 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (log‘𝑥) ≠ 0)
7472, 31, 73divcld 11967 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)) ∈ ℂ)
751, 74mulcld 11202 . . . 4 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) ∈ ℂ)
7675, 31subcld 11542 . . 3 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)) ∈ ℂ)
7769recnd 11210 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) ∈ ℂ)
7877, 75, 31nnncan2d 11577 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)))))
7967recnd 11210 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℂ)
809recnd 11210 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ∈ ℂ)
8117rpne0d 13042 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝑥 ≠ 0)
8279, 80, 31, 81, 73divdiv1d 11998 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))))
831, 72, 31, 73divassd 12002 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥)) = (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))))
8482, 83oveq12d 7414 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) − ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥)))))
8567, 17rerpdivcld 13068 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℝ)
8685recnd 11210 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℂ)
871, 72mulcld 11202 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) ∈ ℂ)
8886, 87, 31, 73divsubdird 12006 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) / (log‘𝑥)) = (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) − ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥))))
8981adantr 484 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ≠ 0)
9066, 57, 89redivcld 12019 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℝ)
9190recnd 11210 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) ∈ ℂ)
9238a1i 11 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℝ)
9392, 22remulcld 11212 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) ∈ ℝ)
9493recnd 11210 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) ∈ ℂ)
952, 91, 94fsumsub 15815 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − Σ𝑛 ∈ (1...(⌊‘𝑥))(2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
966recnd 11210 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℂ)
9765, 57, 89redivcld 12019 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) ∈ ℝ)
9897recnd 11210 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) ∈ ℂ)
99 2cnd 12296 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 2 ∈ ℂ)
10021recnd 11210 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (log‘(𝑥 / 𝑛)) ∈ ℂ)
1014nncnd 12226 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℂ)
1024nnne0d 12263 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ≠ 0)
103100, 101, 102divcld 11967 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘(𝑥 / 𝑛)) / 𝑛) ∈ ℂ)
10499, 103mulcld 11202 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) ∈ ℂ)
10596, 98, 104subdid 11643 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) = (((Λ‘𝑛) · (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥)) − ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))))
10665recnd 11210 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) ∈ ℂ)
10780adantr 484 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
10896, 106, 107, 89divassd 12002 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) = ((Λ‘𝑛) · (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥)))
10996, 101, 100, 102div32d 11990 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) = ((Λ‘𝑛) · ((log‘(𝑥 / 𝑛)) / 𝑛)))
110109oveq2d 7412 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) = (2 · ((Λ‘𝑛) · ((log‘(𝑥 / 𝑛)) / 𝑛))))
11199, 96, 103mul12d 11392 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · ((Λ‘𝑛) · ((log‘(𝑥 / 𝑛)) / 𝑛))) = ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))
112110, 111eqtrd 2797 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) = ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))
113108, 112oveq12d 7414 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = (((Λ‘𝑛) · (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥)) − ((Λ‘𝑛) · (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))))
114105, 113eqtr4d 2800 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) = ((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
115114sumeq2dv 15729 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
11666recnd 11210 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) ∈ ℂ)
1172, 80, 116, 81fsumdivc 15813 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥))
11822recnd 11210 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) ∈ ℂ)
1192, 1, 118fsummulc2 15811 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))(2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))))
120117, 119oveq12d 7414 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − Σ𝑛 ∈ (1...(⌊‘𝑥))(2 · (((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))))
12195, 115, 1203eqtr4rd 2808 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))))
122121oveq1d 7411 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) − (2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))))) / (log‘𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)))
12388, 122eqtr3d 2799 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / 𝑥) / (log‘𝑥)) − ((2 · Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛)))) / (log‘𝑥))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)))
12478, 84, 1233eqtr2d 2803 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)))
125124mpteq2dva 5193 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))) = (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))))
126 1red 11182 . . . . 5 (𝜑 → 1 ∈ ℝ)
127 selberg4lem1.1 . . . . . . . 8 (𝜑𝐴 ∈ ℝ+)
128127adantr 484 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐴 ∈ ℝ+)
129128rpred 13037 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐴 ∈ ℝ)
1302, 7fsumrecl 15761 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℝ)
131130, 24rerpdivcld 13068 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) ∈ ℝ)
132127rpcnd 13039 . . . . . . 7 (𝜑𝐴 ∈ ℂ)
133 o1const 15647 . . . . . . 7 (((1(,)+∞) ⊆ ℝ ∧ 𝐴 ∈ ℂ) → (𝑥 ∈ (1(,)+∞) ↦ 𝐴) ∈ 𝑂(1))
13441, 132, 133sylancr 596 . . . . . 6 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 𝐴) ∈ 𝑂(1))
135 1cnd 11175 . . . . . . . 8 (𝜑 → 1 ∈ ℂ)
136 o1const 15647 . . . . . . . 8 (((1(,)+∞) ⊆ ℝ ∧ 1 ∈ ℂ) → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ 𝑂(1))
13741, 135, 136sylancr 596 . . . . . . 7 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ 𝑂(1))
138131recnd 11210 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) ∈ ℂ)
139 1cnd 11175 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 1 ∈ ℂ)
140130recnd 11210 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
141140, 31, 31, 73divsubdird 12006 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) / (log‘𝑥)) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − ((log‘𝑥) / (log‘𝑥))))
142140, 31subcld 11542 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) ∈ ℂ)
143142, 31, 73divrecd 11970 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) / (log‘𝑥)) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥))))
14431, 73dividd 11965 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → ((log‘𝑥) / (log‘𝑥)) = 1)
145144oveq2d 7412 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − ((log‘𝑥) / (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1))
146141, 143, 1453eqtr3d 2805 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥))) = ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1))
147146mpteq2dva 5193 . . . . . . . . 9 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥)))) = (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1)))
148130, 27resubcld 11615 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) ∈ ℝ)
14912, 24rerpdivcld 13068 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (1 / (log‘𝑥)) ∈ ℝ)
15017ex 416 . . . . . . . . . . . 12 (𝜑 → (𝑥 ∈ (1(,)+∞) → 𝑥 ∈ ℝ+))
151150ssrdv 3942 . . . . . . . . . . 11 (𝜑 → (1(,)+∞) ⊆ ℝ+)
152 vmadivsum 27546 . . . . . . . . . . . 12 (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1)
153152a1i 11 . . . . . . . . . . 11 (𝜑 → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1))
154151, 153o1res2 15590 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1))
155 divlogrlim 26700 . . . . . . . . . . 11 (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝𝑟 0
156 rlimo1 15644 . . . . . . . . . . 11 ((𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ⇝𝑟 0 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
157155, 156mp1i 13 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (1 / (log‘𝑥))) ∈ 𝑂(1))
158148, 149, 154, 157o1mul2 15652 . . . . . . . . 9 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)) · (1 / (log‘𝑥)))) ∈ 𝑂(1))
159147, 158eqeltrrd 2863 . . . . . . . 8 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)) − 1)) ∈ 𝑂(1))
160138, 139, 159o1dif 15657 . . . . . . 7 (𝜑 → ((𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))) ∈ 𝑂(1) ↔ (𝑥 ∈ (1(,)+∞) ↦ 1) ∈ 𝑂(1)))
161137, 160mpbird 259 . . . . . 6 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))) ∈ 𝑂(1))
162129, 131, 134, 161o1mul2 15652 . . . . 5 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))) ∈ 𝑂(1))
163129, 131remulcld 11212 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))) ∈ ℝ)
16421, 4nndivred 12267 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((log‘(𝑥 / 𝑛)) / 𝑛) ∈ ℝ)
16592, 164remulcld 11212 . . . . . . . . . 10 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) ∈ ℝ)
16697, 165resubcld 11615 . . . . . . . . 9 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) ∈ ℝ)
1676, 166remulcld 11212 . . . . . . . 8 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℝ)
1682, 167fsumrecl 15761 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℝ)
169168, 24rerpdivcld 13068 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)) ∈ ℝ)
170169recnd 11210 . . . . 5 ((𝜑𝑥 ∈ (1(,)+∞)) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥)) ∈ ℂ)
171168recnd 11210 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℂ)
172171abscld 15466 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ∈ ℝ)
173129, 130remulcld 11212 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) ∈ ℝ)
17498, 104subcld 11542 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) ∈ ℂ)
17596, 174mulcld 11202 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℂ)
176175abscld 15466 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ∈ ℝ)
1772, 176fsumrecl 15761 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ∈ ℝ)
178167recnd 11210 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℂ)
1792, 178fsumabs 15829 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
180129adantr 484 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐴 ∈ ℝ)
181180, 7remulcld 11212 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐴 · ((Λ‘𝑛) / 𝑛)) ∈ ℝ)
182174abscld 15466 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ∈ ℝ)
183180, 4nndivred 12267 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐴 / 𝑛) ∈ ℝ)
184 vmage0 27185 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
1854, 184syl 17 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (Λ‘𝑛))
186106, 107, 101, 89, 102divdiv2d 11999 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) · 𝑛) / 𝑥))
187106, 101, 107, 89div23d 12004 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) · 𝑛) / 𝑥) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛))
188186, 187eqtrd 2797 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛))
18999, 103, 101mulassd 11205 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛) = (2 · (((log‘(𝑥 / 𝑛)) / 𝑛) · 𝑛)))
190100, 101, 102divcan1d 11968 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((log‘(𝑥 / 𝑛)) / 𝑛) · 𝑛) = (log‘(𝑥 / 𝑛)))
191190oveq2d 7412 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (((log‘(𝑥 / 𝑛)) / 𝑛) · 𝑛)) = (2 · (log‘(𝑥 / 𝑛))))
192189, 191eqtr2d 2798 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (2 · (log‘(𝑥 / 𝑛))) = ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛))
193188, 192oveq12d 7414 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛)))) = (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛) − ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛)))
19498, 104, 101subdird 11644 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛) = (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) · 𝑛) − ((2 · ((log‘(𝑥 / 𝑛)) / 𝑛)) · 𝑛)))
195193, 194eqtr4d 2800 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛)))) = (((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛))
196195fveq2d 6871 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) = (abs‘(((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛)))
197174, 101absmuld 15484 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))) · 𝑛)) = ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · (abs‘𝑛)))
1984nnred 12225 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ)
19919rpge0d 13041 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ 𝑛)
200198, 199absidd 15450 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘𝑛) = 𝑛)
201200oveq2d 7412 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · (abs‘𝑛)) = ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛))
202196, 197, 2013eqtrd 2801 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) = ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛))
203 fveq2 6867 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑚 → (Λ‘𝑖) = (Λ‘𝑚))
204 fveq2 6867 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑚 → (log‘𝑖) = (log‘𝑚))
205 oveq2 7404 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑖 = 𝑚 → (𝑦 / 𝑖) = (𝑦 / 𝑚))
206205fveq2d 6871 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 = 𝑚 → (ψ‘(𝑦 / 𝑖)) = (ψ‘(𝑦 / 𝑚)))
207204, 206oveq12d 7414 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 = 𝑚 → ((log‘𝑖) + (ψ‘(𝑦 / 𝑖))) = ((log‘𝑚) + (ψ‘(𝑦 / 𝑚))))
208203, 207oveq12d 7414 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 = 𝑚 → ((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) = ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))))
209208cbvsumv 15723 . . . . . . . . . . . . . . . . . . . . . 22 Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) = Σ𝑚 ∈ (1...(⌊‘𝑦))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚))))
210 fveq2 6867 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑥 / 𝑛) → (⌊‘𝑦) = (⌊‘(𝑥 / 𝑛)))
211210oveq2d 7412 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = (𝑥 / 𝑛) → (1...(⌊‘𝑦)) = (1...(⌊‘(𝑥 / 𝑛))))
212 fvoveq1 7419 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = (𝑥 / 𝑛) → (ψ‘(𝑦 / 𝑚)) = (ψ‘((𝑥 / 𝑛) / 𝑚)))
213212oveq2d 7412 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 = (𝑥 / 𝑛) → ((log‘𝑚) + (ψ‘(𝑦 / 𝑚))) = ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))
214213oveq2d 7412 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 = (𝑥 / 𝑛) → ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))) = ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
215214adantr 484 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑦 = (𝑥 / 𝑛) ∧ 𝑚 ∈ (1...(⌊‘𝑦))) → ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))) = ((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
216211, 215sumeq12dv 15733 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = (𝑥 / 𝑛) → Σ𝑚 ∈ (1...(⌊‘𝑦))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘(𝑦 / 𝑚)))) = Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
217209, 216eqtrid 2809 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = (𝑥 / 𝑛) → Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) = Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))))
218 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = (𝑥 / 𝑛) → 𝑦 = (𝑥 / 𝑛))
219217, 218oveq12d 7414 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 / 𝑛) → (Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) = (Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)))
220 fveq2 6867 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = (𝑥 / 𝑛) → (log‘𝑦) = (log‘(𝑥 / 𝑛)))
221220oveq2d 7412 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 / 𝑛) → (2 · (log‘𝑦)) = (2 · (log‘(𝑥 / 𝑛))))
222219, 221oveq12d 7414 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝑥 / 𝑛) → ((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦))) = ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛)))))
223222fveq2d 6871 . . . . . . . . . . . . . . . . . 18 (𝑦 = (𝑥 / 𝑛) → (abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) = (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))))
224223breq1d 5110 . . . . . . . . . . . . . . . . 17 (𝑦 = (𝑥 / 𝑛) → ((abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) ≤ 𝐴 ↔ (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) ≤ 𝐴))
225 selberg4lem1.2 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∀𝑦 ∈ (1[,)+∞)(abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) ≤ 𝐴)
226225ad2antrr 736 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ∀𝑦 ∈ (1[,)+∞)(abs‘((Σ𝑖 ∈ (1...(⌊‘𝑦))((Λ‘𝑖) · ((log‘𝑖) + (ψ‘(𝑦 / 𝑖)))) / 𝑦) − (2 · (log‘𝑦)))) ≤ 𝐴)
227101mullidd 11200 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 · 𝑛) = 𝑛)
228 fznnfl 13872 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ℝ → (𝑛 ∈ (1...(⌊‘𝑥)) ↔ (𝑛 ∈ ℕ ∧ 𝑛𝑥)))
2299, 228syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝑛 ∈ (1...(⌊‘𝑥)) ↔ (𝑛 ∈ ℕ ∧ 𝑛𝑥)))
230229simplbda 503 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛𝑥)
231227, 230eqbrtrd 5122 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (1 · 𝑛) ≤ 𝑥)
232 1red 11182 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
233232, 57, 19lemuldivd 13086 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((1 · 𝑛) ≤ 𝑥 ↔ 1 ≤ (𝑥 / 𝑛)))
234231, 233mpbid 234 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 1 ≤ (𝑥 / 𝑛))
235 1re 11181 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℝ
236 elicopnf 13449 . . . . . . . . . . . . . . . . . . 19 (1 ∈ ℝ → ((𝑥 / 𝑛) ∈ (1[,)+∞) ↔ ((𝑥 / 𝑛) ∈ ℝ ∧ 1 ≤ (𝑥 / 𝑛))))
237235, 236ax-mp 5 . . . . . . . . . . . . . . . . . 18 ((𝑥 / 𝑛) ∈ (1[,)+∞) ↔ ((𝑥 / 𝑛) ∈ ℝ ∧ 1 ≤ (𝑥 / 𝑛)))
23858, 234, 237sylanbrc 592 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ (1[,)+∞))
239224, 226, 238rspcdva 3582 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / (𝑥 / 𝑛)) − (2 · (log‘(𝑥 / 𝑛))))) ≤ 𝐴)
240202, 239eqbrtrrd 5124 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛) ≤ 𝐴)
241182, 180, 19lemuldivd 13086 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (((abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) · 𝑛) ≤ 𝐴 ↔ (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ≤ (𝐴 / 𝑛)))
242240, 241mpbid 234 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) ≤ (𝐴 / 𝑛))
243182, 183, 6, 185, 242lemul2ad 12132 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ ((Λ‘𝑛) · (𝐴 / 𝑛)))
24496, 174absmuld 15484 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) = ((abs‘(Λ‘𝑛)) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
2456, 185absidd 15450 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘(Λ‘𝑛)) = (Λ‘𝑛))
246245oveq1d 7411 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((abs‘(Λ‘𝑛)) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) = ((Λ‘𝑛) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
247244, 246eqtrd 2797 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) = ((Λ‘𝑛) · (abs‘((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))))
248132ad2antrr 736 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 𝐴 ∈ ℂ)
249248, 96, 101, 102div12d 12003 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (𝐴 · ((Λ‘𝑛) / 𝑛)) = ((Λ‘𝑛) · (𝐴 / 𝑛)))
250243, 247, 2493brtr4d 5132 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → (abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ (𝐴 · ((Λ‘𝑛) / 𝑛)))
2512, 176, 181, 250fsumle 15827 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))(𝐴 · ((Λ‘𝑛) / 𝑛)))
252132adantr 484 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (1(,)+∞)) → 𝐴 ∈ ℂ)
2537recnd 11210 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℂ)
2542, 252, 253fsummulc2 15811 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (1(,)+∞)) → (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) = Σ𝑛 ∈ (1...(⌊‘𝑥))(𝐴 · ((Λ‘𝑛) / 𝑛)))
255251, 254breqtrrd 5128 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → Σ𝑛 ∈ (1...(⌊‘𝑥))(abs‘((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)))
256172, 177, 173, 179, 255letrd 11340 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) ≤ (𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)))
257172, 173, 24, 256lediv1dd 13095 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)) ≤ ((𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) / (log‘𝑥)))
258252, 140, 31, 73divassd 12002 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((𝐴 · Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛)) / (log‘𝑥)) = (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
259257, 258breqtrd 5126 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)) ≤ (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
260171, 31, 73absdivd 15485 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) = ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (abs‘(log‘𝑥))))
26124rpge0d 13041 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ (log‘𝑥))
26227, 261absidd 15450 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(log‘𝑥)) = (log‘𝑥))
263262oveq2d 7412 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (abs‘(log‘𝑥))) = ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)))
264260, 263eqtrd 2797 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) = ((abs‘Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛))))) / (log‘𝑥)))
265128rpge0d 13041 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ 𝐴)
2666, 19, 185divge0d 13077 . . . . . . . . . . 11 (((𝜑𝑥 ∈ (1(,)+∞)) ∧ 𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((Λ‘𝑛) / 𝑛))
2672, 7, 266fsumge0 15823 . . . . . . . . . 10 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛))
268130, 24, 267divge0d 13077 . . . . . . . . 9 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))
269129, 131, 265, 268mulge0d 11764 . . . . . . . 8 ((𝜑𝑥 ∈ (1(,)+∞)) → 0 ≤ (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
270163, 269absidd 15450 . . . . . . 7 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))) = (𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥))))
271259, 264, 2703brtr4d 5132 . . . . . 6 ((𝜑𝑥 ∈ (1(,)+∞)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) ≤ (abs‘(𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))))
272271adantrr 727 . . . . 5 ((𝜑 ∧ (𝑥 ∈ (1(,)+∞) ∧ 1 ≤ 𝑥)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) ≤ (abs‘(𝐴 · (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) / (log‘𝑥)))))
273126, 162, 163, 170, 272o1le 15680 . . . 4 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · ((Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚)))) / 𝑥) − (2 · ((log‘(𝑥 / 𝑛)) / 𝑛)))) / (log‘𝑥))) ∈ 𝑂(1))
274125, 273eqeltrd 2862 . . 3 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥)) − ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥)))) ∈ 𝑂(1))
27571, 76, 274o1dif 15657 . 2 (𝜑 → ((𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1) ↔ (𝑥 ∈ (1(,)+∞) ↦ ((2 · (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · (log‘(𝑥 / 𝑛))) / (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1)))
27649, 275mpbird 259 1 (𝜑 → (𝑥 ∈ (1(,)+∞) ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · Σ𝑚 ∈ (1...(⌊‘(𝑥 / 𝑛)))((Λ‘𝑚) · ((log‘𝑚) + (ψ‘((𝑥 / 𝑛) / 𝑚))))) / (𝑥 · (log‘𝑥))) − (log‘𝑥))) ∈ 𝑂(1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399   = wceq 1560  wcel 2142  wne 2957  wral 3076  wss 3904   class class class wbr 5100  cmpt 5181  cfv 6521  (class class class)co 7396  cc 11071  cr 11072  0cc0 11073  1c1 11074   + caddc 11076   · cmul 11078  +∞cpnf 11213   < clt 11216  cle 11217  cmin 11414   / cdiv 11844  cn 12210  2c2 12272  +crp 12993  (,)cioo 13349  [,)cico 13351  ...cfz 13512  cfl 13800  abscabs 15261  𝑟 crli 15512  𝑂(1)co1 15513  Σcsu 15713  logclog 26619  Λcvma 27156  ψcchp 27157
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718  ax-inf2 9596  ax-cnex 11129  ax-resscn 11130  ax-1cn 11131  ax-icn 11132  ax-addcl 11133  ax-addrcl 11134  ax-mulcl 11135  ax-mulrcl 11136  ax-mulcom 11137  ax-addass 11138  ax-mulass 11139  ax-distr 11140  ax-i2m1 11141  ax-1ne0 11142  ax-1rid 11143  ax-rnegex 11144  ax-rrecex 11145  ax-cnre 11146  ax-pre-lttri 11147  ax-pre-lttrn 11148  ax-pre-ltadd 11149  ax-pre-mulgt0 11150  ax-pre-sup 11151  ax-addf 11152
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-int 4906  df-iun 4951  df-iin 4952  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-se 5601  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6288  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-isom 6530  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-of 7660  df-om 7847  df-1st 7970  df-2nd 7971  df-supp 8141  df-frecs 8262  df-wrecs 8293  df-recs 8342  df-rdg 8381  df-1o 8437  df-2o 8438  df-oadd 8441  df-er 8678  df-map 8810  df-pm 8811  df-ixp 8880  df-en 8928  df-dom 8929  df-sdom 8930  df-fin 8931  df-fsupp 9308  df-fi 9357  df-sup 9388  df-inf 9389  df-oi 9458  df-dju 9859  df-card 9897  df-pnf 11218  df-mnf 11219  df-xr 11220  df-ltxr 11221  df-le 11222  df-sub 11416  df-neg 11417  df-div 11845  df-nn 12211  df-2 12280  df-3 12281  df-4 12282  df-5 12283  df-6 12284  df-7 12285  df-8 12286  df-9 12287  df-n0 12482  df-xnn0 12555  df-z 12569  df-dec 12689  df-uz 12840  df-q 12950  df-rp 12994  df-xneg 13114  df-xadd 13115  df-xmul 13116  df-ioo 13353  df-ioc 13354  df-ico 13355  df-icc 13356  df-fz 13513  df-fzo 13660  df-fl 13802  df-mod 13880  df-seq 14015  df-exp 14075  df-fac 14287  df-bc 14316  df-hash 14344  df-shft 15080  df-cj 15126  df-re 15127  df-im 15128  df-sqrt 15262  df-abs 15263  df-limsup 15498  df-clim 15515  df-rlim 15516  df-o1 15517  df-lo1 15518  df-sum 15714  df-ef 16097  df-e 16098  df-sin 16099  df-cos 16100  df-tan 16101  df-pi 16102  df-dvds 16287  df-gcd 16529  df-prm 16706  df-pc 16873  df-struct 17183  df-sets 17200  df-slot 17218  df-ndx 17230  df-base 17246  df-ress 17267  df-plusg 17299  df-mulr 17300  df-starv 17301  df-sca 17302  df-vsca 17303  df-ip 17304  df-tset 17305  df-ple 17306  df-ds 17308  df-unif 17309  df-hom 17310  df-cco 17311  df-rest 17451  df-topn 17452  df-0g 17470  df-gsum 17471  df-topgen 17472  df-pt 17473  df-prds 17476  df-xrs 17532  df-qtop 17537  df-imas 17538  df-xps 17540  df-mre 17614  df-mrc 17615  df-acs 17617  df-mgm 18674  df-sgrp 18753  df-mnd 18769  df-submnd 18818  df-mulg 19110  df-cntz 19357  df-cmn 19822  df-psmet 21416  df-xmet 21417  df-met 21418  df-bl 21419  df-mopn 21420  df-fbas 21421  df-fg 21422  df-cnfld 21425  df-top 22954  df-topon 22971  df-topsp 22993  df-bases 23006  df-cld 23079  df-ntr 23080  df-cls 23081  df-nei 23158  df-lp 23196  df-perf 23197  df-cn 23287  df-cnp 23288  df-haus 23375  df-cmp 23447  df-tx 23622  df-hmeo 23815  df-fil 23906  df-fm 23998  df-flim 23999  df-flf 24000  df-xms 24380  df-ms 24381  df-tms 24382  df-cncf 24940  df-limc 25928  df-dv 25929  df-ulm 26440  df-log 26621  df-cxp 26622  df-atan 26932  df-em 27057  df-cht 27161  df-vma 27162  df-chp 27163  df-ppi 27164
This theorem is referenced by:  selberg4  27625
  Copyright terms: Public domain W3C validator