Metamath Proof Explorer


Theorem vmalogdivsum2

Description: The sum sum_ n <_ x , Lam ( n ) log ( x / n ) / n is asymptotic to log ^ 2 ( x ) / 2 + O ( log x ) . Exercise 9.1.7 of Shapiro, p. 336. (Contributed by Mario Carneiro, 30-May-2016)

Ref Expression
Assertion vmalogdivsum2 ⊢ x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 ∈ 𝑂⁡1

Proof

Step Hyp Ref Expression
1 fzfid ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 … x ∈ Fin
2 elfznn ⊢ k ∈ 1 … x → k ∈ ℕ
3 2 adantl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → k ∈ ℕ
4 3 nnrpd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → k ∈ ℝ +
5 4 relogcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → log ⁡ k ∈ ℝ
6 5 3 nndivred ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → log ⁡ k k ∈ ℝ
7 1 6 fsumrecl ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k ∈ ℝ
8 7 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k ∈ ℂ
9 elioore ⊢ x ∈ 1 +∞ → x ∈ ℝ
10 9 adantl ⊢ ⊤ ∧ x ∈ 1 +∞ → x ∈ ℝ
11 1rp ⊢ 1 ∈ ℝ +
12 11 a1i ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 ∈ ℝ +
13 1red ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 ∈ ℝ
14 eliooord ⊢ x ∈ 1 +∞ → 1 < x ∧ x < +∞
15 14 adantl ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 < x ∧ x < +∞
16 15 simpld ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 < x
17 13 10 16 ltled ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 ≤ x
18 10 12 17 rpgecld ⊢ ⊤ ∧ x ∈ 1 +∞ → x ∈ ℝ +
19 18 relogcld ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x ∈ ℝ
20 19 resqcld ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 ∈ ℝ
21 20 rehalfcld ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 2 ∈ ℝ
22 21 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 2 ∈ ℂ
23 19 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x ∈ ℂ
24 10 16 rplogcld ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x ∈ ℝ +
25 24 rpne0d ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x ≠ 0
26 8 22 23 25 divsubdird ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 log ⁡ x = ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2 2 log ⁡ x
27 7 21 resubcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ ℝ
28 27 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ ℂ
29 28 23 25 divrecd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 log ⁡ x = ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ⁢ 1 log ⁡ x
30 20 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 ∈ ℂ
31 2cnd ⊢ ⊤ ∧ x ∈ 1 +∞ → 2 ∈ ℂ
32 2ne0 ⊢ 2 ≠ 0
33 32 a1i ⊢ ⊤ ∧ x ∈ 1 +∞ → 2 ≠ 0
34 30 31 23 33 25 divdiv32d ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 2 log ⁡ x = log ⁡ x 2 log ⁡ x 2
35 23 sqvald ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 = log ⁡ x ⁢ log ⁡ x
36 35 oveq1d ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 log ⁡ x = log ⁡ x ⁢ log ⁡ x log ⁡ x
37 23 23 25 divcan3d ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x ⁢ log ⁡ x log ⁡ x = log ⁡ x
38 36 37 eqtrd ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 log ⁡ x = log ⁡ x
39 38 oveq1d ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 log ⁡ x 2 = log ⁡ x 2
40 34 39 eqtrd ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 2 log ⁡ x = log ⁡ x 2
41 40 oveq2d ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2 2 log ⁡ x = ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2
42 26 29 41 3eqtr3rd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2 = ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ⁢ 1 log ⁡ x
43 42 mpteq2dva ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2 = x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ⁢ 1 log ⁡ x
44 24 rprecred ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 log ⁡ x ∈ ℝ
45 18 ex ⊢ ⊤ → x ∈ 1 +∞ → x ∈ ℝ +
46 45 ssrdv ⊢ ⊤ → 1 +∞ ⊆ ℝ +
47 eqid ⊢ x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 = x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2
48 47 logdivsum ⊢ x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 : ℝ + ⟶ ℝ ∧ x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ dom ⁡ ⇝ℝ ∧ x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ⇝ℝ 1 ∧ 1 ∈ ℝ + ∧ e ≤ 1 → x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ⁡ 1 − 1 ≤ log ⁡ 1 1
49 48 simp2i ⊢ x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ dom ⁡ ⇝ℝ
50 rlimdmo1 ⊢ x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ dom ⁡ ⇝ℝ → x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ 𝑂⁡1
51 49 50 mp1i ⊢ ⊤ → x ∈ ℝ + ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ 𝑂⁡1
52 46 51 o1res2 ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ∈ 𝑂⁡1
53 divlogrlim ⊢ x ∈ 1 +∞ ⟼ 1 log ⁡ x ⇝ℝ 0
54 rlimo1 ⊢ x ∈ 1 +∞ ⟼ 1 log ⁡ x ⇝ℝ 0 → x ∈ 1 +∞ ⟼ 1 log ⁡ x ∈ 𝑂⁡1
55 53 54 mp1i ⊢ ⊤ → x ∈ 1 +∞ ⟼ 1 log ⁡ x ∈ 𝑂⁡1
56 27 44 52 55 o1mul2 ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k − log ⁡ x 2 2 ⁢ 1 log ⁡ x ∈ 𝑂⁡1
57 43 56 eqeltrd ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2 ∈ 𝑂⁡1
58 8 23 25 divcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k log ⁡ x ∈ ℂ
59 23 halfcld ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 ∈ ℂ
60 58 59 subcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2 ∈ ℂ
61 elfznn ⊢ n ∈ 1 … x → n ∈ ℕ
62 61 adantl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → n ∈ ℕ
63 vmacl ⊢ n ∈ ℕ → Λ ⁡ n ∈ ℝ
64 62 63 syl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n ∈ ℝ
65 64 62 nndivred ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ∈ ℝ
66 18 adantr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → x ∈ ℝ +
67 62 nnrpd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → n ∈ ℝ +
68 66 67 rpdivcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → x n ∈ ℝ +
69 68 relogcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → log ⁡ x n ∈ ℝ
70 65 69 remulcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ log ⁡ x n ∈ ℝ
71 1 70 fsumrecl ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n ∈ ℝ
72 71 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n ∈ ℂ
73 24 rpcnd ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x ∈ ℂ
74 72 73 25 divcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x ∈ ℂ
75 73 halfcld ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x 2 ∈ ℂ
76 74 75 subcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 ∈ ℂ
77 58 74 59 nnncan2d ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k log ⁡ x - log ⁡ x 2 - ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 = ∑ k = 1 x log ⁡ k k log ⁡ x − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x
78 8 72 23 25 divsubdird ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x = ∑ k = 1 x log ⁡ k k log ⁡ x − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x
79 fzfid ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 1 … x n ∈ Fin
80 64 adantr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → Λ ⁡ n ∈ ℝ
81 62 adantr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → n ∈ ℕ
82 elfznn ⊢ m ∈ 1 … x n → m ∈ ℕ
83 82 adantl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → m ∈ ℕ
84 81 83 nnmulcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → n ⁢ m ∈ ℕ
85 80 84 nndivred ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → Λ ⁡ n n ⁢ m ∈ ℝ
86 79 85 fsumrecl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n Λ ⁡ n n ⁢ m ∈ ℝ
87 86 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n Λ ⁡ n n ⁢ m ∈ ℂ
88 70 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ log ⁡ x n ∈ ℂ
89 1 87 88 fsumsub ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x ∑ m = 1 x n Λ ⁡ n n ⁢ m − Λ ⁡ n n ⁢ log ⁡ x n = ∑ n = 1 x ∑ m = 1 x n Λ ⁡ n n ⁢ m − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n
90 64 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n ∈ ℂ
91 62 nncnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → n ∈ ℂ
92 62 nnne0d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → n ≠ 0
93 90 91 92 divcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ∈ ℂ
94 83 nnrecred ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → 1 m ∈ ℝ
95 79 94 fsumrecl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n 1 m ∈ ℝ
96 95 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n 1 m ∈ ℂ
97 69 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → log ⁡ x n ∈ ℂ
98 93 96 97 subdid ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n = Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − Λ ⁡ n n ⁢ log ⁡ x n
99 90 adantr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → Λ ⁡ n ∈ ℂ
100 91 adantr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → n ∈ ℂ
101 83 nncnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → m ∈ ℂ
102 92 adantr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → n ≠ 0
103 83 nnne0d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → m ≠ 0
104 99 100 101 102 103 divdiv1d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → Λ ⁡ n n m = Λ ⁡ n n ⁢ m
105 99 100 102 divcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → Λ ⁡ n n ∈ ℂ
106 105 101 103 divrecd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → Λ ⁡ n n m = Λ ⁡ n n ⁢ 1 m
107 104 106 eqtr3d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → Λ ⁡ n n ⁢ m = Λ ⁡ n n ⁢ 1 m
108 107 sumeq2dv ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n Λ ⁡ n n ⁢ m = ∑ m = 1 x n Λ ⁡ n n ⁢ 1 m
109 101 103 reccld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x ∧ m ∈ 1 … x n → 1 m ∈ ℂ
110 79 93 109 fsummulc2 ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m = ∑ m = 1 x n Λ ⁡ n n ⁢ 1 m
111 108 110 eqtr4d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n Λ ⁡ n n ⁢ m = Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m
112 111 oveq1d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n Λ ⁡ n n ⁢ m − Λ ⁡ n n ⁢ log ⁡ x n = Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − Λ ⁡ n n ⁢ log ⁡ x n
113 98 112 eqtr4d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n = ∑ m = 1 x n Λ ⁡ n n ⁢ m − Λ ⁡ n n ⁢ log ⁡ x n
114 113 sumeq2dv ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n = ∑ n = 1 x ∑ m = 1 x n Λ ⁡ n n ⁢ m − Λ ⁡ n n ⁢ log ⁡ x n
115 vmasum ⊢ k ∈ ℕ → ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n = log ⁡ k
116 3 115 syl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n = log ⁡ k
117 116 oveq1d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n k = log ⁡ k k
118 fzfid ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → 1 … k ∈ Fin
119 dvdsssfz1 ⊢ k ∈ ℕ → y ∈ ℕ | y ∥ k ⊆ 1 … k
120 3 119 syl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → y ∈ ℕ | y ∥ k ⊆ 1 … k
121 118 120 ssfid ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → y ∈ ℕ | y ∥ k ∈ Fin
122 3 nncnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → k ∈ ℂ
123 ssrab2 ⊢ y ∈ ℕ | y ∥ k ⊆ ℕ
124 simprr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → n ∈ y ∈ ℕ | y ∥ k
125 123 124 sselid ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → n ∈ ℕ
126 125 63 syl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → Λ ⁡ n ∈ ℝ
127 126 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → Λ ⁡ n ∈ ℂ
128 127 anassrs ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → Λ ⁡ n ∈ ℂ
129 3 nnne0d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → k ≠ 0
130 121 122 128 129 fsumdivc ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n k = ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n k
131 117 130 eqtr3d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x → log ⁡ k k = ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n k
132 131 sumeq2dv ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k = ∑ k = 1 x ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n k
133 oveq2 ⊢ k = n ⁢ m → Λ ⁡ n k = Λ ⁡ n n ⁢ m
134 2 ad2antrl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → k ∈ ℕ
135 134 nncnd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → k ∈ ℂ
136 134 nnne0d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → k ≠ 0
137 127 135 136 divcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ k ∈ 1 … x ∧ n ∈ y ∈ ℕ | y ∥ k → Λ ⁡ n k ∈ ℂ
138 133 10 137 dvdsflsumcom ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x ∑ n ∈ y ∈ ℕ | y ∥ k Λ ⁡ n k = ∑ n = 1 x ∑ m = 1 x n Λ ⁡ n n ⁢ m
139 132 138 eqtrd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k = ∑ n = 1 x ∑ m = 1 x n Λ ⁡ n n ⁢ m
140 139 oveq1d ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n = ∑ n = 1 x ∑ m = 1 x n Λ ⁡ n n ⁢ m − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n
141 89 114 140 3eqtr4rd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n = ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n
142 141 oveq1d ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k − ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x = ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x
143 77 78 142 3eqtr2d ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ k = 1 x log ⁡ k k log ⁡ x - log ⁡ x 2 - ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 = ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x
144 143 mpteq2dva ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k log ⁡ x - log ⁡ x 2 - ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 = x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x
145 1red ⊢ ⊤ → 1 ∈ ℝ
146 1 65 fsumrecl ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ∈ ℝ
147 146 24 rerpdivcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n log ⁡ x ∈ ℝ
148 ioossre ⊢ 1 +∞ ⊆ ℝ
149 ax-1cn ⊢ 1 ∈ ℂ
150 o1const ⊢ 1 +∞ ⊆ ℝ ∧ 1 ∈ ℂ → x ∈ 1 +∞ ⟼ 1 ∈ 𝑂⁡1
151 148 149 150 mp2an ⊢ x ∈ 1 +∞ ⟼ 1 ∈ 𝑂⁡1
152 151 a1i ⊢ ⊤ → x ∈ 1 +∞ ⟼ 1 ∈ 𝑂⁡1
153 147 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n log ⁡ x ∈ ℂ
154 12 rpcnd ⊢ ⊤ ∧ x ∈ 1 +∞ → 1 ∈ ℂ
155 146 recnd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ∈ ℂ
156 155 23 23 25 divsubdird ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n − log ⁡ x log ⁡ x = ∑ n = 1 x Λ ⁡ n n log ⁡ x − log ⁡ x log ⁡ x
157 155 23 subcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n − log ⁡ x ∈ ℂ
158 157 23 25 divrecd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n − log ⁡ x log ⁡ x = ∑ n = 1 x Λ ⁡ n n − log ⁡ x ⁢ 1 log ⁡ x
159 23 25 dividd ⊢ ⊤ ∧ x ∈ 1 +∞ → log ⁡ x log ⁡ x = 1
160 159 oveq2d ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n log ⁡ x − log ⁡ x log ⁡ x = ∑ n = 1 x Λ ⁡ n n log ⁡ x − 1
161 156 158 160 3eqtr3rd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n log ⁡ x − 1 = ∑ n = 1 x Λ ⁡ n n − log ⁡ x ⁢ 1 log ⁡ x
162 161 mpteq2dva ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n log ⁡ x − 1 = x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n − log ⁡ x ⁢ 1 log ⁡ x
163 146 19 resubcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n − log ⁡ x ∈ ℝ
164 vmadivsum ⊢ x ∈ ℝ + ⟼ ∑ n = 1 x Λ ⁡ n n − log ⁡ x ∈ 𝑂⁡1
165 164 a1i ⊢ ⊤ → x ∈ ℝ + ⟼ ∑ n = 1 x Λ ⁡ n n − log ⁡ x ∈ 𝑂⁡1
166 46 165 o1res2 ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n − log ⁡ x ∈ 𝑂⁡1
167 163 44 166 55 o1mul2 ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n − log ⁡ x ⁢ 1 log ⁡ x ∈ 𝑂⁡1
168 162 167 eqeltrd ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n log ⁡ x − 1 ∈ 𝑂⁡1
169 153 154 168 o1dif ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n log ⁡ x ∈ 𝑂⁡1 ↔ x ∈ 1 +∞ ⟼ 1 ∈ 𝑂⁡1
170 152 169 mpbird ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n log ⁡ x ∈ 𝑂⁡1
171 147 170 o1lo1d ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n log ⁡ x ∈ ≤𝑂⁡1
172 95 69 resubcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n 1 m − log ⁡ x n ∈ ℝ
173 65 172 remulcld ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n ∈ ℝ
174 1 173 fsumrecl ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n ∈ ℝ
175 174 24 rerpdivcld ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x ∈ ℝ
176 1red ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 1 ∈ ℝ
177 vmage0 ⊢ n ∈ ℕ → 0 ≤ Λ ⁡ n
178 62 177 syl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 0 ≤ Λ ⁡ n
179 64 67 178 divge0d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 0 ≤ Λ ⁡ n n
180 68 rpred ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → x n ∈ ℝ
181 91 mullidd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 1 ⁢ n = n
182 fznnfl ⊢ x ∈ ℝ → n ∈ 1 … x ↔ n ∈ ℕ ∧ n ≤ x
183 10 182 syl ⊢ ⊤ ∧ x ∈ 1 +∞ → n ∈ 1 … x ↔ n ∈ ℕ ∧ n ≤ x
184 183 simplbda ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → n ≤ x
185 181 184 eqbrtrd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 1 ⁢ n ≤ x
186 10 adantr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → x ∈ ℝ
187 176 186 67 lemuldivd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 1 ⁢ n ≤ x ↔ 1 ≤ x n
188 185 187 mpbid ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 1 ≤ x n
189 harmonicubnd ⊢ x n ∈ ℝ ∧ 1 ≤ x n → ∑ m = 1 x n 1 m ≤ log ⁡ x n + 1
190 180 188 189 syl2anc ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n 1 m ≤ log ⁡ x n + 1
191 95 69 176 lesubadd2d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n 1 m − log ⁡ x n ≤ 1 ↔ ∑ m = 1 x n 1 m ≤ log ⁡ x n + 1
192 190 191 mpbird ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → ∑ m = 1 x n 1 m − log ⁡ x n ≤ 1
193 172 176 65 179 192 lemul2ad ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n ≤ Λ ⁡ n n ⋅ 1
194 93 mulridd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⋅ 1 = Λ ⁡ n n
195 193 194 breqtrd ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n ≤ Λ ⁡ n n
196 1 173 65 195 fsumle ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n ≤ ∑ n = 1 x Λ ⁡ n n
197 174 146 24 196 lediv1dd ⊢ ⊤ ∧ x ∈ 1 +∞ → ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x ≤ ∑ n = 1 x Λ ⁡ n n log ⁡ x
198 197 adantrr ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ 1 ≤ x → ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x ≤ ∑ n = 1 x Λ ⁡ n n log ⁡ x
199 145 171 147 175 198 lo1le ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x ∈ ≤𝑂⁡1
200 0red ⊢ ⊤ → 0 ∈ ℝ
201 harmoniclbnd ⊢ x n ∈ ℝ + → log ⁡ x n ≤ ∑ m = 1 x n 1 m
202 68 201 syl ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → log ⁡ x n ≤ ∑ m = 1 x n 1 m
203 95 69 subge0d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 0 ≤ ∑ m = 1 x n 1 m − log ⁡ x n ↔ log ⁡ x n ≤ ∑ m = 1 x n 1 m
204 202 203 mpbird ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 0 ≤ ∑ m = 1 x n 1 m − log ⁡ x n
205 65 172 179 204 mulge0d ⊢ ⊤ ∧ x ∈ 1 +∞ ∧ n ∈ 1 … x → 0 ≤ Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n
206 1 173 205 fsumge0 ⊢ ⊤ ∧ x ∈ 1 +∞ → 0 ≤ ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n
207 174 24 206 divge0d ⊢ ⊤ ∧ x ∈ 1 +∞ → 0 ≤ ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x
208 175 200 207 o1lo12 ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x ∈ 𝑂⁡1 ↔ x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x ∈ ≤𝑂⁡1
209 199 208 mpbird ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ ∑ m = 1 x n 1 m − log ⁡ x n log ⁡ x ∈ 𝑂⁡1
210 144 209 eqeltrd ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k log ⁡ x - log ⁡ x 2 - ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 ∈ 𝑂⁡1
211 60 76 210 o1dif ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ k = 1 x log ⁡ k k log ⁡ x − log ⁡ x 2 ∈ 𝑂⁡1 ↔ x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 ∈ 𝑂⁡1
212 57 211 mpbid ⊢ ⊤ → x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 ∈ 𝑂⁡1
213 212 mptru ⊢ x ∈ 1 +∞ ⟼ ∑ n = 1 x Λ ⁡ n n ⁢ log ⁡ x n log ⁡ x − log ⁡ x 2 ∈ 𝑂⁡1