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

Theorem mulog2sumlem1 27652
Description: Asymptotic formula for Σ𝑛𝑥, log(𝑥 / 𝑛) / 𝑛 = (1 / 2)log↑2(𝑥) + γ · log𝑥𝐿 + 𝑂(log𝑥 / 𝑥), with explicit constants. Equation 10.2.7 of [Shapiro], p. 407. (Contributed by Mario Carneiro, 18-May-2016.)
Hypotheses
Ref Expression
logdivsum.1 𝐹 = (𝑦 ∈ ℝ+ ↦ (Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) − (((log‘𝑦)↑2) / 2)))
mulog2sumlem.1 (𝜑𝐹𝑟 𝐿)
mulog2sumlem1.2 (𝜑𝐴 ∈ ℝ+)
mulog2sumlem1.3 (𝜑 → e ≤ 𝐴)
Assertion
Ref Expression
mulog2sumlem1 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) ≤ (2 · ((log‘𝐴) / 𝐴)))
Distinct variable groups:   𝑖,𝑚,𝑦,𝐴   𝜑,𝑚
Allowed substitution hints:   𝜑(𝑦,𝑖)   𝐹(𝑦,𝑖,𝑚)   𝐿(𝑦,𝑖,𝑚)

Proof of Theorem mulog2sumlem1
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 fzfid 13997 . . . . . 6 (𝜑 → (1...(⌊‘𝐴)) ∈ Fin)
2 mulog2sumlem1.2 . . . . . . . . 9 (𝜑𝐴 ∈ ℝ+)
3 elfznn 13569 . . . . . . . . . 10 (𝑚 ∈ (1...(⌊‘𝐴)) → 𝑚 ∈ ℕ)
43nnrpd 13046 . . . . . . . . 9 (𝑚 ∈ (1...(⌊‘𝐴)) → 𝑚 ∈ ℝ+)
5 rpdivcl 13031 . . . . . . . . 9 ((𝐴 ∈ ℝ+𝑚 ∈ ℝ+) → (𝐴 / 𝑚) ∈ ℝ+)
62, 4, 5syl2an 607 . . . . . . . 8 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (𝐴 / 𝑚) ∈ ℝ+)
76relogcld 26742 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘(𝐴 / 𝑚)) ∈ ℝ)
83adantl 486 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ∈ ℕ)
97, 8nndivred 12278 . . . . . 6 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘(𝐴 / 𝑚)) / 𝑚) ∈ ℝ)
101, 9fsumrecl 15773 . . . . 5 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) ∈ ℝ)
112relogcld 26742 . . . . . . . 8 (𝜑 → (log‘𝐴) ∈ ℝ)
1211resqcld 14149 . . . . . . 7 (𝜑 → ((log‘𝐴)↑2) ∈ ℝ)
1312rehalfcld 12479 . . . . . 6 (𝜑 → (((log‘𝐴)↑2) / 2) ∈ ℝ)
14 emre 27124 . . . . . . . 8 γ ∈ ℝ
15 remulcl 11173 . . . . . . . 8 ((γ ∈ ℝ ∧ (log‘𝐴) ∈ ℝ) → (γ · (log‘𝐴)) ∈ ℝ)
1614, 11, 15sylancr 598 . . . . . . 7 (𝜑 → (γ · (log‘𝐴)) ∈ ℝ)
17 rpsup 13887 . . . . . . . . 9 sup(ℝ+, ℝ*, < ) = +∞
1817a1i 11 . . . . . . . 8 (𝜑 → sup(ℝ+, ℝ*, < ) = +∞)
19 logdivsum.1 . . . . . . . . . . . . 13 𝐹 = (𝑦 ∈ ℝ+ ↦ (Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) − (((log‘𝑦)↑2) / 2)))
2019logdivsum 27651 . . . . . . . . . . . 12 (𝐹:ℝ+⟶ℝ ∧ 𝐹 ∈ dom ⇝𝑟 ∧ ((𝐹𝑟 𝐿𝐴 ∈ ℝ+ ∧ e ≤ 𝐴) → (abs‘((𝐹𝐴) − 𝐿)) ≤ ((log‘𝐴) / 𝐴)))
2120simp1i 1155 . . . . . . . . . . 11 𝐹:ℝ+⟶ℝ
2221a1i 11 . . . . . . . . . 10 (𝜑𝐹:ℝ+⟶ℝ)
2322feqmptd 6939 . . . . . . . . 9 (𝜑𝐹 = (𝑥 ∈ ℝ+ ↦ (𝐹𝑥)))
24 mulog2sumlem.1 . . . . . . . . 9 (𝜑𝐹𝑟 𝐿)
2523, 24eqbrtrrd 5128 . . . . . . . 8 (𝜑 → (𝑥 ∈ ℝ+ ↦ (𝐹𝑥)) ⇝𝑟 𝐿)
2621ffvelcdmi 7068 . . . . . . . . 9 (𝑥 ∈ ℝ+ → (𝐹𝑥) ∈ ℝ)
2726adantl 486 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (𝐹𝑥) ∈ ℝ)
2818, 25, 27rlimrecl 15619 . . . . . . 7 (𝜑𝐿 ∈ ℝ)
2916, 28resubcld 11630 . . . . . 6 (𝜑 → ((γ · (log‘𝐴)) − 𝐿) ∈ ℝ)
3013, 29readdcld 11226 . . . . 5 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)) ∈ ℝ)
3110, 30resubcld 11630 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) ∈ ℝ)
3231recnd 11225 . . 3 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) ∈ ℂ)
3332abscld 15478 . 2 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) ∈ ℝ)
34 rerpdivcl 13036 . . . . . . . 8 (((log‘𝐴) ∈ ℝ ∧ 𝑚 ∈ ℝ+) → ((log‘𝐴) / 𝑚) ∈ ℝ)
3511, 4, 34syl2an 607 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝐴) / 𝑚) ∈ ℝ)
3635recnd 11225 . . . . . 6 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝐴) / 𝑚) ∈ ℂ)
371, 36fsumcl 15772 . . . . 5 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) ∈ ℂ)
3811recnd 11225 . . . . . 6 (𝜑 → (log‘𝐴) ∈ ℂ)
39 readdcl 11171 . . . . . . . 8 (((log‘𝐴) ∈ ℝ ∧ γ ∈ ℝ) → ((log‘𝐴) + γ) ∈ ℝ)
4011, 14, 39sylancl 597 . . . . . . 7 (𝜑 → ((log‘𝐴) + γ) ∈ ℝ)
4140recnd 11225 . . . . . 6 (𝜑 → ((log‘𝐴) + γ) ∈ ℂ)
4238, 41mulcld 11217 . . . . 5 (𝜑 → ((log‘𝐴) · ((log‘𝐴) + γ)) ∈ ℂ)
4337, 42subcld 11557 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) ∈ ℂ)
4443abscld 15478 . . 3 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) ∈ ℝ)
458nnrpd 13046 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ∈ ℝ+)
4645relogcld 26742 . . . . . . . 8 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘𝑚) ∈ ℝ)
4746, 8nndivred 12278 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝑚) / 𝑚) ∈ ℝ)
4847recnd 11225 . . . . . 6 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝑚) / 𝑚) ∈ ℂ)
491, 48fsumcl 15772 . . . . 5 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) ∈ ℂ)
5013recnd 11225 . . . . . 6 (𝜑 → (((log‘𝐴)↑2) / 2) ∈ ℂ)
5128recnd 11225 . . . . . 6 (𝜑𝐿 ∈ ℂ)
5250, 51addcld 11216 . . . . 5 (𝜑 → ((((log‘𝐴)↑2) / 2) + 𝐿) ∈ ℂ)
5349, 52subcld 11557 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)) ∈ ℂ)
5453abscld 15478 . . 3 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))) ∈ ℝ)
5544, 54readdcld 11226 . 2 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ∈ ℝ)
56 2re 12303 . . 3 2 ∈ ℝ
5711, 2rerpdivcld 13079 . . 3 (𝜑 → ((log‘𝐴) / 𝐴) ∈ ℝ)
58 remulcl 11173 . . 3 ((2 ∈ ℝ ∧ ((log‘𝐴) / 𝐴) ∈ ℝ) → (2 · ((log‘𝐴) / 𝐴)) ∈ ℝ)
5956, 57, 58sylancr 598 . 2 (𝜑 → (2 · ((log‘𝐴) / 𝐴)) ∈ ℝ)
60 relogdiv 26712 . . . . . . . . . . 11 ((𝐴 ∈ ℝ+𝑚 ∈ ℝ+) → (log‘(𝐴 / 𝑚)) = ((log‘𝐴) − (log‘𝑚)))
612, 4, 60syl2an 607 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘(𝐴 / 𝑚)) = ((log‘𝐴) − (log‘𝑚)))
6261oveq1d 7415 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘(𝐴 / 𝑚)) / 𝑚) = (((log‘𝐴) − (log‘𝑚)) / 𝑚))
6338adantr 485 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘𝐴) ∈ ℂ)
6446recnd 11225 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘𝑚) ∈ ℂ)
6545rpcnne0d 13057 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
66 divsubdir 11896 . . . . . . . . . 10 (((log‘𝐴) ∈ ℂ ∧ (log‘𝑚) ∈ ℂ ∧ (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0)) → (((log‘𝐴) − (log‘𝑚)) / 𝑚) = (((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
6763, 64, 65, 66syl3anc 1394 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (((log‘𝐴) − (log‘𝑚)) / 𝑚) = (((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
6862, 67eqtrd 2800 . . . . . . . 8 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘(𝐴 / 𝑚)) / 𝑚) = (((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
6968sumeq2dv 15741 . . . . . . 7 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) = Σ𝑚 ∈ (1...(⌊‘𝐴))(((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
701, 36, 48fsumsub 15827 . . . . . . 7 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))(((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)))
7169, 70eqtrd 2800 . . . . . 6 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)))
72 remulcl 11173 . . . . . . . . . . . . 13 (((log‘𝐴) ∈ ℝ ∧ γ ∈ ℝ) → ((log‘𝐴) · γ) ∈ ℝ)
7311, 14, 72sylancl 597 . . . . . . . . . . . 12 (𝜑 → ((log‘𝐴) · γ) ∈ ℝ)
7413, 73readdcld 11226 . . . . . . . . . . 11 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) ∈ ℝ)
7574recnd 11225 . . . . . . . . . 10 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) ∈ ℂ)
7675, 50pncand 11558 . . . . . . . . 9 (𝜑 → ((((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)) − (((log‘𝐴)↑2) / 2)) = ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)))
7714recni 11211 . . . . . . . . . . . . 13 γ ∈ ℂ
7877a1i 11 . . . . . . . . . . . 12 (𝜑 → γ ∈ ℂ)
7938, 38, 78adddid 11221 . . . . . . . . . . 11 (𝜑 → ((log‘𝐴) · ((log‘𝐴) + γ)) = (((log‘𝐴) · (log‘𝐴)) + ((log‘𝐴) · γ)))
8012recnd 11225 . . . . . . . . . . . . . 14 (𝜑 → ((log‘𝐴)↑2) ∈ ℂ)
81802halvesd 12478 . . . . . . . . . . . . 13 (𝜑 → ((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) = ((log‘𝐴)↑2))
8238sqvald 14167 . . . . . . . . . . . . 13 (𝜑 → ((log‘𝐴)↑2) = ((log‘𝐴) · (log‘𝐴)))
8381, 82eqtrd 2800 . . . . . . . . . . . 12 (𝜑 → ((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) = ((log‘𝐴) · (log‘𝐴)))
8483oveq1d 7415 . . . . . . . . . . 11 (𝜑 → (((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) + ((log‘𝐴) · γ)) = (((log‘𝐴) · (log‘𝐴)) + ((log‘𝐴) · γ)))
8573recnd 11225 . . . . . . . . . . . 12 (𝜑 → ((log‘𝐴) · γ) ∈ ℂ)
8650, 50, 85add32d 11426 . . . . . . . . . . 11 (𝜑 → (((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) + ((log‘𝐴) · γ)) = (((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)))
8779, 84, 863eqtr2d 2806 . . . . . . . . . 10 (𝜑 → ((log‘𝐴) · ((log‘𝐴) + γ)) = (((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)))
8887oveq1d 7415 . . . . . . . . 9 (𝜑 → (((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)) = ((((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)) − (((log‘𝐴)↑2) / 2)))
89 mulcom 11174 . . . . . . . . . . 11 ((γ ∈ ℂ ∧ (log‘𝐴) ∈ ℂ) → (γ · (log‘𝐴)) = ((log‘𝐴) · γ))
9077, 38, 89sylancr 598 . . . . . . . . . 10 (𝜑 → (γ · (log‘𝐴)) = ((log‘𝐴) · γ))
9190oveq2d 7416 . . . . . . . . 9 (𝜑 → ((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) = ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)))
9276, 88, 913eqtr4rd 2811 . . . . . . . 8 (𝜑 → ((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) = (((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)))
9392oveq1d 7415 . . . . . . 7 (𝜑 → (((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) − 𝐿) = ((((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)) − 𝐿))
9490, 85eqeltrd 2865 . . . . . . . 8 (𝜑 → (γ · (log‘𝐴)) ∈ ℂ)
9550, 94, 51addsubassd 11577 . . . . . . 7 (𝜑 → (((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) − 𝐿) = ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))
9642, 50, 51subsub4d 11588 . . . . . . 7 (𝜑 → ((((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)) − 𝐿) = (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
9793, 95, 963eqtr3d 2808 . . . . . 6 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)) = (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
9871, 97oveq12d 7418 . . . . 5 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)) − (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
9937, 49, 42, 52sub4d 11606 . . . . 5 (𝜑 → ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)) − (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿))) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
10098, 99eqtrd 2800 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
101100fveq2d 6875 . . 3 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) = (abs‘((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))))
10243, 53abs2dif2d 15500 . . 3 (𝜑 → (abs‘((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ≤ ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))))
103101, 102eqbrtrd 5126 . 2 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) ≤ ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))))
104 harmonicbnd4 27129 . . . . . . 7 (𝐴 ∈ ℝ+ → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴))
1052, 104syl 18 . . . . . 6 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴))
1068nnrecred 12275 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (1 / 𝑚) ∈ ℝ)
1071, 106fsumrecl 15773 . . . . . . . . . 10 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) ∈ ℝ)
108107, 40resubcld 11630 . . . . . . . . 9 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)) ∈ ℝ)
109108recnd 11225 . . . . . . . 8 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)) ∈ ℂ)
110109abscld 15478 . . . . . . 7 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ∈ ℝ)
1112rprecred 13059 . . . . . . 7 (𝜑 → (1 / 𝐴) ∈ ℝ)
112 0red 11199 . . . . . . . 8 (𝜑 → 0 ∈ ℝ)
113 1red 11197 . . . . . . . 8 (𝜑 → 1 ∈ ℝ)
114 0lt1 11724 . . . . . . . . 9 0 < 1
115114a1i 11 . . . . . . . 8 (𝜑 → 0 < 1)
116 loge 26705 . . . . . . . . 9 (log‘e) = 1
117 mulog2sumlem1.3 . . . . . . . . . 10 (𝜑 → e ≤ 𝐴)
118 epr 16252 . . . . . . . . . . 11 e ∈ ℝ+
119 logleb 26722 . . . . . . . . . . 11 ((e ∈ ℝ+𝐴 ∈ ℝ+) → (e ≤ 𝐴 ↔ (log‘e) ≤ (log‘𝐴)))
120118, 2, 119sylancr 598 . . . . . . . . . 10 (𝜑 → (e ≤ 𝐴 ↔ (log‘e) ≤ (log‘𝐴)))
121117, 120mpbid 235 . . . . . . . . 9 (𝜑 → (log‘e) ≤ (log‘𝐴))
122116, 121eqbrtrrid 5140 . . . . . . . 8 (𝜑 → 1 ≤ (log‘𝐴))
123112, 113, 11, 115, 122ltletrd 11358 . . . . . . 7 (𝜑 → 0 < (log‘𝐴))
124 lemul2 12056 . . . . . . 7 (((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ∈ ℝ ∧ (1 / 𝐴) ∈ ℝ ∧ ((log‘𝐴) ∈ ℝ ∧ 0 < (log‘𝐴))) → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴) ↔ ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) ≤ ((log‘𝐴) · (1 / 𝐴))))
125110, 111, 11, 123, 124syl112anc 1397 . . . . . 6 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴) ↔ ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) ≤ ((log‘𝐴) · (1 / 𝐴))))
126105, 125mpbid 235 . . . . 5 (𝜑 → ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) ≤ ((log‘𝐴) · (1 / 𝐴)))
12745rpcnd 13050 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ∈ ℂ)
12845rpne0d 13053 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ≠ 0)
12963, 127, 128divrecd 11982 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝐴) / 𝑚) = ((log‘𝐴) · (1 / 𝑚)))
130129sumeq2dv 15741 . . . . . . . . . 10 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) · (1 / 𝑚)))
131106recnd 11225 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (1 / 𝑚) ∈ ℂ)
1321, 38, 131fsummulc2 15823 . . . . . . . . . 10 (𝜑 → ((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) · (1 / 𝑚)))
133130, 132eqtr4d 2803 . . . . . . . . 9 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) = ((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)))
134133oveq1d 7415 . . . . . . . 8 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) = (((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)) − ((log‘𝐴) · ((log‘𝐴) + γ))))
1351, 131fsumcl 15772 . . . . . . . . 9 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) ∈ ℂ)
13638, 135, 41subdid 11658 . . . . . . . 8 (𝜑 → ((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) = (((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)) − ((log‘𝐴) · ((log‘𝐴) + γ))))
137134, 136eqtr4d 2803 . . . . . . 7 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) = ((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))))
138137fveq2d 6875 . . . . . 6 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) = (abs‘((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
139135, 41subcld 11557 . . . . . . 7 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)) ∈ ℂ)
14038, 139absmuld 15496 . . . . . 6 (𝜑 → (abs‘((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) = ((abs‘(log‘𝐴)) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
141112, 11, 123ltled 11346 . . . . . . . 8 (𝜑 → 0 ≤ (log‘𝐴))
14211, 141absidd 15462 . . . . . . 7 (𝜑 → (abs‘(log‘𝐴)) = (log‘𝐴))
143142oveq1d 7415 . . . . . 6 (𝜑 → ((abs‘(log‘𝐴)) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) = ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
144138, 140, 1433eqtrd 2804 . . . . 5 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) = ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
1452rpcnd 13050 . . . . . 6 (𝜑𝐴 ∈ ℂ)
1462rpne0d 13053 . . . . . 6 (𝜑𝐴 ≠ 0)
14738, 145, 146divrecd 11982 . . . . 5 (𝜑 → ((log‘𝐴) / 𝐴) = ((log‘𝐴) · (1 / 𝐴)))
148126, 144, 1473brtr4d 5136 . . . 4 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) ≤ ((log‘𝐴) / 𝐴))
149 fveq2 6871 . . . . . . . . . . . . . 14 (𝑖 = 𝑚 → (log‘𝑖) = (log‘𝑚))
150 id 23 . . . . . . . . . . . . . 14 (𝑖 = 𝑚𝑖 = 𝑚)
151149, 150oveq12d 7418 . . . . . . . . . . . . 13 (𝑖 = 𝑚 → ((log‘𝑖) / 𝑖) = ((log‘𝑚) / 𝑚))
152151cbvsumv 15735 . . . . . . . . . . . 12 Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) = Σ𝑚 ∈ (1...(⌊‘𝑦))((log‘𝑚) / 𝑚)
153 fveq2 6871 . . . . . . . . . . . . . 14 (𝑦 = 𝐴 → (⌊‘𝑦) = (⌊‘𝐴))
154153oveq2d 7416 . . . . . . . . . . . . 13 (𝑦 = 𝐴 → (1...(⌊‘𝑦)) = (1...(⌊‘𝐴)))
155154sumeq1d 15739 . . . . . . . . . . . 12 (𝑦 = 𝐴 → Σ𝑚 ∈ (1...(⌊‘𝑦))((log‘𝑚) / 𝑚) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚))
156152, 155eqtrid 2812 . . . . . . . . . . 11 (𝑦 = 𝐴 → Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚))
157 fveq2 6871 . . . . . . . . . . . . 13 (𝑦 = 𝐴 → (log‘𝑦) = (log‘𝐴))
158157oveq1d 7415 . . . . . . . . . . . 12 (𝑦 = 𝐴 → ((log‘𝑦)↑2) = ((log‘𝐴)↑2))
159158oveq1d 7415 . . . . . . . . . . 11 (𝑦 = 𝐴 → (((log‘𝑦)↑2) / 2) = (((log‘𝐴)↑2) / 2))
160156, 159oveq12d 7418 . . . . . . . . . 10 (𝑦 = 𝐴 → (Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) − (((log‘𝑦)↑2) / 2)) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)))
161 ovex 7433 . . . . . . . . . 10 𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)) ∈ V
162160, 19, 161fvmpt 6979 . . . . . . . . 9 (𝐴 ∈ ℝ+ → (𝐹𝐴) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)))
1632, 162syl 18 . . . . . . . 8 (𝜑 → (𝐹𝐴) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)))
164163oveq1d 7415 . . . . . . 7 (𝜑 → ((𝐹𝐴) − 𝐿) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)) − 𝐿))
16549, 50, 51subsub4d 11588 . . . . . . 7 (𝜑 → ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)) − 𝐿) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
166164, 165eqtrd 2800 . . . . . 6 (𝜑 → ((𝐹𝐴) − 𝐿) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
167166fveq2d 6875 . . . . 5 (𝜑 → (abs‘((𝐹𝐴) − 𝐿)) = (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
16820simp3i 1157 . . . . . 6 ((𝐹𝑟 𝐿𝐴 ∈ ℝ+ ∧ e ≤ 𝐴) → (abs‘((𝐹𝐴) − 𝐿)) ≤ ((log‘𝐴) / 𝐴))
16924, 2, 117, 168syl3anc 1394 . . . . 5 (𝜑 → (abs‘((𝐹𝐴) − 𝐿)) ≤ ((log‘𝐴) / 𝐴))
170167, 169eqbrtrrd 5128 . . . 4 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))) ≤ ((log‘𝐴) / 𝐴))
17144, 54, 57, 57, 148, 170le2addd 11821 . . 3 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ≤ (((log‘𝐴) / 𝐴) + ((log‘𝐴) / 𝐴)))
17257recnd 11225 . . . 4 (𝜑 → ((log‘𝐴) / 𝐴) ∈ ℂ)
1731722timesd 12475 . . 3 (𝜑 → (2 · ((log‘𝐴) / 𝐴)) = (((log‘𝐴) / 𝐴) + ((log‘𝐴) / 𝐴)))
174171, 173breqtrrd 5132 . 2 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ≤ (2 · ((log‘𝐴) / 𝐴)))
17533, 55, 59, 103, 174letrd 11355 1 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) ≤ (2 · ((log‘𝐴) / 𝐴)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1101   = wceq 1563  wcel 2145  wne 2960   class class class wbr 5104  cmpt 5185  dom cdm 5651  wf 6521  cfv 6525  (class class class)co 7400  supcsup 9388  cc 11086  cr 11087  0cc0 11088  1c1 11089   + caddc 11091   · cmul 11093  +∞cpnf 11228  *cxr 11230   < clt 11231  cle 11232  cmin 11429   / cdiv 11859  cn 12221  2c2 12283  +crp 13004  ...cfz 13523  cfl 13811  cexp 14085  abscabs 15273  𝑟 crli 15524  Σcsu 15725  eceu 16104  logclog 26673  γcem 27110
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5231  ax-sep 5250  ax-nul 5260  ax-pow 5326  ax-pr 5394  ax-un 7722  ax-inf2 9598  ax-cnex 11144  ax-resscn 11145  ax-1cn 11146  ax-icn 11147  ax-addcl 11148  ax-addrcl 11149  ax-mulcl 11150  ax-mulrcl 11151  ax-mulcom 11152  ax-addass 11153  ax-mulass 11154  ax-distr 11155  ax-i2m1 11156  ax-1ne0 11157  ax-1rid 11158  ax-rnegex 11159  ax-rrecex 11160  ax-cnre 11161  ax-pre-lttri 11162  ax-pre-lttrn 11163  ax-pre-ltadd 11164  ax-pre-mulgt0 11165  ax-pre-sup 11166  ax-addf 11167
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5105  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6291  df-ord 6352  df-on 6353  df-lim 6354  df-suc 6355  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-isom 6534  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-of 7664  df-om 7851  df-1st 7974  df-2nd 7975  df-supp 8145  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-rdg 8385  df-1o 8441  df-2o 8442  df-oadd 8445  df-er 8682  df-map 8814  df-pm 8815  df-ixp 8884  df-en 8932  df-dom 8933  df-sdom 8934  df-fin 8935  df-fsupp 9310  df-fi 9359  df-sup 9390  df-inf 9391  df-oi 9460  df-card 9913  df-pnf 11233  df-mnf 11234  df-xr 11235  df-ltxr 11236  df-le 11237  df-sub 11431  df-neg 11432  df-div 11860  df-nn 12222  df-2 12291  df-3 12292  df-4 12293  df-5 12294  df-6 12295  df-7 12296  df-8 12297  df-9 12298  df-n0 12493  df-xnn0 12566  df-z 12580  df-dec 12700  df-uz 12851  df-q 12961  df-rp 13005  df-xneg 13125  df-xadd 13126  df-xmul 13127  df-ioo 13364  df-ioc 13365  df-ico 13366  df-icc 13367  df-fz 13524  df-fzo 13671  df-fl 13813  df-mod 13891  df-seq 14026  df-exp 14086  df-fac 14298  df-bc 14327  df-hash 14355  df-shft 15092  df-cj 15138  df-re 15139  df-im 15140  df-sqrt 15274  df-abs 15275  df-limsup 15510  df-clim 15527  df-rlim 15528  df-sum 15726  df-ef 16109  df-e 16110  df-sin 16111  df-cos 16112  df-tan 16113  df-pi 16114  df-dvds 16299  df-struct 17195  df-sets 17212  df-slot 17230  df-ndx 17242  df-base 17258  df-ress 17279  df-plusg 17311  df-mulr 17312  df-starv 17313  df-sca 17314  df-vsca 17315  df-ip 17316  df-tset 17317  df-ple 17318  df-ds 17320  df-unif 17321  df-hom 17322  df-cco 17323  df-rest 17463  df-topn 17464  df-0g 17482  df-gsum 17483  df-topgen 17484  df-pt 17485  df-prds 17488  df-xrs 17544  df-qtop 17549  df-imas 17550  df-xps 17552  df-mre 17626  df-mrc 17627  df-acs 17629  df-mgm 18686  df-sgrp 18765  df-mnd 18781  df-submnd 18830  df-mulg 19122  df-cntz 19375  df-cmn 19840  df-psmet 21471  df-xmet 21472  df-met 21473  df-bl 21474  df-mopn 21475  df-fbas 21476  df-fg 21477  df-cnfld 21480  df-top 23008  df-topon 23025  df-topsp 23047  df-bases 23060  df-cld 23133  df-ntr 23134  df-cls 23135  df-nei 23212  df-lp 23250  df-perf 23251  df-cn 23341  df-cnp 23342  df-haus 23429  df-cmp 23501  df-tx 23676  df-hmeo 23869  df-fil 23960  df-fm 24052  df-flim 24053  df-flf 24054  df-xms 24434  df-ms 24435  df-tms 24436  df-cncf 24994  df-limc 25982  df-dv 25983  df-ulm 26494  df-log 26675  df-cxp 26676  df-atan 26986  df-em 27111
This theorem is referenced by:  mulog2sumlem2  27653
  Copyright terms: Public domain W3C validator