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

Theorem mulog2sumlem1 27513
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 13908 . . . . . 6 (𝜑 → (1...(⌊‘𝐴)) ∈ Fin)
2 mulog2sumlem1.2 . . . . . . . . 9 (𝜑𝐴 ∈ ℝ+)
3 elfznn 13481 . . . . . . . . . 10 (𝑚 ∈ (1...(⌊‘𝐴)) → 𝑚 ∈ ℕ)
43nnrpd 12959 . . . . . . . . 9 (𝑚 ∈ (1...(⌊‘𝐴)) → 𝑚 ∈ ℝ+)
5 rpdivcl 12944 . . . . . . . . 9 ((𝐴 ∈ ℝ+𝑚 ∈ ℝ+) → (𝐴 / 𝑚) ∈ ℝ+)
62, 4, 5syl2an 597 . . . . . . . 8 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (𝐴 / 𝑚) ∈ ℝ+)
76relogcld 26600 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘(𝐴 / 𝑚)) ∈ ℝ)
83adantl 481 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ∈ ℕ)
97, 8nndivred 12211 . . . . . 6 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘(𝐴 / 𝑚)) / 𝑚) ∈ ℝ)
101, 9fsumrecl 15669 . . . . 5 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) ∈ ℝ)
112relogcld 26600 . . . . . . . 8 (𝜑 → (log‘𝐴) ∈ ℝ)
1211resqcld 14060 . . . . . . 7 (𝜑 → ((log‘𝐴)↑2) ∈ ℝ)
1312rehalfcld 12400 . . . . . 6 (𝜑 → (((log‘𝐴)↑2) / 2) ∈ ℝ)
14 emre 26984 . . . . . . . 8 γ ∈ ℝ
15 remulcl 11123 . . . . . . . 8 ((γ ∈ ℝ ∧ (log‘𝐴) ∈ ℝ) → (γ · (log‘𝐴)) ∈ ℝ)
1614, 11, 15sylancr 588 . . . . . . 7 (𝜑 → (γ · (log‘𝐴)) ∈ ℝ)
17 rpsup 13798 . . . . . . . . 9 sup(ℝ+, ℝ*, < ) = +∞
1817a1i 11 . . . . . . . 8 (𝜑 → sup(ℝ+, ℝ*, < ) = +∞)
19 logdivsum.1 . . . . . . . . . . . . 13 𝐹 = (𝑦 ∈ ℝ+ ↦ (Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) − (((log‘𝑦)↑2) / 2)))
2019logdivsum 27512 . . . . . . . . . . . 12 (𝐹:ℝ+⟶ℝ ∧ 𝐹 ∈ dom ⇝𝑟 ∧ ((𝐹𝑟 𝐿𝐴 ∈ ℝ+ ∧ e ≤ 𝐴) → (abs‘((𝐹𝐴) − 𝐿)) ≤ ((log‘𝐴) / 𝐴)))
2120simp1i 1140 . . . . . . . . . . 11 𝐹:ℝ+⟶ℝ
2221a1i 11 . . . . . . . . . 10 (𝜑𝐹:ℝ+⟶ℝ)
2322feqmptd 6910 . . . . . . . . 9 (𝜑𝐹 = (𝑥 ∈ ℝ+ ↦ (𝐹𝑥)))
24 mulog2sumlem.1 . . . . . . . . 9 (𝜑𝐹𝑟 𝐿)
2523, 24eqbrtrrd 5124 . . . . . . . 8 (𝜑 → (𝑥 ∈ ℝ+ ↦ (𝐹𝑥)) ⇝𝑟 𝐿)
2621ffvelcdmi 7037 . . . . . . . . 9 (𝑥 ∈ ℝ+ → (𝐹𝑥) ∈ ℝ)
2726adantl 481 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ+) → (𝐹𝑥) ∈ ℝ)
2818, 25, 27rlimrecl 15515 . . . . . . 7 (𝜑𝐿 ∈ ℝ)
2916, 28resubcld 11577 . . . . . 6 (𝜑 → ((γ · (log‘𝐴)) − 𝐿) ∈ ℝ)
3013, 29readdcld 11173 . . . . 5 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)) ∈ ℝ)
3110, 30resubcld 11577 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) ∈ ℝ)
3231recnd 11172 . . 3 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) ∈ ℂ)
3332abscld 15374 . 2 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) ∈ ℝ)
34 rerpdivcl 12949 . . . . . . . 8 (((log‘𝐴) ∈ ℝ ∧ 𝑚 ∈ ℝ+) → ((log‘𝐴) / 𝑚) ∈ ℝ)
3511, 4, 34syl2an 597 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝐴) / 𝑚) ∈ ℝ)
3635recnd 11172 . . . . . 6 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝐴) / 𝑚) ∈ ℂ)
371, 36fsumcl 15668 . . . . 5 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) ∈ ℂ)
3811recnd 11172 . . . . . 6 (𝜑 → (log‘𝐴) ∈ ℂ)
39 readdcl 11121 . . . . . . . 8 (((log‘𝐴) ∈ ℝ ∧ γ ∈ ℝ) → ((log‘𝐴) + γ) ∈ ℝ)
4011, 14, 39sylancl 587 . . . . . . 7 (𝜑 → ((log‘𝐴) + γ) ∈ ℝ)
4140recnd 11172 . . . . . 6 (𝜑 → ((log‘𝐴) + γ) ∈ ℂ)
4238, 41mulcld 11164 . . . . 5 (𝜑 → ((log‘𝐴) · ((log‘𝐴) + γ)) ∈ ℂ)
4337, 42subcld 11504 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) ∈ ℂ)
4443abscld 15374 . . 3 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) ∈ ℝ)
458nnrpd 12959 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ∈ ℝ+)
4645relogcld 26600 . . . . . . . 8 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘𝑚) ∈ ℝ)
4746, 8nndivred 12211 . . . . . . 7 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝑚) / 𝑚) ∈ ℝ)
4847recnd 11172 . . . . . 6 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝑚) / 𝑚) ∈ ℂ)
491, 48fsumcl 15668 . . . . 5 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) ∈ ℂ)
5013recnd 11172 . . . . . 6 (𝜑 → (((log‘𝐴)↑2) / 2) ∈ ℂ)
5128recnd 11172 . . . . . 6 (𝜑𝐿 ∈ ℂ)
5250, 51addcld 11163 . . . . 5 (𝜑 → ((((log‘𝐴)↑2) / 2) + 𝐿) ∈ ℂ)
5349, 52subcld 11504 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)) ∈ ℂ)
5453abscld 15374 . . 3 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))) ∈ ℝ)
5544, 54readdcld 11173 . 2 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ∈ ℝ)
56 2re 12231 . . 3 2 ∈ ℝ
5711, 2rerpdivcld 12992 . . 3 (𝜑 → ((log‘𝐴) / 𝐴) ∈ ℝ)
58 remulcl 11123 . . 3 ((2 ∈ ℝ ∧ ((log‘𝐴) / 𝐴) ∈ ℝ) → (2 · ((log‘𝐴) / 𝐴)) ∈ ℝ)
5956, 57, 58sylancr 588 . 2 (𝜑 → (2 · ((log‘𝐴) / 𝐴)) ∈ ℝ)
60 relogdiv 26570 . . . . . . . . . . 11 ((𝐴 ∈ ℝ+𝑚 ∈ ℝ+) → (log‘(𝐴 / 𝑚)) = ((log‘𝐴) − (log‘𝑚)))
612, 4, 60syl2an 597 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘(𝐴 / 𝑚)) = ((log‘𝐴) − (log‘𝑚)))
6261oveq1d 7383 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘(𝐴 / 𝑚)) / 𝑚) = (((log‘𝐴) − (log‘𝑚)) / 𝑚))
6338adantr 480 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘𝐴) ∈ ℂ)
6446recnd 11172 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (log‘𝑚) ∈ ℂ)
6545rpcnne0d 12970 . . . . . . . . . 10 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0))
66 divsubdir 11847 . . . . . . . . . 10 (((log‘𝐴) ∈ ℂ ∧ (log‘𝑚) ∈ ℂ ∧ (𝑚 ∈ ℂ ∧ 𝑚 ≠ 0)) → (((log‘𝐴) − (log‘𝑚)) / 𝑚) = (((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
6763, 64, 65, 66syl3anc 1374 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (((log‘𝐴) − (log‘𝑚)) / 𝑚) = (((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
6862, 67eqtrd 2772 . . . . . . . 8 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘(𝐴 / 𝑚)) / 𝑚) = (((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
6968sumeq2dv 15637 . . . . . . 7 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) = Σ𝑚 ∈ (1...(⌊‘𝐴))(((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)))
701, 36, 48fsumsub 15723 . . . . . . 7 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))(((log‘𝐴) / 𝑚) − ((log‘𝑚) / 𝑚)) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)))
7169, 70eqtrd 2772 . . . . . 6 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)))
72 remulcl 11123 . . . . . . . . . . . . 13 (((log‘𝐴) ∈ ℝ ∧ γ ∈ ℝ) → ((log‘𝐴) · γ) ∈ ℝ)
7311, 14, 72sylancl 587 . . . . . . . . . . . 12 (𝜑 → ((log‘𝐴) · γ) ∈ ℝ)
7413, 73readdcld 11173 . . . . . . . . . . 11 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) ∈ ℝ)
7574recnd 11172 . . . . . . . . . 10 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) ∈ ℂ)
7675, 50pncand 11505 . . . . . . . . 9 (𝜑 → ((((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)) − (((log‘𝐴)↑2) / 2)) = ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)))
7714recni 11158 . . . . . . . . . . . . 13 γ ∈ ℂ
7877a1i 11 . . . . . . . . . . . 12 (𝜑 → γ ∈ ℂ)
7938, 38, 78adddid 11168 . . . . . . . . . . 11 (𝜑 → ((log‘𝐴) · ((log‘𝐴) + γ)) = (((log‘𝐴) · (log‘𝐴)) + ((log‘𝐴) · γ)))
8012recnd 11172 . . . . . . . . . . . . . 14 (𝜑 → ((log‘𝐴)↑2) ∈ ℂ)
81802halvesd 12399 . . . . . . . . . . . . 13 (𝜑 → ((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) = ((log‘𝐴)↑2))
8238sqvald 14078 . . . . . . . . . . . . 13 (𝜑 → ((log‘𝐴)↑2) = ((log‘𝐴) · (log‘𝐴)))
8381, 82eqtrd 2772 . . . . . . . . . . . 12 (𝜑 → ((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) = ((log‘𝐴) · (log‘𝐴)))
8483oveq1d 7383 . . . . . . . . . . 11 (𝜑 → (((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) + ((log‘𝐴) · γ)) = (((log‘𝐴) · (log‘𝐴)) + ((log‘𝐴) · γ)))
8573recnd 11172 . . . . . . . . . . . 12 (𝜑 → ((log‘𝐴) · γ) ∈ ℂ)
8650, 50, 85add32d 11373 . . . . . . . . . . 11 (𝜑 → (((((log‘𝐴)↑2) / 2) + (((log‘𝐴)↑2) / 2)) + ((log‘𝐴) · γ)) = (((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)))
8779, 84, 863eqtr2d 2778 . . . . . . . . . 10 (𝜑 → ((log‘𝐴) · ((log‘𝐴) + γ)) = (((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)))
8887oveq1d 7383 . . . . . . . . 9 (𝜑 → (((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)) = ((((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)) + (((log‘𝐴)↑2) / 2)) − (((log‘𝐴)↑2) / 2)))
89 mulcom 11124 . . . . . . . . . . 11 ((γ ∈ ℂ ∧ (log‘𝐴) ∈ ℂ) → (γ · (log‘𝐴)) = ((log‘𝐴) · γ))
9077, 38, 89sylancr 588 . . . . . . . . . 10 (𝜑 → (γ · (log‘𝐴)) = ((log‘𝐴) · γ))
9190oveq2d 7384 . . . . . . . . 9 (𝜑 → ((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) = ((((log‘𝐴)↑2) / 2) + ((log‘𝐴) · γ)))
9276, 88, 913eqtr4rd 2783 . . . . . . . 8 (𝜑 → ((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) = (((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)))
9392oveq1d 7383 . . . . . . 7 (𝜑 → (((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) − 𝐿) = ((((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)) − 𝐿))
9490, 85eqeltrd 2837 . . . . . . . 8 (𝜑 → (γ · (log‘𝐴)) ∈ ℂ)
9550, 94, 51addsubassd 11524 . . . . . . 7 (𝜑 → (((((log‘𝐴)↑2) / 2) + (γ · (log‘𝐴))) − 𝐿) = ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))
9642, 50, 51subsub4d 11535 . . . . . . 7 (𝜑 → ((((log‘𝐴) · ((log‘𝐴) + γ)) − (((log‘𝐴)↑2) / 2)) − 𝐿) = (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
9793, 95, 963eqtr3d 2780 . . . . . 6 (𝜑 → ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)) = (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
9871, 97oveq12d 7386 . . . . 5 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)) − (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
9937, 49, 42, 52sub4d 11553 . . . . 5 (𝜑 → ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚)) − (((log‘𝐴) · ((log‘𝐴) + γ)) − ((((log‘𝐴)↑2) / 2) + 𝐿))) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
10098, 99eqtrd 2772 . . . 4 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿))) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
101100fveq2d 6846 . . 3 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) = (abs‘((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))))
10243, 53abs2dif2d 15396 . . 3 (𝜑 → (abs‘((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) − (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ≤ ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))))
103101, 102eqbrtrd 5122 . 2 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) ≤ ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))))
104 harmonicbnd4 26989 . . . . . . 7 (𝐴 ∈ ℝ+ → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴))
1052, 104syl 17 . . . . . 6 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴))
1068nnrecred 12208 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (1 / 𝑚) ∈ ℝ)
1071, 106fsumrecl 15669 . . . . . . . . . 10 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) ∈ ℝ)
108107, 40resubcld 11577 . . . . . . . . 9 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)) ∈ ℝ)
109108recnd 11172 . . . . . . . 8 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)) ∈ ℂ)
110109abscld 15374 . . . . . . 7 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ∈ ℝ)
1112rprecred 12972 . . . . . . 7 (𝜑 → (1 / 𝐴) ∈ ℝ)
112 0red 11147 . . . . . . . 8 (𝜑 → 0 ∈ ℝ)
113 1red 11145 . . . . . . . 8 (𝜑 → 1 ∈ ℝ)
114 0lt1 11671 . . . . . . . . 9 0 < 1
115114a1i 11 . . . . . . . 8 (𝜑 → 0 < 1)
116 loge 26563 . . . . . . . . 9 (log‘e) = 1
117 mulog2sumlem1.3 . . . . . . . . . 10 (𝜑 → e ≤ 𝐴)
118 epr 16145 . . . . . . . . . . 11 e ∈ ℝ+
119 logleb 26580 . . . . . . . . . . 11 ((e ∈ ℝ+𝐴 ∈ ℝ+) → (e ≤ 𝐴 ↔ (log‘e) ≤ (log‘𝐴)))
120118, 2, 119sylancr 588 . . . . . . . . . 10 (𝜑 → (e ≤ 𝐴 ↔ (log‘e) ≤ (log‘𝐴)))
121117, 120mpbid 232 . . . . . . . . 9 (𝜑 → (log‘e) ≤ (log‘𝐴))
122116, 121eqbrtrrid 5136 . . . . . . . 8 (𝜑 → 1 ≤ (log‘𝐴))
123112, 113, 11, 115, 122ltletrd 11305 . . . . . . 7 (𝜑 → 0 < (log‘𝐴))
124 lemul2 12006 . . . . . . 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 1377 . . . . . 6 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) ≤ (1 / 𝐴) ↔ ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) ≤ ((log‘𝐴) · (1 / 𝐴))))
126105, 125mpbid 232 . . . . 5 (𝜑 → ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) ≤ ((log‘𝐴) · (1 / 𝐴)))
12745rpcnd 12963 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ∈ ℂ)
12845rpne0d 12966 . . . . . . . . . . . 12 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → 𝑚 ≠ 0)
12963, 127, 128divrecd 11932 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → ((log‘𝐴) / 𝑚) = ((log‘𝐴) · (1 / 𝑚)))
130129sumeq2dv 15637 . . . . . . . . . 10 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) · (1 / 𝑚)))
131106recnd 11172 . . . . . . . . . . 11 ((𝜑𝑚 ∈ (1...(⌊‘𝐴))) → (1 / 𝑚) ∈ ℂ)
1321, 38, 131fsummulc2 15719 . . . . . . . . . 10 (𝜑 → ((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) · (1 / 𝑚)))
133130, 132eqtr4d 2775 . . . . . . . . 9 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) = ((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)))
134133oveq1d 7383 . . . . . . . 8 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) = (((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)) − ((log‘𝐴) · ((log‘𝐴) + γ))))
1351, 131fsumcl 15668 . . . . . . . . 9 (𝜑 → Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) ∈ ℂ)
13638, 135, 41subdid 11605 . . . . . . . 8 (𝜑 → ((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))) = (((log‘𝐴) · Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚)) − ((log‘𝐴) · ((log‘𝐴) + γ))))
137134, 136eqtr4d 2775 . . . . . . 7 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ))) = ((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ))))
138137fveq2d 6846 . . . . . 6 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) = (abs‘((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
139135, 41subcld 11504 . . . . . . 7 (𝜑 → (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)) ∈ ℂ)
14038, 139absmuld 15392 . . . . . 6 (𝜑 → (abs‘((log‘𝐴) · (Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) = ((abs‘(log‘𝐴)) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
141112, 11, 123ltled 11293 . . . . . . . 8 (𝜑 → 0 ≤ (log‘𝐴))
14211, 141absidd 15358 . . . . . . 7 (𝜑 → (abs‘(log‘𝐴)) = (log‘𝐴))
143142oveq1d 7383 . . . . . 6 (𝜑 → ((abs‘(log‘𝐴)) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))) = ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
144138, 140, 1433eqtrd 2776 . . . . 5 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) = ((log‘𝐴) · (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))(1 / 𝑚) − ((log‘𝐴) + γ)))))
1452rpcnd 12963 . . . . . 6 (𝜑𝐴 ∈ ℂ)
1462rpne0d 12966 . . . . . 6 (𝜑𝐴 ≠ 0)
14738, 145, 146divrecd 11932 . . . . 5 (𝜑 → ((log‘𝐴) / 𝐴) = ((log‘𝐴) · (1 / 𝐴)))
148126, 144, 1473brtr4d 5132 . . . 4 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) ≤ ((log‘𝐴) / 𝐴))
149 fveq2 6842 . . . . . . . . . . . . . 14 (𝑖 = 𝑚 → (log‘𝑖) = (log‘𝑚))
150 id 22 . . . . . . . . . . . . . 14 (𝑖 = 𝑚𝑖 = 𝑚)
151149, 150oveq12d 7386 . . . . . . . . . . . . 13 (𝑖 = 𝑚 → ((log‘𝑖) / 𝑖) = ((log‘𝑚) / 𝑚))
152151cbvsumv 15631 . . . . . . . . . . . 12 Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) = Σ𝑚 ∈ (1...(⌊‘𝑦))((log‘𝑚) / 𝑚)
153 fveq2 6842 . . . . . . . . . . . . . 14 (𝑦 = 𝐴 → (⌊‘𝑦) = (⌊‘𝐴))
154153oveq2d 7384 . . . . . . . . . . . . 13 (𝑦 = 𝐴 → (1...(⌊‘𝑦)) = (1...(⌊‘𝐴)))
155154sumeq1d 15635 . . . . . . . . . . . 12 (𝑦 = 𝐴 → Σ𝑚 ∈ (1...(⌊‘𝑦))((log‘𝑚) / 𝑚) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚))
156152, 155eqtrid 2784 . . . . . . . . . . 11 (𝑦 = 𝐴 → Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) = Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚))
157 fveq2 6842 . . . . . . . . . . . . 13 (𝑦 = 𝐴 → (log‘𝑦) = (log‘𝐴))
158157oveq1d 7383 . . . . . . . . . . . 12 (𝑦 = 𝐴 → ((log‘𝑦)↑2) = ((log‘𝐴)↑2))
159158oveq1d 7383 . . . . . . . . . . 11 (𝑦 = 𝐴 → (((log‘𝑦)↑2) / 2) = (((log‘𝐴)↑2) / 2))
160156, 159oveq12d 7386 . . . . . . . . . 10 (𝑦 = 𝐴 → (Σ𝑖 ∈ (1...(⌊‘𝑦))((log‘𝑖) / 𝑖) − (((log‘𝑦)↑2) / 2)) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)))
161 ovex 7401 . . . . . . . . . 10 𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)) ∈ V
162160, 19, 161fvmpt 6949 . . . . . . . . 9 (𝐴 ∈ ℝ+ → (𝐹𝐴) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)))
1632, 162syl 17 . . . . . . . 8 (𝜑 → (𝐹𝐴) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)))
164163oveq1d 7383 . . . . . . 7 (𝜑 → ((𝐹𝐴) − 𝐿) = ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)) − 𝐿))
16549, 50, 51subsub4d 11535 . . . . . . 7 (𝜑 → ((Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − (((log‘𝐴)↑2) / 2)) − 𝐿) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
166164, 165eqtrd 2772 . . . . . 6 (𝜑 → ((𝐹𝐴) − 𝐿) = (Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))
167166fveq2d 6846 . . . . 5 (𝜑 → (abs‘((𝐹𝐴) − 𝐿)) = (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))))
16820simp3i 1142 . . . . . 6 ((𝐹𝑟 𝐿𝐴 ∈ ℝ+ ∧ e ≤ 𝐴) → (abs‘((𝐹𝐴) − 𝐿)) ≤ ((log‘𝐴) / 𝐴))
16924, 2, 117, 168syl3anc 1374 . . . . 5 (𝜑 → (abs‘((𝐹𝐴) − 𝐿)) ≤ ((log‘𝐴) / 𝐴))
170167, 169eqbrtrrd 5124 . . . 4 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿))) ≤ ((log‘𝐴) / 𝐴))
17144, 54, 57, 57, 148, 170le2addd 11768 . . 3 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ≤ (((log‘𝐴) / 𝐴) + ((log‘𝐴) / 𝐴)))
17257recnd 11172 . . . 4 (𝜑 → ((log‘𝐴) / 𝐴) ∈ ℂ)
1731722timesd 12396 . . 3 (𝜑 → (2 · ((log‘𝐴) / 𝐴)) = (((log‘𝐴) / 𝐴) + ((log‘𝐴) / 𝐴)))
174171, 173breqtrrd 5128 . 2 (𝜑 → ((abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝐴) / 𝑚) − ((log‘𝐴) · ((log‘𝐴) + γ)))) + (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘𝑚) / 𝑚) − ((((log‘𝐴)↑2) / 2) + 𝐿)))) ≤ (2 · ((log‘𝐴) / 𝐴)))
17533, 55, 59, 103, 174letrd 11302 1 (𝜑 → (abs‘(Σ𝑚 ∈ (1...(⌊‘𝐴))((log‘(𝐴 / 𝑚)) / 𝑚) − ((((log‘𝐴)↑2) / 2) + ((γ · (log‘𝐴)) − 𝐿)))) ≤ (2 · ((log‘𝐴) / 𝐴)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2933   class class class wbr 5100  cmpt 5181  dom cdm 5632  wf 6496  cfv 6500  (class class class)co 7368  supcsup 9355  cc 11036  cr 11037  0cc0 11038  1c1 11039   + caddc 11041   · cmul 11043  +∞cpnf 11175  *cxr 11177   < clt 11178  cle 11179  cmin 11376   / cdiv 11806  cn 12157  2c2 12212  +crp 12917  ...cfz 13435  cfl 13722  cexp 13996  abscabs 15169  𝑟 crli 15420  Σcsu 15621  eceu 15997  logclog 26531  γcem 26970
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-inf2 9562  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116  ax-addf 11117
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-iin 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-se 5586  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-of 7632  df-om 7819  df-1st 7943  df-2nd 7944  df-supp 8113  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-2o 8408  df-oadd 8411  df-er 8645  df-map 8777  df-pm 8778  df-ixp 8848  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-fsupp 9277  df-fi 9326  df-sup 9357  df-inf 9358  df-oi 9427  df-card 9863  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-div 11807  df-nn 12158  df-2 12220  df-3 12221  df-4 12222  df-5 12223  df-6 12224  df-7 12225  df-8 12226  df-9 12227  df-n0 12414  df-xnn0 12487  df-z 12501  df-dec 12620  df-uz 12764  df-q 12874  df-rp 12918  df-xneg 13038  df-xadd 13039  df-xmul 13040  df-ioo 13277  df-ioc 13278  df-ico 13279  df-icc 13280  df-fz 13436  df-fzo 13583  df-fl 13724  df-mod 13802  df-seq 13937  df-exp 13997  df-fac 14209  df-bc 14238  df-hash 14266  df-shft 15002  df-cj 15034  df-re 15035  df-im 15036  df-sqrt 15170  df-abs 15171  df-limsup 15406  df-clim 15423  df-rlim 15424  df-sum 15622  df-ef 16002  df-e 16003  df-sin 16004  df-cos 16005  df-tan 16006  df-pi 16007  df-dvds 16192  df-struct 17086  df-sets 17103  df-slot 17121  df-ndx 17133  df-base 17149  df-ress 17170  df-plusg 17202  df-mulr 17203  df-starv 17204  df-sca 17205  df-vsca 17206  df-ip 17207  df-tset 17208  df-ple 17209  df-ds 17211  df-unif 17212  df-hom 17213  df-cco 17214  df-rest 17354  df-topn 17355  df-0g 17373  df-gsum 17374  df-topgen 17375  df-pt 17376  df-prds 17379  df-xrs 17435  df-qtop 17440  df-imas 17441  df-xps 17443  df-mre 17517  df-mrc 17518  df-acs 17520  df-mgm 18577  df-sgrp 18656  df-mnd 18672  df-submnd 18721  df-mulg 19010  df-cntz 19258  df-cmn 19723  df-psmet 21313  df-xmet 21314  df-met 21315  df-bl 21316  df-mopn 21317  df-fbas 21318  df-fg 21319  df-cnfld 21322  df-top 22850  df-topon 22867  df-topsp 22889  df-bases 22902  df-cld 22975  df-ntr 22976  df-cls 22977  df-nei 23054  df-lp 23092  df-perf 23093  df-cn 23183  df-cnp 23184  df-haus 23271  df-cmp 23343  df-tx 23518  df-hmeo 23711  df-fil 23802  df-fm 23894  df-flim 23895  df-flf 23896  df-xms 24276  df-ms 24277  df-tms 24278  df-cncf 24839  df-limc 25835  df-dv 25836  df-ulm 26354  df-log 26533  df-cxp 26534  df-atan 26845  df-em 26971
This theorem is referenced by:  mulog2sumlem2  27514
  Copyright terms: Public domain W3C validator