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 47083
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 13004 . . . 4 ℕ = (ℤ≥‘1)
2 1zzd 12727 . . . 4 (⊤ → 1 ∈ ℤ)
3 stirlinglem1.4 . . . . . . . . 9 𝐿 = (𝑛 ∈ ℕ ↦ (1 / 𝑛))
4 ax-1cn 11258 . . . . . . . . . 10 1 ∈ ℂ
5 divcnv 16022 . . . . . . . . . 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 12341 . . . . . . . . . 10 ℕ ∈ V
1110mptex 7229 . . . . . . . . 9 (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1))) ∈ V
129, 11eqeltri 2857 . . . . . . . 8 𝐺 ∈ V
1312a1i 11 . . . . . . 7 (⊤ → 𝐺 ∈ V)
143a1i 11 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝐿 = (𝑛 ∈ ℕ ↦ (1 / 𝑛)))
15 simpr 490 . . . . . . . . . . 11 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → 𝑛 = 𝑘)
1615oveq2d 7436 . . . . . . . . . 10 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (1 / 𝑛) = (1 / 𝑘))
17 id 23 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ)
18 nnrp 13132 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ+)
1918rpreccld 13174 . . . . . . . . . 10 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ+)
2014, 16, 17, 19fvmptd 7001 . . . . . . . . 9 (𝑘 ∈ ℕ → (𝐿‘𝑘) = (1 / 𝑘))
21 nnrecre 12380 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / 𝑘) ∈ ℝ)
2220, 21eqeltrd 2861 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐿‘𝑘) ∈ ℝ)
2322adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐿‘𝑘) ∈ ℝ)
249a1i 11 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝐺 = (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1))))
2515oveq2d 7436 . . . . . . . . . . . 12 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (2 · 𝑛) = (2 · 𝑘))
2625oveq1d 7435 . . . . . . . . . . 11 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((2 · 𝑛) + 1) = ((2 · 𝑘) + 1))
2726oveq2d 7436 . . . . . . . . . 10 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (1 / ((2 · 𝑛) + 1)) = (1 / ((2 · 𝑘) + 1)))
28 2re 12417 . . . . . . . . . . . . . 14 2 ∈ ℝ
2928a1i 11 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 2 ∈ ℝ)
30 nnre 12342 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
3129, 30remulcld 11339 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (2 · 𝑘) ∈ ℝ)
32 0le2 12445 . . . . . . . . . . . . . 14 0 ≤ 2
3332a1i 11 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 0 ≤ 2)
3418rpge0d 13168 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 0 ≤ 𝑘)
3529, 30, 33, 34mulge0d 11893 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 0 ≤ (2 · 𝑘))
3631, 35ge0p1rpd 13194 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ∈ ℝ+)
3736rpreccld 13174 . . . . . . . . . 10 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ∈ ℝ+)
3824, 27, 17, 37fvmptd 7001 . . . . . . . . 9 (𝑘 ∈ ℕ → (𝐺‘𝑘) = (1 / ((2 · 𝑘) + 1)))
3937rpred 13164 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ∈ ℝ)
4038, 39eqeltrd 2861 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐺‘𝑘) ∈ ℝ)
4140adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) ∈ ℝ)
42 1red 11309 . . . . . . . . . 10 (𝑘 ∈ ℕ → 1 ∈ ℝ)
43 0le1 11839 . . . . . . . . . . 11 0 ≤ 1
4443a1i 11 . . . . . . . . . 10 (𝑘 ∈ ℕ → 0 ≤ 1)
4531, 42readdcld 11338 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ∈ ℝ)
46 nncn 12343 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
4746mullidd 11327 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (1 · 𝑘) = 𝑘)
48 1lt2 12515 . . . . . . . . . . . . . . 15 1 < 2
4948a1i 11 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → 1 < 2)
5042, 29, 18, 49ltmul1dd 13219 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (1 · 𝑘) < (2 · 𝑘))
5147, 50eqbrtrrd 5129 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 𝑘 < (2 · 𝑘))
5231ltp1d 12247 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (2 · 𝑘) < ((2 · 𝑘) + 1))
5330, 31, 45, 51, 52lttrd 11471 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 < ((2 · 𝑘) + 1))
5430, 45, 53ltled 11458 . . . . . . . . . 10 (𝑘 ∈ ℕ → 𝑘 ≤ ((2 · 𝑘) + 1))
5518, 36, 42, 44, 54lediv2ad 13186 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ≤ (1 / 𝑘))
5655, 38, 203brtr4d 5137 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐺‘𝑘) ≤ (𝐿‘𝑘))
5756adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) ≤ (𝐿‘𝑘))
5837rpge0d 13168 . . . . . . . . 9 (𝑘 ∈ ℕ → 0 ≤ (1 / ((2 · 𝑘) + 1)))
5958, 38breqtrrd 5133 . . . . . . . 8 (𝑘 ∈ ℕ → 0 ≤ (𝐺‘𝑘))
6059adantl 487 . . . . . . 7 ((⊤ ∧ 𝑘 ∈ ℕ) → 0 ≤ (𝐺‘𝑘))
611, 2, 8, 13, 23, 41, 57, 60climsqz2 15809 . . . . . 6 (⊤ → 𝐺 ⇝ 0)
62 1cnd 11302 . . . . . 6 (⊤ → 1 ∈ ℂ)
63 stirlinglem1.2 . . . . . . . 8 𝐹 = (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1))))
6410mptex 7229 . . . . . . . 8 (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1)))) ∈ V
6563, 64eqeltri 2857 . . . . . . 7 𝐹 ∈ V
6665a1i 11 . . . . . 6 (⊤ → 𝐹 ∈ V)
6741recnd 11337 . . . . . 6 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) ∈ ℂ)
6863a1i 11 . . . . . . . . 9 (𝑘 ∈ ℕ → 𝐹 = (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1)))))
6927oveq2d 7436 . . . . . . . . 9 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (1 − (1 / ((2 · 𝑛) + 1))) = (1 − (1 / ((2 · 𝑘) + 1))))
70 1cnd 11302 . . . . . . . . . 10 (𝑘 ∈ ℕ → 1 ∈ ℂ)
71 2cnd 12421 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 2 ∈ ℂ)
7271, 46mulcld 11329 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (2 · 𝑘) ∈ ℂ)
7372, 70addcld 11328 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ∈ ℂ)
7436rpne0d 13169 . . . . . . . . . . 11 (𝑘 ∈ ℕ → ((2 · 𝑘) + 1) ≠ 0)
7573, 74reccld 12086 . . . . . . . . . 10 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) ∈ ℂ)
7670, 75subcld 11669 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 − (1 / ((2 · 𝑘) + 1))) ∈ ℂ)
7768, 69, 17, 76fvmptd 7001 . . . . . . . 8 (𝑘 ∈ ℕ → (𝐹‘𝑘) = (1 − (1 / ((2 · 𝑘) + 1))))
7838eqcomd 2767 . . . . . . . . 9 (𝑘 ∈ ℕ → (1 / ((2 · 𝑘) + 1)) = (𝐺‘𝑘))
7978oveq2d 7436 . . . . . . . 8 (𝑘 ∈ ℕ → (1 − (1 / ((2 · 𝑘) + 1))) = (1 − (𝐺‘𝑘)))
8077, 79eqtrd 2796 . . . . . . 7 (𝑘 ∈ ℕ → (𝐹‘𝑘) = (1 − (𝐺‘𝑘)))
8180adantl 487 . . . . . 6 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) = (1 − (𝐺‘𝑘)))
821, 2, 61, 62, 66, 67, 81climsubc2 15806 . . . . 5 (⊤ → 𝐹 ⇝ (1 − 0))
83 1m0e1 12462 . . . . 5 (1 − 0) = 1
8482, 83breqtrdi 5146 . . . 4 (⊤ → 𝐹 ⇝ 1)
8562halfcld 12591 . . . 4 (⊤ → (1 / 2) ∈ ℂ)
86 stirlinglem1.1 . . . . . 6 𝐻 = (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
8710mptex 7229 . . . . . 6 (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))) ∈ V
8886, 87eqeltri 2857 . . . . 5 𝐻 ∈ V
8988a1i 11 . . . 4 (⊤ → 𝐻 ∈ V)
9077, 76eqeltrd 2861 . . . . 5 (𝑘 ∈ ℕ → (𝐹‘𝑘) ∈ ℂ)
9190adantl 487 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ ℂ)
92 nncn 12343 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
9392sqcld 14287 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛↑2) ∈ ℂ)
9493mullidd 11327 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (1 · (𝑛↑2)) = (𝑛↑2))
9594eqcomd 2767 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝑛↑2) = (1 · (𝑛↑2)))
96 2cnd 12421 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 2 ∈ ℂ)
9796, 92mulcld 11329 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℂ)
98 1cnd 11302 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → 1 ∈ ℂ)
9992, 97, 98adddid 11333 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) = ((𝑛 · (2 · 𝑛)) + (𝑛 · 1)))
10092, 96, 92mul12d 11519 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (𝑛 · (2 · 𝑛)) = (2 · (𝑛 · 𝑛)))
10192sqvald 14286 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → (𝑛↑2) = (𝑛 · 𝑛))
102101eqcomd 2767 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (𝑛 · 𝑛) = (𝑛↑2))
103102oveq2d 7436 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (2 · (𝑛 · 𝑛)) = (2 · (𝑛↑2)))
104100, 103eqtrd 2796 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛 · (2 · 𝑛)) = (2 · (𝑛↑2)))
10592mulridd 11326 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛 · 1) = 𝑛)
106104, 105oveq12d 7438 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((𝑛 · (2 · 𝑛)) + (𝑛 · 1)) = ((2 · (𝑛↑2)) + 𝑛))
107 2ne0 12449 . . . . . . . . . . . . . . . . . 18 2 ≠ 0
108107a1i 11 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 2 ≠ 0)
10992, 96, 108divcan2d 12095 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (2 · (𝑛 / 2)) = 𝑛)
110109eqcomd 2767 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 = (2 · (𝑛 / 2)))
111110oveq2d 7436 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((2 · (𝑛↑2)) + 𝑛) = ((2 · (𝑛↑2)) + (2 · (𝑛 / 2))))
11292halfcld 12591 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (𝑛 / 2) ∈ ℂ)
11396, 93, 112adddid 11333 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (2 · ((𝑛↑2) + (𝑛 / 2))) = ((2 · (𝑛↑2)) + (2 · (𝑛 / 2))))
114111, 113eqtr4d 2799 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((2 · (𝑛↑2)) + 𝑛) = (2 · ((𝑛↑2) + (𝑛 / 2))))
11599, 106, 1143eqtrd 2800 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) = (2 · ((𝑛↑2) + (𝑛 / 2))))
11695, 115oveq12d 7438 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) = ((1 · (𝑛↑2)) / (2 · ((𝑛↑2) + (𝑛 / 2)))))
11793, 112addcld 11328 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → ((𝑛↑2) + (𝑛 / 2)) ∈ ℂ)
118 nnrp 13132 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ+)
119 2z 12728 . . . . . . . . . . . . . . . 16 2 ∈ ℤ
120119a1i 11 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → 2 ∈ ℤ)
121118, 120rpexpcld 14391 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛↑2) ∈ ℝ+)
122118rphalfcld 13176 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝑛 / 2) ∈ ℝ+)
123121, 122rpaddcld 13179 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((𝑛↑2) + (𝑛 / 2)) ∈ ℝ+)
124123rpne0d 13169 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → ((𝑛↑2) + (𝑛 / 2)) ≠ 0)
12598, 96, 93, 117, 108, 124divmuldivd 12134 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((1 / 2) · ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2)))) = ((1 · (𝑛↑2)) / (2 · ((𝑛↑2) + (𝑛 / 2)))))
12693, 112pncand 11670 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)) = (𝑛↑2))
127126eqcomd 2767 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (𝑛↑2) = (((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)))
128127oveq1d 7435 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2))) = ((((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))))
129117, 112, 117, 124divsubdird 12132 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((((𝑛↑2) + (𝑛 / 2)) − (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) = ((((𝑛↑2) + (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))))
130117, 124dividd 12091 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) = 1)
131130oveq1d 7435 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((((𝑛↑2) + (𝑛 / 2)) / ((𝑛↑2) + (𝑛 / 2))) − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))) = (1 − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))))
132128, 129, 1313eqtrd 2800 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2))) = (1 − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))))
133 nnne0 12372 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 𝑛 ≠ 0)
13496, 92, 133divcld 12093 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (2 / 𝑛) ∈ ℂ)
13596, 92, 108, 133divne0d 12109 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (2 / 𝑛) ≠ 0)
136112, 117, 134, 124, 135divcan5rd 12120 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (((𝑛 / 2) · (2 / 𝑛)) / (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛))) = ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2))))
13792, 96, 133, 108divcan6d 12112 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → ((𝑛 / 2) · (2 / 𝑛)) = 1)
13893, 112, 134adddird 11334 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛)) = (((𝑛↑2) · (2 / 𝑛)) + ((𝑛 / 2) · (2 / 𝑛))))
13993, 96, 92, 133div12d 12129 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℕ → ((𝑛↑2) · (2 / 𝑛)) = (2 · ((𝑛↑2) / 𝑛)))
140 1e2m1 12469 . . . . . . . . . . . . . . . . . . . . . . 23 1 = (2 − 1)
141140oveq2i 7431 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛↑1) = (𝑛↑(2 − 1))
14292exp1d 14284 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ → (𝑛↑1) = 𝑛)
14392, 133, 120expm1d 14299 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 ∈ ℕ → (𝑛↑(2 − 1)) = ((𝑛↑2) / 𝑛))
144141, 142, 1433eqtr3a 2820 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 ∈ ℕ → 𝑛 = ((𝑛↑2) / 𝑛))
145144eqcomd 2767 . . . . . . . . . . . . . . . . . . . 20 (𝑛 ∈ ℕ → ((𝑛↑2) / 𝑛) = 𝑛)
146145oveq2d 7436 . . . . . . . . . . . . . . . . . . 19 (𝑛 ∈ ℕ → (2 · ((𝑛↑2) / 𝑛)) = (2 · 𝑛))
147139, 146eqtrd 2796 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ ℕ → ((𝑛↑2) · (2 / 𝑛)) = (2 · 𝑛))
148147, 137oveq12d 7438 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → (((𝑛↑2) · (2 / 𝑛)) + ((𝑛 / 2) · (2 / 𝑛))) = ((2 · 𝑛) + 1))
149138, 148eqtrd 2796 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛)) = ((2 · 𝑛) + 1))
150137, 149oveq12d 7438 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℕ → (((𝑛 / 2) · (2 / 𝑛)) / (((𝑛↑2) + (𝑛 / 2)) · (2 / 𝑛))) = (1 / ((2 · 𝑛) + 1)))
151136, 150eqtr3d 2798 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2))) = (1 / ((2 · 𝑛) + 1)))
152151oveq2d 7436 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (1 − ((𝑛 / 2) / ((𝑛↑2) + (𝑛 / 2)))) = (1 − (1 / ((2 · 𝑛) + 1))))
153132, 152eqtrd 2796 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2))) = (1 − (1 / ((2 · 𝑛) + 1))))
154153oveq2d 7436 . . . . . . . . . . 11 (𝑛 ∈ ℕ → ((1 / 2) · ((𝑛↑2) / ((𝑛↑2) + (𝑛 / 2)))) = ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
155116, 125, 1543eqtr2d 2802 . . . . . . . . . 10 (𝑛 ∈ ℕ → ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) = ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
156155mpteq2ia 5200 . . . . . . . . 9 (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))) = (𝑛 ∈ ℕ ↦ ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
15786, 156eqtri 2784 . . . . . . . 8 𝐻 = (𝑛 ∈ ℕ ↦ ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))))
158157a1i 11 . . . . . . 7 (𝑘 ∈ ℕ → 𝐻 = (𝑛 ∈ ℕ ↦ ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1))))))
15969oveq2d 7436 . . . . . . 7 ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((1 / 2) · (1 − (1 / ((2 · 𝑛) + 1)))) = ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))))
16070halfcld 12591 . . . . . . . 8 (𝑘 ∈ ℕ → (1 / 2) ∈ ℂ)
161160, 76mulcld 11329 . . . . . . 7 (𝑘 ∈ ℕ → ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))) ∈ ℂ)
162158, 159, 17, 161fvmptd 7001 . . . . . 6 (𝑘 ∈ ℕ → (𝐻‘𝑘) = ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))))
16377oveq2d 7436 . . . . . 6 (𝑘 ∈ ℕ → ((1 / 2) · (𝐹‘𝑘)) = ((1 / 2) · (1 − (1 / ((2 · 𝑘) + 1)))))
164162, 163eqtr4d 2799 . . . . 5 (𝑘 ∈ ℕ → (𝐻‘𝑘) = ((1 / 2) · (𝐹‘𝑘)))
165164adantl 487 . . . 4 ((⊤ ∧ 𝑘 ∈ ℕ) → (𝐻‘𝑘) = ((1 / 2) · (𝐹‘𝑘)))
1661, 2, 84, 85, 89, 91, 165climmulc2 15804 . . 3 (⊤ → 𝐻 ⇝ ((1 / 2) · 1))
167166mptru 1577 . 2 𝐻 ⇝ ((1 / 2) · 1)
168 halfcn 12560 . . 3 (1 / 2) ∈ ℂ
169168mulridi 11313 . 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 2956  Vcvv 3451   class class class wbr 5103   ↦ cmpt 5186  ‘cfv 6538  (class class class)co 7420  ℂcc 11198  ℝcr 11199  0cc0 11200  1c1 11201   + caddc 11203   · cmul 11205   < clt 11343   ≤ cle 11344   − cmin 11541   / cdiv 11973  ℕcn 12335  2c2 12397  ℤcz 12693  ℝ+crp 13120  ↑cexp 14204   ⇝ cli 15651
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 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-pre-sup 11278
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 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  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 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  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 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7878  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-er 8717  df-pm 8850  df-en 8974  df-dom 8975  df-sdom 8976  df-sup 9434  df-inf 9435  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-n0 12607  df-z 12694  df-uz 12966  df-rp 13121  df-fl 13932  df-seq 14145  df-exp 14205  df-cj 15266  df-re 15267  df-im 15268  df-sqrt 15402  df-abs 15403  df-clim 15655  df-rlim 15656
This theorem is used by:  stirlinglem15  47097
  Copyright terms: Public domain W3C validator