Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  stirlinglem1 Structured version   Visualization version   GIF version

Theorem stirlinglem1 46903
Description: A simple limit of fractions is computed. (Contributed by Glauco Siliprandi, 30-Jun-2017.)
Hypotheses
Ref Expression
stirlinglem1.1 𝐻 = (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
stirlinglem1.2 𝐹 = (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1))))
stirlinglem1.3 𝐺 = (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1)))
stirlinglem1.4 𝐿 = (𝑛 ∈ ℕ ↦ (1 / 𝑛))
Assertion
Ref Expression
stirlinglem1 𝐻 ⇝ (1 / 2)

Proof of Theorem stirlinglem1
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 nnuz 12927 . . . 4 ℕ = (ℤ‘1)
2 1zzd 12650 . . . 4 (⊤ → 1 ∈ ℤ)
3 stirlinglem1.4 . . . . . . . . 9 𝐿 = (𝑛 ∈ ℕ ↦ (1 / 𝑛))
4 ax-1cn 11183 . . . . . . . . . 10 1 ∈ ℂ
5 divcnv 15943 . . . . . . . . . 10 (1 ∈ ℂ → (𝑛 ∈ ℕ ↦ (1 / 𝑛)) ⇝ 0)
64, 5ax-mp 5 . . . . . . . . 9 (𝑛 ∈ ℕ ↦ (1 / 𝑛)) ⇝ 0
73, 6eqbrtri 5126 . . . . . . . 8 𝐿 ⇝ 0
87a1i 11 . . . . . . 7 (⊤ → 𝐿 ⇝ 0)
9 stirlinglem1.3 . . . . . . . . 9 𝐺 = (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1)))
10 nnex 12264 . . . . . . . . . 10 ℕ ∈ V
1110mptex 7223 . . . . . . . . 9 (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1))) ∈ V
129, 11eqeltri 2856 . . . . . . . 8 𝐺 ∈ V
1312a1i 11 . . . . . . 7 (⊤ → 𝐺 ∈ V)
143a1i 11 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝐿 = (𝑛 ∈ ℕ ↦ (1 / 𝑛)))
15 simpr 490 . . . . . . . . . . 11 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → 𝑛 = 𝑘)
1615oveq2d 7430 . . . . . . . . . 10 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (1 / 𝑛) = (1 / 𝑘))
17 id 23 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ)
18 nnrp 13055 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ+)
1918rpreccld 13097 . . . . . . . . . 10 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ+)
2014, 16, 17, 19fvmptd 6995 . . . . . . . . 9 (𝑘 ∈ ℕ → (𝐿𝑘) = (1 / 𝑘))
21 nnrecre 12303 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ)
2220, 21eqeltrd 2860 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐿𝑘) ∈ ℝ)
2322adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐿𝑘) ∈ ℝ)
249a1i 11 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝐺 = (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1))))
2515oveq2d 7430 . . . . . . . . . . . 12 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (2 · 𝑛) = (2 · 𝑘))
2625oveq1d 7429 . . . . . . . . . . 11 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((2 · 𝑛) + 1) = ((2 · 𝑘) + 1))
2726oveq2d 7430 . . . . . . . . . 10 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (1 / ((2 · 𝑛) + 1)) = (1 / ((2 · 𝑘) + 1)))
28 2re 12340 . . . . . . . . . . . . . 14 2 ∈ ℝ
2928a1i 11 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 2 ∈ ℝ)
30 nnre 12265 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
3129, 30remulcld 11264 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (2 · 𝑘) ∈ ℝ)
32 0le2 12368 . . . . . . . . . . . . . 14 0 ≤ 2
3332a1i 11 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 0 ≤ 2)
3418rpge0d 13091 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 0 ≤ 𝑘)
3529, 30, 33, 34mulge0d 11816 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 0 ≤ (2 · 𝑘))
3631, 35ge0p1rpd 13117 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ∈ ℝ+)
3736rpreccld 13097 . . . . . . . . . 10 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ∈ ℝ+)
3824, 27, 17, 37fvmptd 6995 . . . . . . . . 9 (𝑘 ∈ ℕ → (𝐺𝑘) = (1 / ((2 · 𝑘) + 1)))
3937rpred 13087 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ∈ ℝ)
4038, 39eqeltrd 2860 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐺𝑘) ∈ ℝ)
4140adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐺𝑘) ∈ ℝ)
42 1red 11234 . . . . . . . . . 10 (𝑘 ∈ ℕ → 1 ∈ ℝ)
43 0le1 11762 . . . . . . . . . . 11 0 ≤ 1
4443a1i 11 . . . . . . . . . 10 (𝑘 ∈ ℕ → 0 ≤ 1)
4531, 42readdcld 11263 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ∈ ℝ)
46 nncn 12266 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
4746mullidd 11252 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (1 · 𝑘) = 𝑘)
48 1lt2 12438 . . . . . . . . . . . . . . 15 1 < 2
4948a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 1 < 2)
5042, 29, 18, 49ltmul1dd 13142 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (1 · 𝑘) < (2 · 𝑘))
5147, 50eqbrtrrd 5129 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 𝑘 < (2 · 𝑘))
5231ltp1d 12170 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (2 · 𝑘) < ((2 · 𝑘) + 1))
5330, 31, 45, 51, 52lttrd 11396 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 < ((2 · 𝑘) + 1))
5430, 45, 53ltled 11383 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝑘 ≤ ((2 · 𝑘) + 1))
5518, 36, 42, 44, 54lediv2ad 13109 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘))
5655, 38, 203brtr4d 5137 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐺𝑘) ≤ (𝐿𝑘))
5756adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐺𝑘) ≤ (𝐿𝑘))
5837rpge0d 13091 . . . . . . . . 9 (𝑘 ∈ ℕ → 0 ≤ (1 / ((2 · 𝑘) + 1)))
5958, 38breqtrrd 5133 . . . . . . . 8 (𝑘 ∈ ℕ → 0 ≤ (𝐺𝑘))
6059adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 ≤ (𝐺𝑘))
611, 2, 8, 13, 23, 41, 57, 60climsqz2 15730 . . . . . 6 (⊤ → 𝐺 ⇝ 0)
62 1cnd 11227 . . . . . 6 (⊤ → 1 ∈ ℂ)
63 stirlinglem1.2 . . . . . . . 8 𝐹 = (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1))))
6410mptex 7223 . . . . . . . 8 (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1)))) ∈ V
6563, 64eqeltri 2856 . . . . . . 7 𝐹 ∈ V
6665a1i 11 . . . . . 6 (⊤ → 𝐹 ∈ V)
6741recnd 11262 . . . . . 6 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐺𝑘) ∈ ℂ)
6863a1i 11 . . . . . . . . 9 (𝑘 ∈ ℕ → 𝐹 = (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1)))))
6927oveq2d 7430 . . . . . . . . 9 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (1 − (1 / ((2 · 𝑛) + 1))) = (1 − (1 / ((2 · 𝑘) + 1))))
70 1cnd 11227 . . . . . . . . . 10 (𝑘 ∈ ℕ → 1 ∈ ℂ)
71 2cnd 12344 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 2 ∈ ℂ)
7271, 46mulcld 11254 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (2 · 𝑘) ∈ ℂ)
7372, 70addcld 11253 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ∈ ℂ)
7436rpne0d 13092 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ≠ 0)
7573, 74reccld 12009 . . . . . . . . . 10 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ∈ ℂ)
7670, 75subcld 11594 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 − (1 / ((2 · 𝑘) + 1))) ∈ ℂ)
7768, 69, 17, 76fvmptd 6995 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐹𝑘) = (1 − (1 / ((2 · 𝑘) + 1))))
7838eqcomd 2766 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) = (𝐺𝑘))
7978oveq2d 7430 . . . . . . . 8 (𝑘 ∈ ℕ → (1 − (1 / ((2 · 𝑘) + 1))) = (1 − (𝐺𝑘)))
8077, 79eqtrd 2795 . . . . . . 7 (𝑘 ∈ ℕ → (𝐹𝑘) = (1 − (𝐺𝑘)))
8180adantl 487 . . . . . 6 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐹𝑘) = (1 − (𝐺𝑘)))
821, 2, 61, 62, 66, 67, 81climsubc2 15727 . . . . 5 (⊤ → 𝐹 ⇝ (1 − 0))
83 1m0e1 12385 . . . . 5 (1 − 0) = 1
8482, 83breqtrdi 5146 . . . 4 (⊤ → 𝐹 ⇝ 1)
8562halfcld 12514 . . . 4 (⊤ → (1 / 2) ∈ ℂ)
86 stirlinglem1.1 . . . . . 6 𝐻 = (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
8710mptex 7223 . . . . . 6 (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))) ∈ V
8886, 87eqeltri 2856 . . . . 5 𝐻 ∈ V
8988a1i 11 . . . 4 (⊤ → 𝐻 ∈ V)
9077, 76eqeltrd 2860 . . . . 5 (𝑘 ∈ ℕ → (𝐹𝑘) ∈ ℂ)
9190adantl 487 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐹𝑘) ∈ ℂ)
92 nncn 12266 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
9392sqcld 14209 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛↑2) ∈ ℂ)
9493mullidd 11252 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (1 · (𝑛↑2)) = (𝑛↑2))
9594eqcomd 2766 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝑛↑2) = (1 · (𝑛↑2)))
96 2cnd 12344 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 2 ∈ ℂ)
9796, 92mulcld 11254 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℂ)
98 1cnd 11227 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → 1 ∈ ℂ)
9992, 97, 98adddid 11258 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) = ((𝑛 · (2 · 𝑛)) + (𝑛 · 1)))
10092, 96, 92mul12d 11444 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (𝑛 · (2 · 𝑛)) = (2 · (𝑛 · 𝑛)))
10192sqvald 14208 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → (𝑛↑2) = (𝑛 · 𝑛))
102101eqcomd 2766 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (𝑛 · 𝑛) = (𝑛↑2))
103102oveq2d 7430 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (2 · (𝑛 · 𝑛)) = (2 · (𝑛↑2)))
104100, 103eqtrd 2795 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛 · (2 · 𝑛)) = (2 · (𝑛↑2)))
10592mulridd 11251 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛 · 1) = 𝑛)
106104, 105oveq12d 7432 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((𝑛 · (2 · 𝑛)) + (𝑛 · 1)) = ((2 · (𝑛↑2)) + 𝑛))
107 2ne0 12372 . . . . . . . . . . . . . . . . . 18 2 ≠ 0
108107a1i 11 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 2 ≠ 0)
10992, 96, 108divcan2d 12018 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (2 · (𝑛 / 2)) = 𝑛)
110109eqcomd 2766 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 = (2 · (𝑛 / 2)))
111110oveq2d 7430 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((2 · (𝑛↑2)) + 𝑛) = ((2 · (𝑛↑2)) + (2 · (𝑛 / 2))))
11292halfcld 12514 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (𝑛 / 2) ∈ ℂ)
11396, 93, 112adddid 11258 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (2 · ((𝑛↑2) + (𝑛 / 2))) = ((2 · (𝑛↑2)) + (2 · (𝑛 / 2))))
114111, 113eqtr4d 2798 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((2 · (𝑛↑2)) + 𝑛) = (2 · ((𝑛↑2) + (𝑛 / 2))))
11599, 106, 1143eqtrd 2799 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) = (2 · ((𝑛↑2) + (𝑛 / 2))))
11695, 115oveq12d 7432 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) = ((1 · (𝑛↑2)) / (2 · ((𝑛↑2) + (𝑛 / 2)))))
11793, 112addcld 11253 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → ((𝑛↑2) + (𝑛 / 2)) ∈ ℂ)
118 nnrp 13055 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ+)
119 2z 12651 . . . . . . . . . . . . . . . 16 2 ∈ ℤ
120119a1i 11 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 2 ∈ ℤ)
121118, 120rpexpcld 14312 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛↑2) ∈ ℝ+)
122118rphalfcld 13099 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛 / 2) ∈ ℝ+)
123121, 122rpaddcld 13102 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((𝑛↑2) + (𝑛 / 2)) ∈ ℝ+)
124123rpne0d 13092 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → ((𝑛↑2) + (𝑛 / 2)) ≠ 0)
12598, 96, 93, 117, 108, 124divmuldivd 12057 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((1 / 2) · ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2)))) = ((1 · (𝑛↑2)) / (2 · ((𝑛↑2) + (𝑛 / 2)))))
12693, 112pncand 11595 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)) = (𝑛↑2))
127126eqcomd 2766 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (𝑛↑2) = (((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)))
128127oveq1d 7429 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2))) = ((((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))))
129117, 112, 117, 124divsubdird 12055 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) = ((((𝑛↑2) + (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))))
130117, 124dividd 12014 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) = 1)
131130oveq1d 7429 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((((𝑛↑2) + (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))) = (1 − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))))
132128, 129, 1313eqtrd 2799 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2))) = (1 − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))))
133 nnne0 12295 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 𝑛 ≠ 0)
13496, 92, 133divcld 12016 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (2 / 𝑛) ∈ ℂ)
13596, 92, 108, 133divne0d 12032 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (2 / 𝑛) ≠ 0)
136112, 117, 134, 124, 135divcan5rd 12043 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (((𝑛 / 2) · (2 / 𝑛)) / (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛))) = ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2))))
13792, 96, 133, 108divcan6d 12035 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → ((𝑛 / 2) · (2 / 𝑛)) = 1)
13893, 112, 134adddird 11259 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛)) = (((𝑛↑2) · (2 / 𝑛)) + ((𝑛 / 2) · (2 / 𝑛))))
13993, 96, 92, 133div12d 12052 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℕ → ((𝑛↑2) · (2 / 𝑛)) = (2 · ((𝑛↑2) / 𝑛)))
140 1e2m1 12392 . . . . . . . . . . . . . . . . . . . . . . 23 1 = (2 − 1)
141140oveq2i 7425 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛↑1) = (𝑛↑(2 − 1))
14292exp1d 14206 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ → (𝑛↑1) = 𝑛)
14392, 133, 120expm1d 14221 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ → (𝑛↑(2 − 1)) = ((𝑛↑2) / 𝑛))
144141, 142, 1433eqtr3a 2819 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 𝑛 = ((𝑛↑2) / 𝑛))
145144eqcomd 2766 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℕ → ((𝑛↑2) / 𝑛) = 𝑛)
146145oveq2d 7430 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℕ → (2 · ((𝑛↑2) / 𝑛)) = (2 · 𝑛))
147139, 146eqtrd 2795 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ ℕ → ((𝑛↑2) · (2 / 𝑛)) = (2 · 𝑛))
148147, 137oveq12d 7432 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → (((𝑛↑2) · (2 / 𝑛)) + ((𝑛 / 2) · (2 / 𝑛))) = ((2 · 𝑛) + 1))
149138, 148eqtrd 2795 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛)) = ((2 · 𝑛) + 1))
150137, 149oveq12d 7432 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (((𝑛 / 2) · (2 / 𝑛)) / (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛))) = (1 / ((2 · 𝑛) + 1)))
151136, 150eqtr3d 2797 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2))) = (1 / ((2 · 𝑛) + 1)))
152151oveq2d 7430 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (1 − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))) = (1 − (1 / ((2 · 𝑛) + 1))))
153132, 152eqtrd 2795 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2))) = (1 − (1 / ((2 · 𝑛) + 1))))
154153oveq2d 7430 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((1 / 2) · ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2)))) = ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
155116, 125, 1543eqtr2d 2801 . . . . . . . . . 10 (𝑛 ∈ ℕ → ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) = ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
156155mpteq2ia 5200 . . . . . . . . 9 (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))) = (𝑛 ∈ ℕ ↦ ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
15786, 156eqtri 2783 . . . . . . . 8 𝐻 = (𝑛 ∈ ℕ ↦ ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
158157a1i 11 . . . . . . 7 (𝑘 ∈ ℕ → 𝐻 = (𝑛 ∈ ℕ ↦ ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1))))))
15969oveq2d 7430 . . . . . . 7 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))) = ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))))
16070halfcld 12514 . . . . . . . 8 (𝑘 ∈ ℕ → (1 / 2) ∈ ℂ)
161160, 76mulcld 11254 . . . . . . 7 (𝑘 ∈ ℕ → ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))) ∈ ℂ)
162158, 159, 17, 161fvmptd 6995 . . . . . 6 (𝑘 ∈ ℕ → (𝐻𝑘) = ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))))
16377oveq2d 7430 . . . . . 6 (𝑘 ∈ ℕ → ((1 / 2) · (𝐹𝑘)) = ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))))
164162, 163eqtr4d 2798 . . . . 5 (𝑘 ∈ ℕ → (𝐻𝑘) = ((1 / 2) · (𝐹𝑘)))
165164adantl 487 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐻𝑘) = ((1 / 2) · (𝐹𝑘)))
1661, 2, 84, 85, 89, 91, 165climmulc2 15725 . . 3 (⊤ → 𝐻 ⇝ ((1 / 2) · 1))
167166mptru 1577 . 2 𝐻 ⇝ ((1 / 2) · 1)
168 halfcn 12483 . . 3 (1 / 2) ∈ ℂ
169168mulridi 11238 . 2 ((1 / 2) · 1) = (1 / 2)
170167, 169breqtri 5130 1 𝐻 ⇝ (1 / 2)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wa 401   = wceq 1570  wtru 1571  wcel 2145  wne 2955  Vcvv 3450   class class class wbr 5103  cmpt 5186  cfv 6533  (class class class)co 7414  cc 11123  cr 11124  0cc0 11125  1c1 11126   + caddc 11128   · cmul 11130   < clt 11268  cle 11269  cmin 11466   / cdiv 11896  cn 12258  2c2 12320  cz 12616  +crp 13043  cexp 14126  cli 15572
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7737  ax-cnex 11181  ax-resscn 11182  ax-1cn 11183  ax-icn 11184  ax-addcl 11185  ax-addrcl 11186  ax-mulcl 11187  ax-mulrcl 11188  ax-mulcom 11189  ax-addass 11190  ax-mulass 11191  ax-distr 11192  ax-i2m1 11193  ax-1ne0 11194  ax-1rid 11195  ax-rnegex 11196  ax-rrecex 11197  ax-cnre 11198  ax-pre-lttri 11199  ax-pre-lttrn 11200  ax-pre-ltadd 11201  ax-pre-mulgt0 11202  ax-pre-sup 11203
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7371  df-ov 7417  df-oprab 7418  df-mpo 7419  df-om 7864  df-2nd 7988  df-frecs 8281  df-wrecs 8312  df-recs 8361  df-rdg 8400  df-er 8697  df-pm 8830  df-en 8954  df-dom 8955  df-sdom 8956  df-sup 9413  df-inf 9414  df-pnf 11270  df-mnf 11271  df-xr 11272  df-ltxr 11273  df-le 11274  df-sub 11468  df-neg 11469  df-div 11897  df-nn 12259  df-2 12328  df-3 12329  df-n0 12530  df-z 12617  df-uz 12889  df-rp 13044  df-fl 13854  df-seq 14067  df-exp 14127  df-cj 15187  df-re 15188  df-im 15189  df-sqrt 15323  df-abs 15324  df-clim 15576  df-rlim 15577
This theorem is used by:  stirlinglem15  46917
  Copyright terms: Public domain W3C validator