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 46079

Description: The Stirling's formula is proven using a number of local definitions. The main theorem stirling 46080 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 12391	. . . . . . 7 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
3	2	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ₀)
4		2cnd 12206	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℂ)
5		picn 26365	. . . . . . . . . . 11 ⊢ π ∈ ℂ
6	5	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℂ)
7	4, 6	mulcld 11135	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · π) ∈ ℂ)
8		nncn 12136	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
9	8	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
10	7, 9	mulcld 11135	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((2 · π) · 𝑛) ∈ ℂ)
11	10	sqrtcld 15347	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘((2 · π) · 𝑛)) ∈ ℂ)
12		ere 15996	. . . . . . . . . . . 12 ⊢ e ∈ ℝ
13	12	recni 11129	. . . . . . . . . . 11 ⊢ e ∈ ℂ
14	13	a1i 11	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → e ∈ ℂ)
15		epos 16116	. . . . . . . . . . . 12 ⊢ 0 < e
16	12, 15	gt0ne0ii 11656	. . . . . . . . . . 11 ⊢ e ≠ 0
17	16	a1i 11	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → e ≠ 0)
18	8, 14, 17	divcld 11900	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → (𝑛 / e) ∈ ℂ)
19	18, 2	expcld 14053	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → ((𝑛 / e)↑𝑛) ∈ ℂ)
20	19	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑛 / e)↑𝑛) ∈ ℂ)
21	11, 20	mulcld 11135	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ)
22		stirlinglem15.2	. . . . . . 7 ⊢ 𝑆 = (𝑛 ∈ ℕ₀ ↦ ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)))
23	22	fvmpt2 6941	. . . . . 6 ⊢ ((𝑛 ∈ ℕ₀ ∧ ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ) → (𝑆‘𝑛) = ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)))
24	3, 21, 23	syl2anc 584	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)))
25	24	oveq2d 7365	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / (𝑆‘𝑛)) = ((!‘𝑛) / ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛))))
26	6	sqrtcld 15347	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘π) ∈ ℂ)
27		2cnd 12206	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℂ)
28	27, 8	mulcld 11135	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℂ)
29	28	sqrtcld 15347	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → (√‘(2 · 𝑛)) ∈ ℂ)
30	29	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘(2 · 𝑛)) ∈ ℂ)
31	26, 30, 20	mulassd 11138	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛)) = ((√‘π) · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
32		stirlinglem15.7	. . . . . . . . . . . . . . . 16 ⊢ 𝐹 = (𝑛 ∈ ℕ ↦ (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
33		nfmpt1 5191	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
34	32, 33	nfcxfr 2889	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑛𝐹
35		stirlinglem15.8	. . . . . . . . . . . . . . . 16 ⊢ 𝐻 = (𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
36		nfmpt1 5191	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
37	35, 36	nfcxfr 2889	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑛𝐻
38		stirlinglem15.6	. . . . . . . . . . . . . . . 16 ⊢ 𝑉 = (𝑛 ∈ ℕ ↦ ((((2↑(4 · 𝑛)) · ((!‘𝑛)↑4)) / ((!‘(2 · 𝑛))↑2)) / ((2 · 𝑛) + 1)))
39		nfmpt1 5191	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ ((((2↑(4 · 𝑛)) · ((!‘𝑛)↑4)) / ((!‘(2 · 𝑛))↑2)) / ((2 · 𝑛) + 1)))
40	38, 39	nfcxfr 2889	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑛𝑉
41		nnuz 12778	. . . . . . . . . . . . . . 15 ⊢ ℕ = (ℤ_≥‘1)
42		1zzd 12506	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 1 ∈ ℤ)
43		stirlinglem15.3	. . . . . . . . . . . . . . . . 17 ⊢ 𝐴 = (𝑛 ∈ ℕ ↦ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
44		nfmpt1 5191	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
45	43, 44	nfcxfr 2889	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛𝐴
46		stirlinglem15.4	. . . . . . . . . . . . . . . . 17 ⊢ 𝐷 = (𝑛 ∈ ℕ ↦ (𝐴‘(2 · 𝑛)))
47		nfmpt1 5191	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ (𝐴‘(2 · 𝑛)))
48	46, 47	nfcxfr 2889	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑛𝐷
49		faccl 14190	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ₀ → (!‘𝑛) ∈ ℕ)
50	2, 49	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (!‘𝑛) ∈ ℕ)
51	50	nnrpd 12935	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (!‘𝑛) ∈ ℝ⁺)
52		2rp 12898	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 2 ∈ ℝ⁺
53	52	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℝ⁺)
54		nnrp 12905	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℝ⁺)
55	53, 54	rpmulcld 12953	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℝ⁺)
56	55	rpsqrtcld 15319	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (√‘(2 · 𝑛)) ∈ ℝ⁺)
57		epr 16117	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ e ∈ ℝ⁺
58	57	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → e ∈ ℝ⁺)
59	54, 58	rpdivcld 12954	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → (𝑛 / e) ∈ ℝ⁺)
60		nnz 12492	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℤ)
61	59, 60	rpexpcld 14154	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → ((𝑛 / e)↑𝑛) ∈ ℝ⁺)
62	56, 61	rpmulcld 12953	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℝ⁺)
63	51, 62	rpdivcld 12954	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℝ⁺)
64	43, 63	fmpti 7046	. . . . . . . . . . . . . . . . 17 ⊢ 𝐴:ℕ⟶ℝ⁺
65	64	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐴:ℕ⟶ℝ⁺)
66		eqid 2729	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛)↑4)) = (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛)↑4))
67		eqid 2729	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ ↦ ((𝐷‘𝑛)↑2)) = (𝑛 ∈ ℕ ↦ ((𝐷‘𝑛)↑2))
68	64	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 𝐴:ℕ⟶ℝ⁺)
69		2nn 12201	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 2 ∈ ℕ
70	69	a1i 11	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℕ)
71		id 22	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ)
72	70, 71	nnmulcld 12181	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℕ)
73	68, 72	ffvelcdmd 7019	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝐴‘(2 · 𝑛)) ∈ ℝ⁺)
74	46	fvmpt2 6941	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑛 ∈ ℕ ∧ (𝐴‘(2 · 𝑛)) ∈ ℝ⁺) → (𝐷‘𝑛) = (𝐴‘(2 · 𝑛)))
75	73, 74	mpdan 687	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) = (𝐴‘(2 · 𝑛)))
76	75, 73	eqeltrd 2828	. . . . . . . . . . . . . . . . 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 46072	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐹 ⇝ (𝐶↑2))
81		nnex 12134	. . . . . . . . . . . . . . . . . 18 ⊢ ℕ ∈ V
82	81	mptex 7159	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ ((((2↑(4 · 𝑛)) · ((!‘𝑛)↑4)) / ((!‘(2 · 𝑛))↑2)) / ((2 · 𝑛) + 1))) ∈ V
83	38, 82	eqeltri 2824	. . . . . . . . . . . . . . . 16 ⊢ 𝑉 ∈ V
84	83	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑉 ∈ V)
85		eqid 2729	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1)))) = (𝑛 ∈ ℕ ↦ (1 − (1 / ((2 · 𝑛) + 1))))
86		eqid 2729	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1))) = (𝑛 ∈ ℕ ↦ (1 / ((2 · 𝑛) + 1)))
87		eqid 2729	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ ↦ (1 / 𝑛)) = (𝑛 ∈ ℕ ↦ (1 / 𝑛))
88	35, 85, 86, 87	stirlinglem1 46065	. . . . . . . . . . . . . . . 16 ⊢ 𝐻 ⇝ (1 / 2)
89	88	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐻 ⇝ (1 / 2))
90	50	nncnd 12144	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 ∈ ℕ → (!‘𝑛) ∈ ℂ)
91	29, 19	mulcld 11135	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 ∈ ℕ → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ)
92	55	sqrtgt0d 15320	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑛 ∈ ℕ → 0 < (√‘(2 · 𝑛)))
93	92	gt0ne0d 11684	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑛 ∈ ℕ → (√‘(2 · 𝑛)) ≠ 0)
94		nnne0 12162	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑛 ∈ ℕ → 𝑛 ≠ 0)
95	8, 14, 94, 17	divne0d 11916	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑛 ∈ ℕ → (𝑛 / e) ≠ 0)
96	18, 95, 60	expne0d 14059	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑛 ∈ ℕ → ((𝑛 / e)↑𝑛) ≠ 0)
97	29, 19, 93, 96	mulne0d 11772	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑛 ∈ ℕ → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ≠ 0)
98	90, 91, 97	divcld 11900	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℂ)
99	43	fvmpt2 6941	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑛 ∈ ℕ ∧ ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) ∈ ℂ) → (𝐴‘𝑛) = ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
100	98, 99	mpdan 687	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → (𝐴‘𝑛) = ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
101	100, 98	eqeltrd 2828	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (𝐴‘𝑛) ∈ ℂ)
102		4nn0 12403	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 4 ∈ ℕ₀
103	102	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 4 ∈ ℕ₀)
104	101, 103	expcld 14053	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((𝐴‘𝑛)↑4) ∈ ℂ)
105	76	rpcnd 12939	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ∈ ℂ)
106	105	sqcld 14051	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((𝐷‘𝑛)↑2) ∈ ℂ)
107	76	rpne0d 12942	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → (𝐷‘𝑛) ≠ 0)
108		2z 12507	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 2 ∈ ℤ
109	108	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → 2 ∈ ℤ)
110	105, 107, 109	expne0d 14059	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → ((𝐷‘𝑛)↑2) ≠ 0)
111	104, 106, 110	divcld 11900	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) ∈ ℂ)
112	32	fvmpt2 6941	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 ∈ ℕ ∧ (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) ∈ ℂ) → (𝐹‘𝑛) = (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
113	111, 112	mpdan 687	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → (𝐹‘𝑛) = (((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)))
114	113, 111	eqeltrd 2828	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝐹‘𝑛) ∈ ℂ)
115	114	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ ℂ)
116	8	sqcld 14051	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝑛↑2) ∈ ℂ)
117		1cnd 11110	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 1 ∈ ℂ)
118	28, 117	addcld 11134	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → ((2 · 𝑛) + 1) ∈ ℂ)
119	8, 118	mulcld 11135	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) ∈ ℂ)
120	72	nnred 12143	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → (2 · 𝑛) ∈ ℝ)
121		1red 11116	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 1 ∈ ℝ)
122	72	nngt0d 12177	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 0 < (2 · 𝑛))
123		0lt1 11642	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 0 < 1
124	123	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑛 ∈ ℕ → 0 < 1)
125	120, 121, 122, 124	addgt0d 11695	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑛 ∈ ℕ → 0 < ((2 · 𝑛) + 1))
126	125	gt0ne0d 11684	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑛 ∈ ℕ → ((2 · 𝑛) + 1) ≠ 0)
127	8, 118, 94, 126	mulne0d 11772	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕ → (𝑛 · ((2 · 𝑛) + 1)) ≠ 0)
128	116, 119, 127	divcld 11900	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) ∈ ℂ)
129	35	fvmpt2 6941	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 ∈ ℕ ∧ ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))) ∈ ℂ) → (𝐻‘𝑛) = ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
130	128, 129	mpdan 687	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → (𝐻‘𝑛) = ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1))))
131	130, 128	eqeltrd 2828	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝐻‘𝑛) ∈ ℂ)
132	131	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐻‘𝑛) ∈ ℂ)
133	111, 128	mulcld 11135	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ → ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))) ∈ ℂ)
134		stirlinglem15.5	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝐸 = (𝑛 ∈ ℕ ↦ ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)))
135	43, 46, 134, 38	stirlinglem3 46067	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑉 = (𝑛 ∈ ℕ ↦ ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))))
136	135	fvmpt2 6941	. . . . . . . . . . . . . . . . . 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 7367	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → ((𝐹‘𝑛) · (𝐻‘𝑛)) = ((((𝐴‘𝑛)↑4) / ((𝐷‘𝑛)↑2)) · ((𝑛↑2) / (𝑛 · ((2 · 𝑛) + 1)))))
139	137, 138	eqtr4d 2767	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → (𝑉‘𝑛) = ((𝐹‘𝑛) · (𝐻‘𝑛)))
140	139	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑉‘𝑛) = ((𝐹‘𝑛) · (𝐻‘𝑛)))
141	1, 34, 37, 40, 41, 42, 80, 84, 89, 115, 132, 140	climmulf 45595	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑉 ⇝ ((𝐶↑2) · (1 / 2)))
142	38	wallispi2 46064	. . . . . . . . . . . . . 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 7364	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐶↑2) · (1 / 2)) / (1 / 2)) = ((π / 2) / (1 / 2)))
146	78	rpcnd 12939	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐶 ∈ ℂ)
147	146	sqcld 14051	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐶↑2) ∈ ℂ)
148		1cnd 11110	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ∈ ℂ)
149	148	halfcld 12369	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 / 2) ∈ ℂ)
150		2cnd 12206	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 2 ∈ ℂ)
151		2pos 12231	. . . . . . . . . . . . . . . 16 ⊢ 0 < 2
152	151	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 0 < 2)
153	152	gt0ne0d 11684	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 2 ≠ 0)
154	150, 153	recne0d 11894	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 / 2) ≠ 0)
155	147, 149, 154	divcan4d 11906	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝐶↑2) · (1 / 2)) / (1 / 2)) = (𝐶↑2))
156	5	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → π ∈ ℂ)
157	123	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 0 < 1)
158	157	gt0ne0d 11684	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≠ 0)
159	156, 148, 150, 158, 153	divcan7d 11928	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((π / 2) / (1 / 2)) = (π / 1))
160	156	div1d 11892	. . . . . . . . . . . . 13 ⊢ (𝜑 → (π / 1) = π)
161	159, 160	eqtrd 2764	. . . . . . . . . . . 12 ⊢ (𝜑 → ((π / 2) / (1 / 2)) = π)
162	145, 155, 161	3eqtr3d 2772	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐶↑2) = π)
163	162	fveq2d 6826	. . . . . . . . . 10 ⊢ (𝜑 → (√‘(𝐶↑2)) = (√‘π))
164	78	rprege0d 12944	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐶 ∈ ℝ ∧ 0 ≤ 𝐶))
165		sqrtsq 15176	. . . . . . . . . . 11 ⊢ ((𝐶 ∈ ℝ ∧ 0 ≤ 𝐶) → (√‘(𝐶↑2)) = 𝐶)
166	164, 165	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (√‘(𝐶↑2)) = 𝐶)
167	163, 166	eqtr3d 2766	. . . . . . . . 9 ⊢ (𝜑 → (√‘π) = 𝐶)
168	167	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘π) = 𝐶)
169	168	oveq1d 7364	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘π) · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = (𝐶 · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))))
170	146	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐶 ∈ ℂ)
171	91	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ∈ ℂ)
172	170, 171	mulcomd 11136	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐶 · ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶))
173	31, 169, 172	3eqtrd 2768	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛)) = (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶))
174	173	oveq2d 7365	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛))) = ((!‘𝑛) / (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶)))
175		2re 12202	. . . . . . . . . . 11 ⊢ 2 ∈ ℝ
176	175	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 2 ∈ ℝ)
177		pire 26364	. . . . . . . . . . 11 ⊢ π ∈ ℝ
178	177	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → π ∈ ℝ)
179	176, 178	remulcld 11145	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (2 · π) ∈ ℝ)
180		0le2 12230	. . . . . . . . . . 11 ⊢ 0 ≤ 2
181	180	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ 2)
182		0re 11117	. . . . . . . . . . . 12 ⊢ 0 ∈ ℝ
183		pipos 26366	. . . . . . . . . . . 12 ⊢ 0 < π
184	182, 177, 183	ltleii 11239	. . . . . . . . . . 11 ⊢ 0 ≤ π
185	184	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ π)
186	176, 178, 181, 185	mulge0d 11697	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ (2 · π))
187	3	nn0red 12446	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℝ)
188	3	nn0ge0d 12448	. . . . . . . . 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 7364	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · π)) · (√‘𝑛)) = (((√‘2) · (√‘π)) · (√‘𝑛)))
192	4	sqrtcld 15347	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘2) ∈ ℂ)
193	9	sqrtcld 15347	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘𝑛) ∈ ℂ)
194	192, 26, 193	mulassd 11138	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((√‘2) · (√‘π)) · (√‘𝑛)) = ((√‘2) · ((√‘π) · (√‘𝑛))))
195	192, 26, 193	mul12d 11325	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘2) · ((√‘π) · (√‘𝑛))) = ((√‘π) · ((√‘2) · (√‘𝑛))))
196	176, 181, 187, 188	sqrtmuld 15332	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘(2 · 𝑛)) = ((√‘2) · (√‘𝑛)))
197	196	eqcomd 2735	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘2) · (√‘𝑛)) = (√‘(2 · 𝑛)))
198	197	oveq2d 7365	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘π) · ((√‘2) · (√‘𝑛))) = ((√‘π) · (√‘(2 · 𝑛))))
199	195, 198	eqtrd 2764	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘2) · ((√‘π) · (√‘𝑛))) = ((√‘π) · (√‘(2 · 𝑛))))
200	191, 194, 199	3eqtrd 2768	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · π)) · (√‘𝑛)) = ((√‘π) · (√‘(2 · 𝑛))))
201	189, 200	eqtrd 2764	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (√‘((2 · π) · 𝑛)) = ((√‘π) · (√‘(2 · 𝑛))))
202	201	oveq1d 7364	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘((2 · π) · 𝑛)) · ((𝑛 / e)↑𝑛)) = (((√‘π) · (√‘(2 · 𝑛))) · ((𝑛 / e)↑𝑛)))
203	202	oveq2d 7365	. . . . 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 11900	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 / e) ∈ ℂ)
209	94	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ≠ 0)
210	9, 206, 209, 207	divne0d 11916	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑛 / e) ≠ 0)
211	60	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℤ)
212	208, 210, 211	expne0d 14059	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑛 / e)↑𝑛) ≠ 0)
213	30, 20, 205, 212	mulne0d 11772	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) ≠ 0)
214	78	rpne0d 12942	. . . . . . 7 ⊢ (𝜑 → 𝐶 ≠ 0)
215	214	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐶 ≠ 0)
216	204, 171, 170, 213, 215	divdiv1d 11931	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) / 𝐶) = ((!‘𝑛) / (((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) · 𝐶)))
217	174, 203, 216	3eqtr4d 2774	. . . 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 2735	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = (𝐴‘𝑛))
222	221	oveq1d 7364	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) / 𝐶) = ((𝐴‘𝑛) / 𝐶))
223	25, 217, 222	3eqtrd 2768	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((!‘𝑛) / (𝑆‘𝑛)) = ((𝐴‘𝑛) / 𝐶))
224	1, 223	mpteq2da 5184	. 2 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((!‘𝑛) / (𝑆‘𝑛))) = (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛) / 𝐶)))
225	101	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐴‘𝑛) ∈ ℂ)
226	225, 170, 215	divrec2d 11904	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝐴‘𝑛) / 𝐶) = ((1 / 𝐶) · (𝐴‘𝑛)))
227	1, 226	mpteq2da 5184	. . 3 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛) / 𝐶)) = (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))))
228	146, 214	reccld 11893	. . . . 5 ⊢ (𝜑 → (1 / 𝐶) ∈ ℂ)
229	81	mptex 7159	. . . . . 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 7365	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (2 · 𝑛) = (2 · 𝑘))
235	234	fveq2d 6826	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (√‘(2 · 𝑛)) = (√‘(2 · 𝑘)))
236	232	oveq1d 7364	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → (𝑛 / e) = (𝑘 / e))
237	236, 232	oveq12d 7367	. . . . . . . . . 10 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((𝑛 / e)↑𝑛) = ((𝑘 / e)↑𝑘))
238	235, 237	oveq12d 7367	. . . . . . . . 9 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛)) = ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘)))
239	233, 238	oveq12d 7367	. . . . . . . 8 ⊢ ((𝑘 ∈ ℕ ∧ 𝑛 = 𝑘) → ((!‘𝑛) / ((√‘(2 · 𝑛)) · ((𝑛 / e)↑𝑛))) = ((!‘𝑘) / ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘))))
240		id 22	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℕ)
241		nnnn0 12391	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℕ₀)
242		faccl 14190	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ₀ → (!‘𝑘) ∈ ℕ)
243		nncn 12136	. . . . . . . . . 10 ⊢ ((!‘𝑘) ∈ ℕ → (!‘𝑘) ∈ ℂ)
244	241, 242, 243	3syl 18	. . . . . . . . 9 ⊢ (𝑘 ∈ ℕ → (!‘𝑘) ∈ ℂ)
245		2cnd 12206	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → 2 ∈ ℂ)
246		nncn 12136	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
247	245, 246	mulcld 11135	. . . . . . . . . . 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 11900	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → (𝑘 / e) ∈ ℂ)
252	251, 241	expcld 14053	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → ((𝑘 / e)↑𝑘) ∈ ℂ)
253	248, 252	mulcld 11135	. . . . . . . . 9 ⊢ (𝑘 ∈ ℕ → ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘)) ∈ ℂ)
254	52	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ → 2 ∈ ℝ⁺)
255		nnrp 12905	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℝ⁺)
256	254, 255	rpmulcld 12953	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → (2 · 𝑘) ∈ ℝ⁺)
257	256	sqrtgt0d 15320	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → 0 < (√‘(2 · 𝑘)))
258	257	gt0ne0d 11684	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → (√‘(2 · 𝑘)) ≠ 0)
259		nnne0 12162	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → 𝑘 ≠ 0)
260	246, 249, 259, 250	divne0d 11916	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → (𝑘 / e) ≠ 0)
261		nnz 12492	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
262	251, 260, 261	expne0d 14059	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → ((𝑘 / e)↑𝑘) ≠ 0)
263	248, 252, 258, 262	mulne0d 11772	. . . . . . . . 9 ⊢ (𝑘 ∈ ℕ → ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘)) ≠ 0)
264	244, 253, 263	divcld 11900	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ → ((!‘𝑘) / ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘))) ∈ ℂ)
265	231, 239, 240, 264	fvmptd 6937	. . . . . . 7 ⊢ (𝑘 ∈ ℕ → (𝐴‘𝑘) = ((!‘𝑘) / ((√‘(2 · 𝑘)) · ((𝑘 / e)↑𝑘))))
266	265, 264	eqeltrd 2828	. . . . . 6 ⊢ (𝑘 ∈ ℕ → (𝐴‘𝑘) ∈ ℂ)
267	266	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐴‘𝑘) ∈ ℂ)
268		nfcv 2891	. . . . . . . . 9 ⊢ Ⅎ𝑘((1 / 𝐶) · (𝐴‘𝑛))
269		nfcv 2891	. . . . . . . . . . 11 ⊢ Ⅎ𝑛1
270		nfcv 2891	. . . . . . . . . . 11 ⊢ Ⅎ𝑛 /
271		nfcv 2891	. . . . . . . . . . 11 ⊢ Ⅎ𝑛𝐶
272	269, 270, 271	nfov 7379	. . . . . . . . . 10 ⊢ Ⅎ𝑛(1 / 𝐶)
273		nfcv 2891	. . . . . . . . . 10 ⊢ Ⅎ𝑛 ·
274		nfcv 2891	. . . . . . . . . . 11 ⊢ Ⅎ𝑛𝑘
275	45, 274	nffv 6832	. . . . . . . . . 10 ⊢ Ⅎ𝑛(𝐴‘𝑘)
276	272, 273, 275	nfov 7379	. . . . . . . . 9 ⊢ Ⅎ𝑛((1 / 𝐶) · (𝐴‘𝑘))
277		fveq2 6822	. . . . . . . . . 10 ⊢ (𝑛 = 𝑘 → (𝐴‘𝑛) = (𝐴‘𝑘))
278	277	oveq2d 7365	. . . . . . . . 9 ⊢ (𝑛 = 𝑘 → ((1 / 𝐶) · (𝐴‘𝑛)) = ((1 / 𝐶) · (𝐴‘𝑘)))
279	268, 276, 278	cbvmpt 5194	. . . . . . . 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 11893	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (1 / 𝐶) ∈ ℂ)
286	285, 267	mulcld 11135	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((1 / 𝐶) · (𝐴‘𝑘)) ∈ ℂ)
287		eqid 2729	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘))) = (𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))
288	287	fvmpt2 6941	. . . . . . 7 ⊢ ((𝑘 ∈ ℕ ∧ ((1 / 𝐶) · (𝐴‘𝑘)) ∈ ℂ) → ((𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))‘𝑘) = ((1 / 𝐶) · (𝐴‘𝑘)))
289	282, 286, 288	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑘 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑘)))‘𝑘) = ((1 / 𝐶) · (𝐴‘𝑘)))
290	281, 289	eqtrd 2764	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛)))‘𝑘) = ((1 / 𝐶) · (𝐴‘𝑘)))
291	41, 42, 79, 228, 230, 267, 290	climmulc2 15544	. . . 4 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) ⇝ ((1 / 𝐶) · 𝐶))
292	146, 214	recid2d 11896	. . . 4 ⊢ (𝜑 → ((1 / 𝐶) · 𝐶) = 1)
293	291, 292	breqtrd 5118	. . 3 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((1 / 𝐶) · (𝐴‘𝑛))) ⇝ 1)
294	227, 293	eqbrtrd 5114	. 2 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((𝐴‘𝑛) / 𝐶)) ⇝ 1)
295	224, 294	eqbrtrd 5114	1 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ ((!‘𝑛) / (𝑆‘𝑛))) ⇝ 1)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1540 Ⅎwnf 1783 ∈ wcel 2109 ≠ wne 2925 Vcvv 3436 class class class wbr 5092 ↦ cmpt 5173 ⟶wf 6478 ‘cfv 6482 (class class class)co 7349 ℂcc 11007 ℝcr 11008 0cc0 11009 1c1 11010 + caddc 11012 · cmul 11014 < clt 11149 ≤ cle 11150 − cmin 11347 / cdiv 11777 ℕcn 12128 2c2 12183 4c4 12185 ℕ₀cn0 12384 ℤcz 12471 ℝ⁺crp 12893 ↑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 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5218 ax-sep 5235 ax-nul 5245 ax-pow 5304 ax-pr 5371 ax-un 7671 ax-inf2 9537 ax-cc 10329 ax-cnex 11065 ax-resscn 11066 ax-1cn 11067 ax-icn 11068 ax-addcl 11069 ax-addrcl 11070 ax-mulcl 11071 ax-mulrcl 11072 ax-mulcom 11073 ax-addass 11074 ax-mulass 11075 ax-distr 11076 ax-i2m1 11077 ax-1ne0 11078 ax-1rid 11079 ax-rnegex 11080 ax-rrecex 11081 ax-cnre 11082 ax-pre-lttri 11083 ax-pre-lttrn 11084 ax-pre-ltadd 11085 ax-pre-mulgt0 11086 ax-pre-sup 11087 ax-addf 11088

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3343 df-reu 3344 df-rab 3395 df-v 3438 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-symdif 4204 df-nul 4285 df-if 4477 df-pw 4553 df-sn 4578 df-pr 4580 df-tp 4582 df-op 4584 df-uni 4859 df-int 4897 df-iun 4943 df-iin 4944 df-disj 5060 df-br 5093 df-opab 5155 df-mpt 5174 df-tr 5200 df-id 5514 df-eprel 5519 df-po 5527 df-so 5528 df-fr 5572 df-se 5573 df-we 5574 df-xp 5625 df-rel 5626 df-cnv 5627 df-co 5628 df-dm 5629 df-rn 5630 df-res 5631 df-ima 5632 df-pred 6249 df-ord 6310 df-on 6311 df-lim 6312 df-suc 6313 df-iota 6438 df-fun 6484 df-fn 6485 df-f 6486 df-f1 6487 df-fo 6488 df-f1o 6489 df-fv 6490 df-isom 6491 df-riota 7306 df-ov 7352 df-oprab 7353 df-mpo 7354 df-of 7613 df-ofr 7614 df-om 7800 df-1st 7924 df-2nd 7925 df-supp 8094 df-frecs 8214 df-wrecs 8245 df-recs 8294 df-rdg 8332 df-1o 8388 df-2o 8389 df-oadd 8392 df-omul 8393 df-er 8625 df-map 8755 df-pm 8756 df-ixp 8825 df-en 8873 df-dom 8874 df-sdom 8875 df-fin 8876 df-fsupp 9252 df-fi 9301 df-sup 9332 df-inf 9333 df-oi 9402 df-dju 9797 df-card 9835 df-acn 9838 df-pnf 11151 df-mnf 11152 df-xr 11153 df-ltxr 11154 df-le 11155 df-sub 11349 df-neg 11350 df-div 11778 df-nn 12129 df-2 12191 df-3 12192 df-4 12193 df-5 12194 df-6 12195 df-7 12196 df-8 12197 df-9 12198 df-n0 12385 df-z 12472 df-dec 12592 df-uz 12736 df-q 12850 df-rp 12894 df-xneg 13014 df-xadd 13015 df-xmul 13016 df-ioo 13252 df-ioc 13253 df-ico 13254 df-icc 13255 df-fz 13411 df-fzo 13558 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 18514 df-sgrp 18593 df-mnd 18609 df-submnd 18658 df-mulg 18947 df-cntz 19196 df-cmn 19661 df-psmet 21253 df-xmet 21254 df-met 21255 df-bl 21256 df-mopn 21257 df-fbas 21258 df-fg 21259 df-cnfld 21262 df-top 22779 df-topon 22796 df-topsp 22818 df-bases 22831 df-cld 22904 df-ntr 22905 df-cls 22906 df-nei 22983 df-lp 23021 df-perf 23022 df-cn 23112 df-cnp 23113 df-haus 23200 df-cmp 23272 df-tx 23447 df-hmeo 23640 df-fil 23731 df-fm 23823 df-flim 23824 df-flf 23825 df-xms 24206 df-ms 24207 df-tms 24208 df-cncf 24769 df-ovol 25363 df-vol 25364 df-mbf 25518 df-itg1 25519 df-itg2 25520 df-ibl 25521 df-itg 25522 df-0p 25569 df-limc 25765 df-dv 25766

This theorem is referenced by: stirling 46080

W3C validator