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

Theorem vmadivsum 26335
Description: The sum of the von Mangoldt function over 𝑛 is asymptotic to log𝑥 + 𝑂(1). Equation 9.2.13 of [Shapiro], p. 331. (Contributed by Mario Carneiro, 16-Apr-2016.)
Assertion
Ref Expression
vmadivsum (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1)
Distinct variable group:   𝑥,𝑛

Proof of Theorem vmadivsum
StepHypRef Expression
1 reex 10803 . . . . . . 7 ℝ ∈ V
2 rpssre 12576 . . . . . . 7 + ⊆ ℝ
31, 2ssexi 5204 . . . . . 6 + ∈ V
43a1i 11 . . . . 5 (⊤ → ℝ+ ∈ V)
5 ovexd 7237 . . . . 5 ((⊤ ∧ 𝑥 ∈ ℝ+) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) ∈ V)
6 ovexd 7237 . . . . 5 ((⊤ ∧ 𝑥 ∈ ℝ+) → ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) ∈ V)
7 eqidd 2735 . . . . 5 (⊤ → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))))
8 eqidd 2735 . . . . 5 (⊤ → (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) = (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))))
94, 5, 6, 7, 8offval2 7477 . . . 4 (⊤ → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))) = (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) − ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))))
109mptru 1550 . . 3 ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))) = (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) − ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))))
11 fzfid 13529 . . . . . . 7 (𝑥 ∈ ℝ+ → (1...(⌊‘𝑥)) ∈ Fin)
12 elfznn 13124 . . . . . . . . . 10 (𝑛 ∈ (1...(⌊‘𝑥)) → 𝑛 ∈ ℕ)
1312adantl 485 . . . . . . . . 9 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℕ)
14 vmacl 25972 . . . . . . . . 9 (𝑛 ∈ ℕ → (Λ‘𝑛) ∈ ℝ)
1513, 14syl 17 . . . . . . . 8 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℝ)
1615, 13nndivred 11867 . . . . . . 7 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℝ)
1711, 16fsumrecl 15281 . . . . . 6 (𝑥 ∈ ℝ+ → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℝ)
1817recnd 10844 . . . . 5 (𝑥 ∈ ℝ+ → Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) ∈ ℂ)
19 relogcl 25436 . . . . . 6 (𝑥 ∈ ℝ+ → (log‘𝑥) ∈ ℝ)
2019recnd 10844 . . . . 5 (𝑥 ∈ ℝ+ → (log‘𝑥) ∈ ℂ)
21 rprege0 12584 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 ≤ 𝑥))
22 flge0nn0 13378 . . . . . . . . . 10 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (⌊‘𝑥) ∈ ℕ0)
23 faccl 13832 . . . . . . . . . 10 ((⌊‘𝑥) ∈ ℕ0 → (!‘(⌊‘𝑥)) ∈ ℕ)
2421, 22, 233syl 18 . . . . . . . . 9 (𝑥 ∈ ℝ+ → (!‘(⌊‘𝑥)) ∈ ℕ)
2524nnrpd 12609 . . . . . . . 8 (𝑥 ∈ ℝ+ → (!‘(⌊‘𝑥)) ∈ ℝ+)
2625relogcld 25483 . . . . . . 7 (𝑥 ∈ ℝ+ → (log‘(!‘(⌊‘𝑥))) ∈ ℝ)
27 rerpdivcl 12599 . . . . . . 7 (((log‘(!‘(⌊‘𝑥))) ∈ ℝ ∧ 𝑥 ∈ ℝ+) → ((log‘(!‘(⌊‘𝑥))) / 𝑥) ∈ ℝ)
2826, 27mpancom 688 . . . . . 6 (𝑥 ∈ ℝ+ → ((log‘(!‘(⌊‘𝑥))) / 𝑥) ∈ ℝ)
2928recnd 10844 . . . . 5 (𝑥 ∈ ℝ+ → ((log‘(!‘(⌊‘𝑥))) / 𝑥) ∈ ℂ)
3018, 20, 29nnncan2d 11207 . . . 4 (𝑥 ∈ ℝ+ → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) − ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)))
3130mpteq2ia 5135 . . 3 (𝑥 ∈ ℝ+ ↦ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) − ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)))
3210, 31eqtri 2762 . 2 ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))) = (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥)))
33 1red 10817 . . . . 5 (⊤ → 1 ∈ ℝ)
34 chpo1ub 26333 . . . . . 6 (𝑥 ∈ ℝ+ ↦ ((ψ‘𝑥) / 𝑥)) ∈ 𝑂(1)
3534a1i 11 . . . . 5 (⊤ → (𝑥 ∈ ℝ+ ↦ ((ψ‘𝑥) / 𝑥)) ∈ 𝑂(1))
36 rpre 12577 . . . . . . . . 9 (𝑥 ∈ ℝ+𝑥 ∈ ℝ)
37 chpcl 25978 . . . . . . . . 9 (𝑥 ∈ ℝ → (ψ‘𝑥) ∈ ℝ)
3836, 37syl 17 . . . . . . . 8 (𝑥 ∈ ℝ+ → (ψ‘𝑥) ∈ ℝ)
39 rerpdivcl 12599 . . . . . . . 8 (((ψ‘𝑥) ∈ ℝ ∧ 𝑥 ∈ ℝ+) → ((ψ‘𝑥) / 𝑥) ∈ ℝ)
4038, 39mpancom 688 . . . . . . 7 (𝑥 ∈ ℝ+ → ((ψ‘𝑥) / 𝑥) ∈ ℝ)
4140recnd 10844 . . . . . 6 (𝑥 ∈ ℝ+ → ((ψ‘𝑥) / 𝑥) ∈ ℂ)
4241adantl 485 . . . . 5 ((⊤ ∧ 𝑥 ∈ ℝ+) → ((ψ‘𝑥) / 𝑥) ∈ ℂ)
4318, 29subcld 11172 . . . . . 6 (𝑥 ∈ ℝ+ → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) ∈ ℂ)
4443adantl 485 . . . . 5 ((⊤ ∧ 𝑥 ∈ ℝ+) → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) ∈ ℂ)
4536adantr 484 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℝ)
4616, 45remulcld 10846 . . . . . . . . . . 11 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · 𝑥) ∈ ℝ)
47 nndivre 11854 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ ∧ 𝑛 ∈ ℕ) → (𝑥 / 𝑛) ∈ ℝ)
4836, 12, 47syl2an 599 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℝ)
49 reflcl 13354 . . . . . . . . . . . . 13 ((𝑥 / 𝑛) ∈ ℝ → (⌊‘(𝑥 / 𝑛)) ∈ ℝ)
5048, 49syl 17 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (⌊‘(𝑥 / 𝑛)) ∈ ℝ)
5115, 50remulcld 10846 . . . . . . . . . . 11 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛))) ∈ ℝ)
5246, 51resubcld 11243 . . . . . . . . . 10 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))) ∈ ℝ)
5348, 50resubcld 11243 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛))) ∈ ℝ)
54 1red 10817 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 1 ∈ ℝ)
55 vmage0 25975 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → 0 ≤ (Λ‘𝑛))
5613, 55syl 17 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ (Λ‘𝑛))
57 fracle1 13361 . . . . . . . . . . . . 13 ((𝑥 / 𝑛) ∈ ℝ → ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛))) ≤ 1)
5848, 57syl 17 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛))) ≤ 1)
5953, 54, 15, 56, 58lemul2ad 11755 . . . . . . . . . . 11 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛)))) ≤ ((Λ‘𝑛) · 1))
6015recnd 10844 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (Λ‘𝑛) ∈ ℂ)
6148recnd 10844 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (𝑥 / 𝑛) ∈ ℂ)
6250recnd 10844 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (⌊‘(𝑥 / 𝑛)) ∈ ℂ)
6360, 61, 62subdid 11271 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛)))) = (((Λ‘𝑛) · (𝑥 / 𝑛)) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
64 rpcn 12579 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+𝑥 ∈ ℂ)
6564adantr 484 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 𝑥 ∈ ℂ)
6613nnrpd 12609 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 𝑛 ∈ ℝ+)
67 rpcnne0 12587 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℝ+ → (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0))
6866, 67syl 17 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0))
69 div23 11492 . . . . . . . . . . . . . . 15 (((Λ‘𝑛) ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → (((Λ‘𝑛) · 𝑥) / 𝑛) = (((Λ‘𝑛) / 𝑛) · 𝑥))
70 divass 11491 . . . . . . . . . . . . . . 15 (((Λ‘𝑛) ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → (((Λ‘𝑛) · 𝑥) / 𝑛) = ((Λ‘𝑛) · (𝑥 / 𝑛)))
7169, 70eqtr3d 2776 . . . . . . . . . . . . . 14 (((Λ‘𝑛) ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ (𝑛 ∈ ℂ ∧ 𝑛 ≠ 0)) → (((Λ‘𝑛) / 𝑛) · 𝑥) = ((Λ‘𝑛) · (𝑥 / 𝑛)))
7260, 65, 68, 71syl3anc 1373 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · 𝑥) = ((Λ‘𝑛) · (𝑥 / 𝑛)))
7372oveq1d 7217 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))) = (((Λ‘𝑛) · (𝑥 / 𝑛)) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
7463, 73eqtr4d 2777 . . . . . . . . . . 11 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛)))) = ((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
7560mulid1d 10833 . . . . . . . . . . 11 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · 1) = (Λ‘𝑛))
7659, 74, 753brtr3d 5074 . . . . . . . . . 10 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))) ≤ (Λ‘𝑛))
7711, 52, 15, 76fsumle 15344 . . . . . . . . 9 (𝑥 ∈ ℝ+ → Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))) ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))(Λ‘𝑛))
7816recnd 10844 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) / 𝑛) ∈ ℂ)
7911, 64, 78fsummulc1 15330 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · 𝑥))
80 logfac2 26070 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ ∧ 0 ≤ 𝑥) → (log‘(!‘(⌊‘𝑥))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛))))
8121, 80syl 17 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → (log‘(!‘(⌊‘𝑥))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛))))
8279, 81oveq12d 7220 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · 𝑥) − Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
8346recnd 10844 . . . . . . . . . . 11 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (((Λ‘𝑛) / 𝑛) · 𝑥) ∈ ℂ)
8451recnd 10844 . . . . . . . . . . 11 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛))) ∈ ℂ)
8511, 83, 84fsumsub 15333 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))) = (Σ𝑛 ∈ (1...(⌊‘𝑥))(((Λ‘𝑛) / 𝑛) · 𝑥) − Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
8682, 85eqtr4d 2777 . . . . . . . . 9 (𝑥 ∈ ℝ+ → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) = Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
87 chpval 25976 . . . . . . . . . 10 (𝑥 ∈ ℝ → (ψ‘𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))(Λ‘𝑛))
8836, 87syl 17 . . . . . . . . 9 (𝑥 ∈ ℝ+ → (ψ‘𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))(Λ‘𝑛))
8977, 86, 883brtr4d 5075 . . . . . . . 8 (𝑥 ∈ ℝ+ → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) ≤ (ψ‘𝑥))
9017, 36remulcld 10846 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) ∈ ℝ)
9190, 26resubcld 11243 . . . . . . . . 9 (𝑥 ∈ ℝ+ → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) ∈ ℝ)
92 rpregt0 12583 . . . . . . . . 9 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℝ ∧ 0 < 𝑥))
93 lediv1 11680 . . . . . . . . 9 ((((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) ∈ ℝ ∧ (ψ‘𝑥) ∈ ℝ ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) ≤ (ψ‘𝑥) ↔ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥) ≤ ((ψ‘𝑥) / 𝑥)))
9491, 38, 92, 93syl3anc 1373 . . . . . . . 8 (𝑥 ∈ ℝ+ → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) ≤ (ψ‘𝑥) ↔ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥) ≤ ((ψ‘𝑥) / 𝑥)))
9589, 94mpbid 235 . . . . . . 7 (𝑥 ∈ ℝ+ → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥) ≤ ((ψ‘𝑥) / 𝑥))
9690recnd 10844 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) ∈ ℂ)
9726recnd 10844 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → (log‘(!‘(⌊‘𝑥))) ∈ ℂ)
98 rpcnne0 12587 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → (𝑥 ∈ ℂ ∧ 𝑥 ≠ 0))
99 divsubdir 11509 . . . . . . . . . . 11 (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) ∈ ℂ ∧ (log‘(!‘(⌊‘𝑥))) ∈ ℂ ∧ (𝑥 ∈ ℂ ∧ 𝑥 ≠ 0)) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥) = (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) / 𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))
10096, 97, 98, 99syl3anc 1373 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥) = (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) / 𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))
101 rpne0 12585 . . . . . . . . . . . 12 (𝑥 ∈ ℝ+𝑥 ≠ 0)
10218, 64, 101divcan4d 11597 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) / 𝑥) = Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛))
103102oveq1d 7217 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) / 𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) = (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))
104100, 103eqtr2d 2775 . . . . . . . . 9 (𝑥 ∈ ℝ+ → (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)) = (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥))
105104fveq2d 6710 . . . . . . . 8 (𝑥 ∈ ℝ+ → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) = (abs‘(((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥)))
106 rerpdivcl 12599 . . . . . . . . . 10 ((((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) ∈ ℝ ∧ 𝑥 ∈ ℝ+) → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥) ∈ ℝ)
10791, 106mpancom 688 . . . . . . . . 9 (𝑥 ∈ ℝ+ → (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥) ∈ ℝ)
108 flle 13357 . . . . . . . . . . . . . . . 16 ((𝑥 / 𝑛) ∈ ℝ → (⌊‘(𝑥 / 𝑛)) ≤ (𝑥 / 𝑛))
10948, 108syl 17 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (⌊‘(𝑥 / 𝑛)) ≤ (𝑥 / 𝑛))
11048, 50subge0d 11405 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → (0 ≤ ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛))) ↔ (⌊‘(𝑥 / 𝑛)) ≤ (𝑥 / 𝑛)))
111109, 110mpbird 260 . . . . . . . . . . . . . 14 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛))))
11215, 53, 56, 111mulge0d 11392 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((Λ‘𝑛) · ((𝑥 / 𝑛) − (⌊‘(𝑥 / 𝑛)))))
113112, 74breqtrd 5069 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ+𝑛 ∈ (1...(⌊‘𝑥))) → 0 ≤ ((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
11411, 52, 113fsumge0 15340 . . . . . . . . . . 11 (𝑥 ∈ ℝ+ → 0 ≤ Σ𝑛 ∈ (1...(⌊‘𝑥))((((Λ‘𝑛) / 𝑛) · 𝑥) − ((Λ‘𝑛) · (⌊‘(𝑥 / 𝑛)))))
115114, 86breqtrrd 5071 . . . . . . . . . 10 (𝑥 ∈ ℝ+ → 0 ≤ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))))
116 divge0 11684 . . . . . . . . . 10 (((((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) ∈ ℝ ∧ 0 ≤ ((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥))))) ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → 0 ≤ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥))
11791, 115, 92, 116syl21anc 838 . . . . . . . . 9 (𝑥 ∈ ℝ+ → 0 ≤ (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥))
118107, 117absidd 14969 . . . . . . . 8 (𝑥 ∈ ℝ+ → (abs‘(((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥)) = (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥))
119105, 118eqtrd 2774 . . . . . . 7 (𝑥 ∈ ℝ+ → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) = (((Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) · 𝑥) − (log‘(!‘(⌊‘𝑥)))) / 𝑥))
120 chpge0 25980 . . . . . . . . . 10 (𝑥 ∈ ℝ → 0 ≤ (ψ‘𝑥))
12136, 120syl 17 . . . . . . . . 9 (𝑥 ∈ ℝ+ → 0 ≤ (ψ‘𝑥))
122 divge0 11684 . . . . . . . . 9 ((((ψ‘𝑥) ∈ ℝ ∧ 0 ≤ (ψ‘𝑥)) ∧ (𝑥 ∈ ℝ ∧ 0 < 𝑥)) → 0 ≤ ((ψ‘𝑥) / 𝑥))
12338, 121, 92, 122syl21anc 838 . . . . . . . 8 (𝑥 ∈ ℝ+ → 0 ≤ ((ψ‘𝑥) / 𝑥))
12440, 123absidd 14969 . . . . . . 7 (𝑥 ∈ ℝ+ → (abs‘((ψ‘𝑥) / 𝑥)) = ((ψ‘𝑥) / 𝑥))
12595, 119, 1243brtr4d 5075 . . . . . 6 (𝑥 ∈ ℝ+ → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ≤ (abs‘((ψ‘𝑥) / 𝑥)))
126125ad2antrl 728 . . . . 5 ((⊤ ∧ (𝑥 ∈ ℝ+ ∧ 1 ≤ 𝑥)) → (abs‘(Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ≤ (abs‘((ψ‘𝑥) / 𝑥)))
12733, 35, 42, 44, 126o1le 15199 . . . 4 (⊤ → (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∈ 𝑂(1))
128127mptru 1550 . . 3 (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∈ 𝑂(1)
129 logfacrlim 26077 . . . 4 (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ⇝𝑟 1
130 rlimo1 15161 . . . 4 ((𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ⇝𝑟 1 → (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∈ 𝑂(1))
131129, 130ax-mp 5 . . 3 (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∈ 𝑂(1)
132 o1sub 15160 . . 3 (((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∈ 𝑂(1) ∧ (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∈ 𝑂(1)) → ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))) ∈ 𝑂(1))
133128, 131, 132mp2an 692 . 2 ((𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − ((log‘(!‘(⌊‘𝑥))) / 𝑥))) ∘f − (𝑥 ∈ ℝ+ ↦ ((log‘𝑥) − ((log‘(!‘(⌊‘𝑥))) / 𝑥)))) ∈ 𝑂(1)
13432, 133eqeltrri 2831 1 (𝑥 ∈ ℝ+ ↦ (Σ𝑛 ∈ (1...(⌊‘𝑥))((Λ‘𝑛) / 𝑛) − (log‘𝑥))) ∈ 𝑂(1)
Colors of variables: wff setvar class
Syntax hints:  wb 209  wa 399  w3a 1089   = wceq 1543  wtru 1544  wcel 2110  wne 2935  Vcvv 3401   class class class wbr 5043  cmpt 5124  cfv 6369  (class class class)co 7202  f cof 7456  cc 10710  cr 10711  0cc0 10712  1c1 10713   · cmul 10717   < clt 10850  cle 10851  cmin 11045   / cdiv 11472  cn 11813  0cn0 12073  +crp 12569  ...cfz 13078  cfl 13348  !cfa 13822  abscabs 14780  𝑟 crli 15029  𝑂(1)co1 15030  Σcsu 15232  logclog 25415  Λcvma 25946  ψcchp 25947
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2706  ax-rep 5168  ax-sep 5181  ax-nul 5188  ax-pow 5247  ax-pr 5311  ax-un 7512  ax-inf2 9245  ax-cnex 10768  ax-resscn 10769  ax-1cn 10770  ax-icn 10771  ax-addcl 10772  ax-addrcl 10773  ax-mulcl 10774  ax-mulrcl 10775  ax-mulcom 10776  ax-addass 10777  ax-mulass 10778  ax-distr 10779  ax-i2m1 10780  ax-1ne0 10781  ax-1rid 10782  ax-rnegex 10783  ax-rrecex 10784  ax-cnre 10785  ax-pre-lttri 10786  ax-pre-lttrn 10787  ax-pre-ltadd 10788  ax-pre-mulgt0 10789  ax-pre-sup 10790  ax-addf 10791  ax-mulf 10792
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2537  df-eu 2566  df-clab 2713  df-cleq 2726  df-clel 2812  df-nfc 2882  df-ne 2936  df-nel 3040  df-ral 3059  df-rex 3060  df-reu 3061  df-rmo 3062  df-rab 3063  df-v 3403  df-sbc 3688  df-csb 3803  df-dif 3860  df-un 3862  df-in 3864  df-ss 3874  df-pss 3876  df-nul 4228  df-if 4430  df-pw 4505  df-sn 4532  df-pr 4534  df-tp 4536  df-op 4538  df-uni 4810  df-int 4850  df-iun 4896  df-iin 4897  df-br 5044  df-opab 5106  df-mpt 5125  df-tr 5151  df-id 5444  df-eprel 5449  df-po 5457  df-so 5458  df-fr 5498  df-se 5499  df-we 5500  df-xp 5546  df-rel 5547  df-cnv 5548  df-co 5549  df-dm 5550  df-rn 5551  df-res 5552  df-ima 5553  df-pred 6149  df-ord 6205  df-on 6206  df-lim 6207  df-suc 6208  df-iota 6327  df-fun 6371  df-fn 6372  df-f 6373  df-f1 6374  df-fo 6375  df-f1o 6376  df-fv 6377  df-isom 6378  df-riota 7159  df-ov 7205  df-oprab 7206  df-mpo 7207  df-of 7458  df-om 7634  df-1st 7750  df-2nd 7751  df-supp 7893  df-wrecs 8036  df-recs 8097  df-rdg 8135  df-1o 8191  df-2o 8192  df-oadd 8195  df-er 8380  df-map 8499  df-pm 8500  df-ixp 8568  df-en 8616  df-dom 8617  df-sdom 8618  df-fin 8619  df-fsupp 8975  df-fi 9016  df-sup 9047  df-inf 9048  df-oi 9115  df-dju 9500  df-card 9538  df-pnf 10852  df-mnf 10853  df-xr 10854  df-ltxr 10855  df-le 10856  df-sub 11047  df-neg 11048  df-div 11473  df-nn 11814  df-2 11876  df-3 11877  df-4 11878  df-5 11879  df-6 11880  df-7 11881  df-8 11882  df-9 11883  df-n0 12074  df-xnn0 12146  df-z 12160  df-dec 12277  df-uz 12422  df-q 12528  df-rp 12570  df-xneg 12687  df-xadd 12688  df-xmul 12689  df-ioo 12922  df-ioc 12923  df-ico 12924  df-icc 12925  df-fz 13079  df-fzo 13222  df-fl 13350  df-mod 13426  df-seq 13558  df-exp 13619  df-fac 13823  df-bc 13852  df-hash 13880  df-shft 14613  df-cj 14645  df-re 14646  df-im 14647  df-sqrt 14781  df-abs 14782  df-limsup 15015  df-clim 15032  df-rlim 15033  df-o1 15034  df-lo1 15035  df-sum 15233  df-ef 15610  df-e 15611  df-sin 15612  df-cos 15613  df-pi 15615  df-dvds 15797  df-gcd 16035  df-prm 16210  df-pc 16371  df-struct 16686  df-ndx 16687  df-slot 16688  df-base 16690  df-sets 16691  df-ress 16692  df-plusg 16780  df-mulr 16781  df-starv 16782  df-sca 16783  df-vsca 16784  df-ip 16785  df-tset 16786  df-ple 16787  df-ds 16789  df-unif 16790  df-hom 16791  df-cco 16792  df-rest 16899  df-topn 16900  df-0g 16918  df-gsum 16919  df-topgen 16920  df-pt 16921  df-prds 16924  df-xrs 16979  df-qtop 16984  df-imas 16985  df-xps 16987  df-mre 17061  df-mrc 17062  df-acs 17064  df-mgm 18086  df-sgrp 18135  df-mnd 18146  df-submnd 18191  df-mulg 18461  df-cntz 18683  df-cmn 19144  df-psmet 20327  df-xmet 20328  df-met 20329  df-bl 20330  df-mopn 20331  df-fbas 20332  df-fg 20333  df-cnfld 20336  df-top 21763  df-topon 21780  df-topsp 21802  df-bases 21815  df-cld 21888  df-ntr 21889  df-cls 21890  df-nei 21967  df-lp 22005  df-perf 22006  df-cn 22096  df-cnp 22097  df-haus 22184  df-cmp 22256  df-tx 22431  df-hmeo 22624  df-fil 22715  df-fm 22807  df-flim 22808  df-flf 22809  df-xms 23190  df-ms 23191  df-tms 23192  df-cncf 23747  df-limc 24735  df-dv 24736  df-log 25417  df-cxp 25418  df-cht 25951  df-vma 25952  df-chp 25953  df-ppi 25954
This theorem is referenced by:  vmadivsumb  26336  rpvmasumlem  26340  vmalogdivsum2  26391  vmalogdivsum  26392  2vmadivsumlem  26393  selberg3lem1  26410  selberg4lem1  26413  pntrsumo1  26418  selbergr  26421
  Copyright terms: Public domain W3C validator