stirlinglem15 - Mathbox for Glauco Siliprandi

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

Theorem stirlinglem15 46196

Description: The Stirling's formula is proven using a number of local definitions. The main theorem stirling 46197 will use this final lemma, but it will not expose the local definitions. (Contributed by Glauco Siliprandi, 29-Jun-2017.)

**Hypotheses**
Ref	Expression
stirlinglem15.1	⊢ Ⅎ𝑛𝜑
stirlinglem15.2	⊢ 𝑆 = (𝑛 ∈ ℕ₀ ↦ ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)))
stirlinglem15.3	⊢ 𝐴 = (𝑛 ∈ ℕ ↦ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
stirlinglem15.4	⊢ 𝐷 = (𝑛 ∈ ℕ ↦ (𝐴‘(2 · 𝑛)))
stirlinglem15.5	⊢ 𝐸 = (𝑛 ∈ ℕ ↦ ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)))
stirlinglem15.6	⊢ 𝑉 = (𝑛 ∈ ℕ ↦ ((((2↑(4 · 𝑛)) · ((!‘𝑛)↑4)) / ((!‘(2 · 𝑛))↑2)) / ((2 · 𝑛) + 1)))
stirlinglem15.7	⊢ 𝐹 = (𝑛 ∈ ℕ ↦ (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
stirlinglem15.8	⊢ 𝐻 = (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
stirlinglem15.9	⊢ (𝜑 → 𝐶 ∈ ℝ⁺)
stirlinglem15.10	⊢ (𝜑 → 𝐴 ⇝ 𝐶)

**Assertion**
Ref	Expression
stirlinglem15	⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((!‘𝑛) / (𝑆‘𝑛))) ⇝ 1)

Distinct variable group: 𝐶,𝑛 Allowed substitution hints: 𝜑(𝑛) 𝐴(𝑛) 𝐷(𝑛) 𝑆(𝑛) 𝐸(𝑛) 𝐹(𝑛) 𝐻(𝑛) 𝑉(𝑛)

Proof of Theorem stirlinglem15 Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		stirlinglem15.1	. . 3 ⊢ Ⅎ𝑛𝜑
2		nnnn0 12388	. . . . . . 7 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
3	2	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ₀)
4		2cnd 12203	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℂ)
5		picn 26394	. . . . . . . . . . 11 ⊢ π ∈ ℂ
6	5	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℂ)
7	4, 6	mulcld 11132	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · π) ∈ ℂ)
8		nncn 12133	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
9	8	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
10	7, 9	mulcld 11132	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((2 · π) · 𝑛) ∈ ℂ)
11	10	sqrtcld 15347	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘((2 · π) · 𝑛)) ∈ ℂ)
12		ere 15996	. . . . . . . . . . . 12 ⊢ e ∈ ℝ
13	12	recni 11126	. . . . . . . . . . 11 ⊢ e ∈ ℂ
14	13	a1i 11	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → e ∈ ℂ)
15		epos 16116	. . . . . . . . . . . 12 ⊢ 0 < e
16	12, 15	gt0ne0ii 11653	. . . . . . . . . . 11 ⊢ e ≠ 0
17	16	a1i 11	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → e ≠ 0)
18	8, 14, 17	divcld 11897	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → (𝑛 / e) ∈ ℂ)
19	18, 2	expcld 14053	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → ((𝑛 / e)↑𝑛) ∈ ℂ)
20	19	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑛 / e)↑𝑛) ∈ ℂ)
21	11, 20	mulcld 11132	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ)
22		stirlinglem15.2	. . . . . . 7 ⊢ 𝑆 = (𝑛 ∈ ℕ₀ ↦ ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)))
23	22	fvmpt2 6940	. . . . . 6 ⊢ ((𝑛 ∈ ℕ₀ ∧ ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ) → (𝑆‘𝑛) = ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)))
24	3, 21, 23	syl2anc 584	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)))
25	24	oveq2d 7362	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / (𝑆‘𝑛)) = ((!‘𝑛) / ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛))))
26	6	sqrtcld 15347	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘π) ∈ ℂ)
27		2cnd 12203	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℂ)
28	27, 8	mulcld 11132	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℂ)
29	28	sqrtcld 15347	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → (√‘(2 · 𝑛)) ∈ ℂ)
30	29	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘(2 · 𝑛)) ∈ ℂ)
31	26, 30, 20	mulassd 11135	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛)) = ((√‘π) · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
32		stirlinglem15.7	. . . . . . . . . . . . . . . 16 ⊢ 𝐹 = (𝑛 ∈ ℕ ↦ (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
33		nfmpt1 5188	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
34	32, 33	nfcxfr 2892	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑛𝐹
35		stirlinglem15.8	. . . . . . . . . . . . . . . 16 ⊢ 𝐻 = (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
36		nfmpt1 5188	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
37	35, 36	nfcxfr 2892	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑛𝐻
38		stirlinglem15.6	. . . . . . . . . . . . . . . 16 ⊢ 𝑉 = (𝑛 ∈ ℕ ↦ ((((2↑(4 · 𝑛)) · ((!‘𝑛)↑4)) / ((!‘(2 · 𝑛))↑2)) / ((2 · 𝑛) + 1)))
39		nfmpt1 5188	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ ((((2↑(4 · 𝑛)) · ((!‘𝑛)↑4)) / ((!‘(2 · 𝑛))↑2)) / ((2 · 𝑛) + 1)))
40	38, 39	nfcxfr 2892	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑛𝑉
41		nnuz 12775	. . . . . . . . . . . . . . 15 ⊢ ℕ = (ℤ_≥‘1)
42		1zzd 12503	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 1 ∈ ℤ)
43		stirlinglem15.3	. . . . . . . . . . . . . . . . 17 ⊢ 𝐴 = (𝑛 ∈ ℕ ↦ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
44		nfmpt1 5188	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
45	43, 44	nfcxfr 2892	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛𝐴
46		stirlinglem15.4	. . . . . . . . . . . . . . . . 17 ⊢ 𝐷 = (𝑛 ∈ ℕ ↦ (𝐴‘(2 · 𝑛)))
47		nfmpt1 5188	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ (𝐴‘(2 · 𝑛)))
48	46, 47	nfcxfr 2892	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛𝐷
49		faccl 14190	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ₀ → (!‘𝑛) ∈ ℕ)
50	2, 49	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (!‘𝑛) ∈ ℕ)
51	50	nnrpd 12932	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (!‘𝑛) ∈ ℝ⁺)
52		2rp 12895	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 2 ∈ ℝ⁺
53	52	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℝ⁺)
54		nnrp 12902	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℝ⁺)
55	53, 54	rpmulcld 12950	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℝ⁺)
56	55	rpsqrtcld 15319	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (√‘(2 · 𝑛)) ∈ ℝ⁺)
57		epr 16117	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ e ∈ ℝ⁺
58	57	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → e ∈ ℝ⁺)
59	54, 58	rpdivcld 12951	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → (𝑛 / e) ∈ ℝ⁺)
60		nnz 12489	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℤ)
61	59, 60	rpexpcld 14154	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → ((𝑛 / e)↑𝑛) ∈ ℝ⁺)
62	56, 61	rpmulcld 12950	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℝ⁺)
63	51, 62	rpdivcld 12951	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℝ⁺)
64	43, 63	fmpti 7045	. . . . . . . . . . . . . . . . 17 ⊢ 𝐴:ℕ⟶ℝ⁺
65	64	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐴:ℕ⟶ℝ⁺)
66		eqid 2731	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛)↑4)) = (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛)↑4))
67		eqid 2731	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ ↦ ((𝐷‘𝑛)↑2)) = (𝑛 ∈ ℕ ↦ ((𝐷‘𝑛)↑2))
68	64	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 𝐴:ℕ⟶ℝ⁺)
69		2nn 12198	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 2 ∈ ℕ
70	69	a1i 11	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℕ)
71		id 22	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ)
72	70, 71	nnmulcld 12178	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℕ)
73	68, 72	ffvelcdmd 7018	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝐴‘(2 · 𝑛)) ∈ ℝ⁺)
74	46	fvmpt2 6940	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑛 ∈ ℕ ∧ (𝐴‘(2 · 𝑛)) ∈ ℝ⁺) → (𝐷‘𝑛) = (𝐴‘(2 · 𝑛)))
75	73, 74	mpdan 687	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) = (𝐴‘(2 · 𝑛)))
76	75, 73	eqeltrd 2831	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ∈ ℝ⁺)
77	76	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐷‘𝑛) ∈ ℝ⁺)
78		stirlinglem15.9	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐶 ∈ ℝ⁺)
79		stirlinglem15.10	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐴 ⇝ 𝐶)
80	1, 45, 48, 46, 65, 32, 66, 67, 77, 78, 79	stirlinglem8 46189	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐹 ⇝ (𝐶↑2))
81		nnex 12131	. . . . . . . . . . . . . . . . . 18 ⊢ ℕ ∈ V
82	81	mptex 7157	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ ((((2↑(4 · 𝑛)) · ((!‘𝑛)↑4)) / ((!‘(2 · 𝑛))↑2)) / ((2 · 𝑛) + 1))) ∈ V
83	38, 82	eqeltri 2827	. . . . . . . . . . . . . . . 16 ⊢ 𝑉 ∈ V
84	83	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑉 ∈ V)
85		eqid 2731	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1)))) = (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1))))
86		eqid 2731	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1))) = (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1)))
87		eqid 2731	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ (1 / 𝑛)) = (𝑛 ∈ ℕ ↦ (1 / 𝑛))
88	35, 85, 86, 87	stirlinglem1 46182	. . . . . . . . . . . . . . . 16 ⊢ 𝐻 ⇝ (1 / 2)
89	88	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐻 ⇝ (1 / 2))
90	50	nncnd 12141	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 ∈ ℕ → (!‘𝑛) ∈ ℂ)
91	29, 19	mulcld 11132	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 ∈ ℕ → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ)
92	55	sqrtgt0d 15320	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑛 ∈ ℕ → 0 < (√‘(2 · 𝑛)))
93	92	gt0ne0d 11681	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑛 ∈ ℕ → (√‘(2 · 𝑛)) ≠ 0)
94		nnne0 12159	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 ∈ ℕ → 𝑛 ≠ 0)
95	8, 14, 94, 17	divne0d 11913	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑛 ∈ ℕ → (𝑛 / e) ≠ 0)
96	18, 95, 60	expne0d 14059	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑛 ∈ ℕ → ((𝑛 / e)↑𝑛) ≠ 0)
97	29, 19, 93, 96	mulne0d 11769	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 ∈ ℕ → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ≠ 0)
98	90, 91, 97	divcld 11897	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℂ)
99	43	fvmpt2 6940	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑛 ∈ ℕ ∧ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℂ) → (𝐴‘𝑛) = ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
100	98, 99	mpdan 687	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → (𝐴‘𝑛) = ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
101	100, 98	eqeltrd 2831	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (𝐴‘𝑛) ∈ ℂ)
102		4nn0 12400	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 4 ∈ ℕ₀
103	102	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 4 ∈ ℕ₀)
104	101, 103	expcld 14053	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((𝐴‘𝑛)↑4) ∈ ℂ)
105	76	rpcnd 12936	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ∈ ℂ)
106	105	sqcld 14051	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((𝐷‘𝑛)↑2) ∈ ℂ)
107	76	rpne0d 12939	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ≠ 0)
108		2z 12504	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 2 ∈ ℤ
109	108	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℤ)
110	105, 107, 109	expne0d 14059	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((𝐷‘𝑛)↑2) ≠ 0)
111	104, 106, 110	divcld 11897	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) ∈ ℂ)
112	32	fvmpt2 6940	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 ∈ ℕ ∧ (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) ∈ ℂ) → (𝐹‘𝑛) = (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
113	111, 112	mpdan 687	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → (𝐹‘𝑛) = (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
114	113, 111	eqeltrd 2831	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝐹‘𝑛) ∈ ℂ)
115	114	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ ℂ)
116	8	sqcld 14051	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝑛↑2) ∈ ℂ)
117		1cnd 11107	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 1 ∈ ℂ)
118	28, 117	addcld 11131	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → ((2 · 𝑛) + 1) ∈ ℂ)
119	8, 118	mulcld 11132	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) ∈ ℂ)
120	72	nnred 12140	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℝ)
121		1red 11113	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 1 ∈ ℝ)
122	72	nngt0d 12174	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 0 < (2 · 𝑛))
123		0lt1 11639	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 0 < 1
124	123	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 0 < 1)
125	120, 121, 122, 124	addgt0d 11692	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 0 < ((2 · 𝑛) + 1))
126	125	gt0ne0d 11681	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → ((2 · 𝑛) + 1) ≠ 0)
127	8, 118, 94, 126	mulne0d 11769	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) ≠ 0)
128	116, 119, 127	divcld 11897	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) ∈ ℂ)
129	35	fvmpt2 6940	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 ∈ ℕ ∧ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) ∈ ℂ) → (𝐻‘𝑛) = ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
130	128, 129	mpdan 687	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → (𝐻‘𝑛) = ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
131	130, 128	eqeltrd 2831	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝐻‘𝑛) ∈ ℂ)
132	131	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐻‘𝑛) ∈ ℂ)
133	111, 128	mulcld 11132	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))) ∈ ℂ)
134		stirlinglem15.5	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝐸 = (𝑛 ∈ ℕ ↦ ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)))
135	43, 46, 134, 38	stirlinglem3 46184	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑉 = (𝑛 ∈ ℕ ↦ ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))))
136	135	fvmpt2 6940	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 ∈ ℕ ∧ ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))) ∈ ℂ) → (𝑉‘𝑛) = ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))))
137	133, 136	mpdan 687	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → (𝑉‘𝑛) = ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))))
138	113, 130	oveq12d 7364	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → ((𝐹‘𝑛) · (𝐻‘𝑛)) = ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))))
139	137, 138	eqtr4d 2769	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝑉‘𝑛) = ((𝐹‘𝑛) · (𝐻‘𝑛)))
140	139	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑉‘𝑛) = ((𝐹‘𝑛) · (𝐻‘𝑛)))
141	1, 34, 37, 40, 41, 42, 80, 84, 89, 115, 132, 140	climmulf 45714	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑉 ⇝ ((𝐶↑2) · (1 / 2)))
142	38	wallispi2 46181	. . . . . . . . . . . . . 14 ⊢ 𝑉 ⇝ (π / 2)
143		climuni 15459	. . . . . . . . . . . . . 14 ⊢ ((𝑉 ⇝ ((𝐶↑2) · (1 / 2)) ∧ 𝑉 ⇝ (π / 2)) → ((𝐶↑2) · (1 / 2)) = (π / 2))
144	141, 142, 143	sylancl 586	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝐶↑2) · (1 / 2)) = (π / 2))
145	144	oveq1d 7361	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐶↑2) · (1 / 2)) / (1 / 2)) = ((π / 2) / (1 / 2)))
146	78	rpcnd 12936	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐶 ∈ ℂ)
147	146	sqcld 14051	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐶↑2) ∈ ℂ)
148		1cnd 11107	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ∈ ℂ)
149	148	halfcld 12366	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 / 2) ∈ ℂ)
150		2cnd 12203	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 2 ∈ ℂ)
151		2pos 12228	. . . . . . . . . . . . . . . 16 ⊢ 0 < 2
152	151	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 0 < 2)
153	152	gt0ne0d 11681	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 2 ≠ 0)
154	150, 153	recne0d 11891	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 / 2) ≠ 0)
155	147, 149, 154	divcan4d 11903	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐶↑2) · (1 / 2)) / (1 / 2)) = (𝐶↑2))
156	5	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → π ∈ ℂ)
157	123	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 0 < 1)
158	157	gt0ne0d 11681	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≠ 0)
159	156, 148, 150, 158, 153	divcan7d 11925	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((π / 2) / (1 / 2)) = (π / 1))
160	156	div1d 11889	. . . . . . . . . . . . 13 ⊢ (𝜑 → (π / 1) = π)
161	159, 160	eqtrd 2766	. . . . . . . . . . . 12 ⊢ (𝜑 → ((π / 2) / (1 / 2)) = π)
162	145, 155, 161	3eqtr3d 2774	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐶↑2) = π)
163	162	fveq2d 6826	. . . . . . . . . 10 ⊢ (𝜑 → (√‘(𝐶↑2)) = (√‘π))
164	78	rprege0d 12941	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
165		sqrtsq 15176	. . . . . . . . . . 11 ⊢ ((𝐶 ∈ ℝ ∧ 0 ≤ 𝐶) → (√‘(𝐶↑2)) = 𝐶)
166	164, 165	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (√‘(𝐶↑2)) = 𝐶)
167	163, 166	eqtr3d 2768	. . . . . . . . 9 ⊢ (𝜑 → (√‘π) = 𝐶)
168	167	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘π) = 𝐶)
169	168	oveq1d 7361	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘π) · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = (𝐶 · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
170	146	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐶 ∈ ℂ)
171	91	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ)
172	170, 171	mulcomd 11133	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐶 · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶))
173	31, 169, 172	3eqtrd 2770	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛)) = (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶))
174	173	oveq2d 7362	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛))) = ((!‘𝑛) / (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶)))
175		2re 12199	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ
176	175	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℝ)
177		pire 26393	. . . . . . . . . . 11 ⊢ π ∈ ℝ
178	177	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℝ)
179	176, 178	remulcld 11142	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · π) ∈ ℝ)
180		0le2 12227	. . . . . . . . . . 11 ⊢ 0 ≤ 2
181	180	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ 2)
182		0re 11114	. . . . . . . . . . . 12 ⊢ 0 ∈ ℝ
183		pipos 26395	. . . . . . . . . . . 12 ⊢ 0 < π
184	182, 177, 183	ltleii 11236	. . . . . . . . . . 11 ⊢ 0 ≤ π
185	184	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ π)
186	176, 178, 181, 185	mulge0d 11694	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ (2 · π))
187	3	nn0red 12443	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ)
188	3	nn0ge0d 12445	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ 𝑛)
189	179, 186, 187, 188	sqrtmuld 15332	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘((2 · π) · 𝑛)) = ((√‘(2 · π)) · (√‘𝑛)))
190	176, 181, 178, 185	sqrtmuld 15332	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘(2 · π)) = ((√‘2) · (√‘π)))
191	190	oveq1d 7361	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · π)) · (√‘𝑛)) = (((√‘2) · (√‘π)) · (√‘𝑛)))
192	4	sqrtcld 15347	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘2) ∈ ℂ)
193	9	sqrtcld 15347	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘𝑛) ∈ ℂ)
194	192, 26, 193	mulassd 11135	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((√‘2) · (√‘π)) · (√‘𝑛)) = ((√‘2) · ((√‘π) · (√‘𝑛))))
195	192, 26, 193	mul12d 11322	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘2) · ((√‘π) · (√‘𝑛))) = ((√‘π) · ((√‘2) · (√‘𝑛))))
196	176, 181, 187, 188	sqrtmuld 15332	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘(2 · 𝑛)) = ((√‘2) · (√‘𝑛)))
197	196	eqcomd 2737	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘2) · (√‘𝑛)) = (√‘(2 · 𝑛)))
198	197	oveq2d 7362	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘π) · ((√‘2) · (√‘𝑛))) = ((√‘π) · (√‘(2 · 𝑛))))
199	195, 198	eqtrd 2766	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘2) · ((√‘π) · (√‘𝑛))) = ((√‘π) · (√‘(2 · 𝑛))))
200	191, 194, 199	3eqtrd 2770	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · π)) · (√‘𝑛)) = ((√‘π) · (√‘(2 · 𝑛))))
201	189, 200	eqtrd 2766	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘((2 · π) · 𝑛)) = ((√‘π) · (√‘(2 · 𝑛))))
202	201	oveq1d 7361	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)) = (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛)))
203	202	oveq2d 7362	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛))) = ((!‘𝑛) / (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛))))
204	90	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (!‘𝑛) ∈ ℂ)
205	93	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘(2 · 𝑛)) ≠ 0)
206	13	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → e ∈ ℂ)
207	16	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → e ≠ 0)
208	9, 206, 207	divcld 11897	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 / e) ∈ ℂ)
209	94	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
210	9, 206, 209, 207	divne0d 11913	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 / e) ≠ 0)
211	60	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℤ)
212	208, 210, 211	expne0d 14059	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑛 / e)↑𝑛) ≠ 0)
213	30, 20, 205, 212	mulne0d 11769	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ≠ 0)
214	78	rpne0d 12939	. . . . . . 7 ⊢ (𝜑 → 𝐶 ≠ 0)
215	214	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐶 ≠ 0)
216	204, 171, 170, 213, 215	divdiv1d 11928	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) / 𝐶) = ((!‘𝑛) / (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶)))
217	174, 203, 216	3eqtr4d 2776	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛))) = (((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) / 𝐶))
218	98	ancli 548	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → (𝑛 ∈ ℕ ∧ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℂ))
219	218	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 ∈ ℕ ∧ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℂ))
220	219, 99	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐴‘𝑛) = ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
221	220	eqcomd 2737	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = (𝐴‘𝑛))
222	221	oveq1d 7361	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) / 𝐶) = ((𝐴‘𝑛) / 𝐶))
223	25, 217, 222	3eqtrd 2770	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / (𝑆‘𝑛)) = ((𝐴‘𝑛) / 𝐶))
224	1, 223	mpteq2da 5181	. 2 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((!‘𝑛) / (𝑆‘𝑛))) = (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛) / 𝐶)))
225	101	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐴‘𝑛) ∈ ℂ)
226	225, 170, 215	divrec2d 11901	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝐴‘𝑛) / 𝐶) = ((1 / 𝐶) · (𝐴‘𝑛)))
227	1, 226	mpteq2da 5181	. . 3 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛) / 𝐶)) = (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))))
228	146, 214	reccld 11890	. . . . 5 ⊢ (𝜑 → (1 / 𝐶) ∈ ℂ)
229	81	mptex 7157	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) ∈ V
230	229	a1i 11	. . . . 5 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) ∈ V)
231	43	a1i 11	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ → 𝐴 = (𝑛 ∈ ℕ ↦ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)))))
232		simpr 484	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → 𝑛 = 𝑘)
233	232	fveq2d 6826	. . . . . . . . 9 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (!‘𝑛) = (!‘𝑘))
234	232	oveq2d 7362	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (2 · 𝑛) = (2 · 𝑘))
235	234	fveq2d 6826	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (√‘(2 · 𝑛)) = (√‘(2 · 𝑘)))
236	232	oveq1d 7361	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (𝑛 / e) = (𝑘 / e))
237	236, 232	oveq12d 7364	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((𝑛 / e)↑𝑛) = ((𝑘 / e)↑𝑘))
238	235, 237	oveq12d 7364	. . . . . . . . 9 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) = ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘)))
239	233, 238	oveq12d 7364	. . . . . . . 8 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = ((!‘𝑘) / ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘))))
240		id 22	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℕ)
241		nnnn0 12388	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℕ₀)
242		faccl 14190	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ₀ → (!‘𝑘) ∈ ℕ)
243		nncn 12133	. . . . . . . . . 10 ⊢ ((!‘𝑘) ∈ ℕ → (!‘𝑘) ∈ ℂ)
244	241, 242, 243	3syl 18	. . . . . . . . 9 ⊢ (𝑘 ∈ ℕ → (!‘𝑘) ∈ ℂ)
245		2cnd 12203	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → 2 ∈ ℂ)
246		nncn 12133	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
247	245, 246	mulcld 11132	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → (2 · 𝑘) ∈ ℂ)
248	247	sqrtcld 15347	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → (√‘(2 · 𝑘)) ∈ ℂ)
249	13	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → e ∈ ℂ)
250	16	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → e ≠ 0)
251	246, 249, 250	divcld 11897	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → (𝑘 / e) ∈ ℂ)
252	251, 241	expcld 14053	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → ((𝑘 / e)↑𝑘) ∈ ℂ)
253	248, 252	mulcld 11132	. . . . . . . . 9 ⊢ (𝑘 ∈ ℕ → ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘)) ∈ ℂ)
254	52	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ → 2 ∈ ℝ⁺)
255		nnrp 12902	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℝ⁺)
256	254, 255	rpmulcld 12950	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → (2 · 𝑘) ∈ ℝ⁺)
257	256	sqrtgt0d 15320	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → 0 < (√‘(2 · 𝑘)))
258	257	gt0ne0d 11681	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → (√‘(2 · 𝑘)) ≠ 0)
259		nnne0 12159	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → 𝑘 ≠ 0)
260	246, 249, 259, 250	divne0d 11913	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → (𝑘 / e) ≠ 0)
261		nnz 12489	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
262	251, 260, 261	expne0d 14059	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → ((𝑘 / e)↑𝑘) ≠ 0)
263	248, 252, 258, 262	mulne0d 11769	. . . . . . . . 9 ⊢ (𝑘 ∈ ℕ → ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘)) ≠ 0)
264	244, 253, 263	divcld 11897	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ → ((!‘𝑘) / ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘))) ∈ ℂ)
265	231, 239, 240, 264	fvmptd 6936	. . . . . . 7 ⊢ (𝑘 ∈ ℕ → (𝐴‘𝑘) = ((!‘𝑘) / ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘))))
266	265, 264	eqeltrd 2831	. . . . . 6 ⊢ (𝑘 ∈ ℕ → (𝐴‘𝑘) ∈ ℂ)
267	266	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐴‘𝑘) ∈ ℂ)
268		nfcv 2894	. . . . . . . . 9 ⊢ Ⅎ𝑘((1 / 𝐶) · (𝐴‘𝑛))
269		nfcv 2894	. . . . . . . . . . 11 ⊢ Ⅎ𝑛1
270		nfcv 2894	. . . . . . . . . . 11 ⊢ Ⅎ𝑛 /
271		nfcv 2894	. . . . . . . . . . 11 ⊢ Ⅎ𝑛𝐶
272	269, 270, 271	nfov 7376	. . . . . . . . . 10 ⊢ Ⅎ𝑛(1 / 𝐶)
273		nfcv 2894	. . . . . . . . . 10 ⊢ Ⅎ𝑛 ·
274		nfcv 2894	. . . . . . . . . . 11 ⊢ Ⅎ𝑛𝑘
275	45, 274	nffv 6832	. . . . . . . . . 10 ⊢ Ⅎ𝑛(𝐴‘𝑘)
276	272, 273, 275	nfov 7376	. . . . . . . . 9 ⊢ Ⅎ𝑛((1 / 𝐶) · (𝐴‘𝑘))
277		fveq2 6822	. . . . . . . . . 10 ⊢ (𝑛 = 𝑘 → (𝐴‘𝑛) = (𝐴‘𝑘))
278	277	oveq2d 7362	. . . . . . . . 9 ⊢ (𝑛 = 𝑘 → ((1 / 𝐶) · (𝐴‘𝑛)) = ((1 / 𝐶) · (𝐴‘𝑘)))
279	268, 276, 278	cbvmpt 5191	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) = (𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))
280	279	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) = (𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘))))
281	280	fveq1d 6824	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛)))‘𝑘) = ((𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))‘𝑘))
282		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
283	146	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐶 ∈ ℂ)
284	214	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐶 ≠ 0)
285	283, 284	reccld 11890	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / 𝐶) ∈ ℂ)
286	285, 267	mulcld 11132	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((1 / 𝐶) · (𝐴‘𝑘)) ∈ ℂ)
287		eqid 2731	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘))) = (𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))
288	287	fvmpt2 6940	. . . . . . 7 ⊢ ((𝑘 ∈ ℕ ∧ ((1 / 𝐶) · (𝐴‘𝑘)) ∈ ℂ) → ((𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))‘𝑘) = ((1 / 𝐶) · (𝐴‘𝑘)))
289	282, 286, 288	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))‘𝑘) = ((1 / 𝐶) · (𝐴‘𝑘)))
290	281, 289	eqtrd 2766	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛)))‘𝑘) = ((1 / 𝐶) · (𝐴‘𝑘)))
291	41, 42, 79, 228, 230, 267, 290	climmulc2 15544	. . . 4 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) ⇝ ((1 / 𝐶) · 𝐶))
292	146, 214	recid2d 11893	. . . 4 ⊢ (𝜑 → ((1 / 𝐶) · 𝐶) = 1)
293	291, 292	breqtrd 5115	. . 3 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) ⇝ 1)
294	227, 293	eqbrtrd 5111	. 2 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛) / 𝐶)) ⇝ 1)
295	224, 294	eqbrtrd 5111	1 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((!‘𝑛) / (𝑆‘𝑛))) ⇝ 1)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1541 Ⅎwnf 1784 ∈ wcel 2111 ≠ wne 2928 Vcvv 3436 class class class wbr 5089 ↦ cmpt 5170 ⟶wf 6477 ‘cfv 6481 (class class class)co 7346 ℂcc 11004 ℝcr 11005 0cc0 11006 1c1 11007 + caddc 11009 · cmul 11011 < clt 11146 ≤ cle 11147 − cmin 11344 / cdiv 11774 ℕcn 12125 2c2 12180 4c4 12182 ℕ₀cn0 12381 ℤcz 12468 ℝ⁺crp 12890 ↑cexp 13968 !cfa 14180 √csqrt 15140 ⇝ cli 15391 eceu 15969 πcpi 15973

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-rep 5215 ax-sep 5232 ax-nul 5242 ax-pow 5301 ax-pr 5368 ax-un 7668 ax-inf2 9531 ax-cc 10326 ax-cnex 11062 ax-resscn 11063 ax-1cn 11064 ax-icn 11065 ax-addcl 11066 ax-addrcl 11067 ax-mulcl 11068 ax-mulrcl 11069 ax-mulcom 11070 ax-addass 11071 ax-mulass 11072 ax-distr 11073 ax-i2m1 11074 ax-1ne0 11075 ax-1rid 11076 ax-rnegex 11077 ax-rrecex 11078 ax-cnre 11079 ax-pre-lttri 11080 ax-pre-lttrn 11081 ax-pre-ltadd 11082 ax-pre-mulgt0 11083 ax-pre-sup 11084 ax-addf 11085

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3737 df-csb 3846 df-dif 3900 df-un 3902 df-in 3904 df-ss 3914 df-pss 3917 df-symdif 4200 df-nul 4281 df-if 4473 df-pw 4549 df-sn 4574 df-pr 4576 df-tp 4578 df-op 4580 df-uni 4857 df-int 4896 df-iun 4941 df-iin 4942 df-disj 5057 df-br 5090 df-opab 5152 df-mpt 5171 df-tr 5197 df-id 5509 df-eprel 5514 df-po 5522 df-so 5523 df-fr 5567 df-se 5568 df-we 5569 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6248 df-ord 6309 df-on 6310 df-lim 6311 df-suc 6312 df-iota 6437 df-fun 6483 df-fn 6484 df-f 6485 df-f1 6486 df-fo 6487 df-f1o 6488 df-fv 6489 df-isom 6490 df-riota 7303 df-ov 7349 df-oprab 7350 df-mpo 7351 df-of 7610 df-ofr 7611 df-om 7797 df-1st 7921 df-2nd 7922 df-supp 8091 df-frecs 8211 df-wrecs 8242 df-recs 8291 df-rdg 8329 df-1o 8385 df-2o 8386 df-oadd 8389 df-omul 8390 df-er 8622 df-map 8752 df-pm 8753 df-ixp 8822 df-en 8870 df-dom 8871 df-sdom 8872 df-fin 8873 df-fsupp 9246 df-fi 9295 df-sup 9326 df-inf 9327 df-oi 9396 df-dju 9794 df-card 9832 df-acn 9835 df-pnf 11148 df-mnf 11149 df-xr 11150 df-ltxr 11151 df-le 11152 df-sub 11346 df-neg 11347 df-div 11775 df-nn 12126 df-2 12188 df-3 12189 df-4 12190 df-5 12191 df-6 12192 df-7 12193 df-8 12194 df-9 12195 df-n0 12382 df-z 12469 df-dec 12589 df-uz 12733 df-q 12847 df-rp 12891 df-xneg 13011 df-xadd 13012 df-xmul 13013 df-ioo 13249 df-ioc 13250 df-ico 13251 df-icc 13252 df-fz 13408 df-fzo 13555 df-fl 13696 df-mod 13774 df-seq 13909 df-exp 13969 df-fac 14181 df-bc 14210 df-hash 14238 df-shft 14974 df-cj 15006 df-re 15007 df-im 15008 df-sqrt 15142 df-abs 15143 df-limsup 15378 df-clim 15395 df-rlim 15396 df-sum 15594 df-ef 15974 df-e 15975 df-sin 15976 df-cos 15977 df-pi 15979 df-struct 17058 df-sets 17075 df-slot 17093 df-ndx 17105 df-base 17121 df-ress 17142 df-plusg 17174 df-mulr 17175 df-starv 17176 df-sca 17177 df-vsca 17178 df-ip 17179 df-tset 17180 df-ple 17181 df-ds 17183 df-unif 17184 df-hom 17185 df-cco 17186 df-rest 17326 df-topn 17327 df-0g 17345 df-gsum 17346 df-topgen 17347 df-pt 17348 df-prds 17351 df-xrs 17406 df-qtop 17411 df-imas 17412 df-xps 17414 df-mre 17488 df-mrc 17489 df-acs 17491 df-mgm 18548 df-sgrp 18627 df-mnd 18643 df-submnd 18692 df-mulg 18981 df-cntz 19229 df-cmn 19694 df-psmet 21283 df-xmet 21284 df-met 21285 df-bl 21286 df-mopn 21287 df-fbas 21288 df-fg 21289 df-cnfld 21292 df-top 22809 df-topon 22826 df-topsp 22848 df-bases 22861 df-cld 22934 df-ntr 22935 df-cls 22936 df-nei 23013 df-lp 23051 df-perf 23052 df-cn 23142 df-cnp 23143 df-haus 23230 df-cmp 23302 df-tx 23477 df-hmeo 23670 df-fil 23761 df-fm 23853 df-flim 23854 df-flf 23855 df-xms 24235 df-ms 24236 df-tms 24237 df-cncf 24798 df-ovol 25392 df-vol 25393 df-mbf 25547 df-itg1 25548 df-itg2 25549 df-ibl 25550 df-itg 25551 df-0p 25598 df-limc 25794 df-dv 25795

This theorem is referenced by: stirling 46197

W3C validator