Theorem efcllem 16156

Description: Lemma for efcl 16161. The series that defines the exponential function converges, in the case where its argument is nonzero. The ratio test cvgrat 15963 is used to show convergence. (Contributed by NM, 26-Apr-2005.) (Proof shortened by Mario Carneiro, 28-Apr-2014.) (Proof shortened by AV, 9-Jul-2022.)

Hypothesis

Ref	Expression
eftval.1	⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴↑𝑛) / (!‘𝑛)))

Assertion

Ref	Expression
efcllem	⊢ (𝐴 ∈ ℂ → seq0( + , 𝐹) ∈ dom ⇝ )

Distinct variable group:   𝐴,𝑛

Allowed substitution hint:   𝐹(𝑛)

Proof of Theorem efcllem

Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		nn0uz 12918	. 2 ⊢ ℕ0 = (ℤ≥‘0)
2		eqid 2766	. 2 ⊢ (ℤ≥‘(⌊‘(2 · (abs‘𝐴)))) = (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))
3		halfre 12475	. . 3 ⊢ (1 / 2) ∈ ℝ
4	3	a1i 11	. 2 ⊢ (𝐴 ∈ ℂ → (1 / 2) ∈ ℝ)
5		halflt1 12479	. . 3 ⊢ (1 / 2) < 1
6	5	a1i 11	. 2 ⊢ (𝐴 ∈ ℂ → (1 / 2) < 1)
7		2re 12333	. . . 4 ⊢ 2 ∈ ℝ
8		abscl 15355	. . . 4 ⊢ (𝐴 ∈ ℂ → (abs‘𝐴) ∈ ℝ)
9		remulcl 11203	. . . 4 ⊢ ((2 ∈ ℝ ∧ (abs‘𝐴) ∈ ℝ) → (2 · (abs‘𝐴)) ∈ ℝ)
10	7, 8, 9	sylancr 599	. . 3 ⊢ (𝐴 ∈ ℂ → (2 · (abs‘𝐴)) ∈ ℝ)
11	7	a1i 11	. . . 4 ⊢ (𝐴 ∈ ℂ → 2 ∈ ℝ)
12		0le2 12361	. . . . 5 ⊢ 0 ≤ 2
13	12	a1i 11	. . . 4 ⊢ (𝐴 ∈ ℂ → 0 ≤ 2)
14		absge0 15364	. . . 4 ⊢ (𝐴 ∈ ℂ → 0 ≤ (abs‘𝐴))
15	11, 8, 13, 14	mulge0d 11809	. . 3 ⊢ (𝐴 ∈ ℂ → 0 ≤ (2 · (abs‘𝐴)))
16		flge0nn0 13873	. . 3 ⊢ (((2 · (abs‘𝐴)) ∈ ℝ ∧ 0 ≤ (2 · (abs‘𝐴))) → (⌊‘(2 · (abs‘𝐴))) ∈ ℕ0)
17	10, 15, 16	syl2anc 596	. 2 ⊢ (𝐴 ∈ ℂ → (⌊‘(2 · (abs‘𝐴))) ∈ ℕ0)
18		eftval.1	. . . . 5 ⊢ 𝐹 = (𝑛 ∈ ℕ0 ↦ ((𝐴↑𝑛) / (!‘𝑛)))
19	18	eftval 16155	. . . 4 ⊢ (𝑘 ∈ ℕ0 → (𝐹‘𝑘) = ((𝐴↑𝑘) / (!‘𝑘)))
20	19	adantl 487	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) = ((𝐴↑𝑘) / (!‘𝑘)))
21		eftcl 16152	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → ((𝐴↑𝑘) / (!‘𝑘)) ∈ ℂ)
22	20, 21	eqeltrd 2866	. 2 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐹‘𝑘) ∈ ℂ)
23	8	adantr 486	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘𝐴) ∈ ℝ)
24		eluznn0 12959	. . . . . . 7 ⊢ (((⌊‘(2 · (abs‘𝐴))) ∈ ℕ0 ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 𝑘 ∈ ℕ0)
25	17, 24	sylan 592	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 𝑘 ∈ ℕ0)
26		nn0p1nn 12561	. . . . . 6 ⊢ (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ)
27	25, 26	syl 18	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝑘 + 1) ∈ ℕ)
28	23, 27	nndivred 12308	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴) / (𝑘 + 1)) ∈ ℝ)
29	3	a1i 11	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (1 / 2) ∈ ℝ)
30	23, 25	reexpcld 14219	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴)↑𝑘) ∈ ℝ)
31	25	faccld 14340	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘𝑘) ∈ ℕ)
32	30, 31	nndivred 12308	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (((abs‘𝐴)↑𝑘) / (!‘𝑘)) ∈ ℝ)
33		expcl 14135	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝐴↑𝑘) ∈ ℂ)
34	25, 33	syldan 603	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝐴↑𝑘) ∈ ℂ)
35	34	absge0d 15524	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 0 ≤ (abs‘(𝐴↑𝑘)))
36		absexp 15381	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (abs‘(𝐴↑𝑘)) = ((abs‘𝐴)↑𝑘))
37	25, 36	syldan 603	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐴↑𝑘)) = ((abs‘𝐴)↑𝑘))
38	35, 37	breqtrd 5142	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 0 ≤ ((abs‘𝐴)↑𝑘))
39	31	nnred 12266	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘𝑘) ∈ ℝ)
40	31	nngt0d 12303	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 0 < (!‘𝑘))
41		divge0 12102	. . . . 5 ⊢ (((((abs‘𝐴)↑𝑘) ∈ ℝ ∧ 0 ≤ ((abs‘𝐴)↑𝑘)) ∧ ((!‘𝑘) ∈ ℝ ∧ 0 < (!‘𝑘))) → 0 ≤ (((abs‘𝐴)↑𝑘) / (!‘𝑘)))
42	30, 38, 39, 40, 41	syl22anc 852	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 0 ≤ (((abs‘𝐴)↑𝑘) / (!‘𝑘)))
43	10	adantr 486	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (2 · (abs‘𝐴)) ∈ ℝ)
44		peano2nn0 12562	. . . . . . . . . . 11 ⊢ ((⌊‘(2 · (abs‘𝐴))) ∈ ℕ0 → ((⌊‘(2 · (abs‘𝐴))) + 1) ∈ ℕ0)
45	17, 44	syl 18	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℂ → ((⌊‘(2 · (abs‘𝐴))) + 1) ∈ ℕ0)
46	45	nn0red 12584	. . . . . . . . 9 ⊢ (𝐴 ∈ ℂ → ((⌊‘(2 · (abs‘𝐴))) + 1) ∈ ℝ)
47	46	adantr 486	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((⌊‘(2 · (abs‘𝐴))) + 1) ∈ ℝ)
48	27	nnred 12266	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝑘 + 1) ∈ ℝ)
49		flltp1 13853	. . . . . . . . 9 ⊢ ((2 · (abs‘𝐴)) ∈ ℝ → (2 · (abs‘𝐴)) < ((⌊‘(2 · (abs‘𝐴))) + 1))
50	43, 49	syl 18	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (2 · (abs‘𝐴)) < ((⌊‘(2 · (abs‘𝐴))) + 1))
51		eluzp1p1 12908	. . . . . . . . . 10 ⊢ (𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴)))) → (𝑘 + 1) ∈ (ℤ≥‘((⌊‘(2 · (abs‘𝐴))) + 1)))
52	51	adantl 487	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝑘 + 1) ∈ (ℤ≥‘((⌊‘(2 · (abs‘𝐴))) + 1)))
53		eluzle 12893	. . . . . . . . 9 ⊢ ((𝑘 + 1) ∈ (ℤ≥‘((⌊‘(2 · (abs‘𝐴))) + 1)) → ((⌊‘(2 · (abs‘𝐴))) + 1) ≤ (𝑘 + 1))
54	52, 53	syl 18	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((⌊‘(2 · (abs‘𝐴))) + 1) ≤ (𝑘 + 1))
55	43, 47, 48, 50, 54	ltletrd 11388	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (2 · (abs‘𝐴)) < (𝑘 + 1))
56	23	recnd 11255	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘𝐴) ∈ ℂ)
57		2cn 12334	. . . . . . . 8 ⊢ 2 ∈ ℂ
58		mulcom 11204	. . . . . . . 8 ⊢ (((abs‘𝐴) ∈ ℂ ∧ 2 ∈ ℂ) → ((abs‘𝐴) · 2) = (2 · (abs‘𝐴)))
59	56, 57, 58	sylancl 598	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴) · 2) = (2 · (abs‘𝐴)))
60	27	nncnd 12267	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝑘 + 1) ∈ ℂ)
61	60	mullidd 11245	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (1 · (𝑘 + 1)) = (𝑘 + 1))
62	55, 59, 61	3brtr4d 5148	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴) · 2) < (1 · (𝑘 + 1)))
63		2rp 13039	. . . . . . . 8 ⊢ 2 ∈ ℝ+
64	63	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 2 ∈ ℝ+)
65		1red 11227	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 1 ∈ ℝ)
66	27	nnrpd 13076	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝑘 + 1) ∈ ℝ+)
67	23, 64, 65, 66	lt2mul2divd 13147	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (((abs‘𝐴) · 2) < (1 · (𝑘 + 1)) ↔ ((abs‘𝐴) / (𝑘 + 1)) < (1 / 2)))
68	62, 67	mpbid 235	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴) / (𝑘 + 1)) < (1 / 2))
69		ltle 11316	. . . . . 6 ⊢ ((((abs‘𝐴) / (𝑘 + 1)) ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (((abs‘𝐴) / (𝑘 + 1)) < (1 / 2) → ((abs‘𝐴) / (𝑘 + 1)) ≤ (1 / 2)))
70	28, 3, 69	sylancl 598	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (((abs‘𝐴) / (𝑘 + 1)) < (1 / 2) → ((abs‘𝐴) / (𝑘 + 1)) ≤ (1 / 2)))
71	68, 70	mpd 16	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴) / (𝑘 + 1)) ≤ (1 / 2))
72	28, 29, 32, 42, 71	lemul2ad 12173	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((((abs‘𝐴)↑𝑘) / (!‘𝑘)) · ((abs‘𝐴) / (𝑘 + 1))) ≤ ((((abs‘𝐴)↑𝑘) / (!‘𝑘)) · (1 / 2)))
73		peano2nn0 12562	. . . . . . 7 ⊢ (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
74	25, 73	syl 18	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝑘 + 1) ∈ ℕ0)
75	18	eftval 16155	. . . . . 6 ⊢ ((𝑘 + 1) ∈ ℕ0 → (𝐹‘(𝑘 + 1)) = ((𝐴↑(𝑘 + 1)) / (!‘(𝑘 + 1))))
76	74, 75	syl 18	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝐹‘(𝑘 + 1)) = ((𝐴↑(𝑘 + 1)) / (!‘(𝑘 + 1))))
77	76	fveq2d 6892	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐹‘(𝑘 + 1))) = (abs‘((𝐴↑(𝑘 + 1)) / (!‘(𝑘 + 1)))))
78		absexp 15381	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ (𝑘 + 1) ∈ ℕ0) → (abs‘(𝐴↑(𝑘 + 1))) = ((abs‘𝐴)↑(𝑘 + 1)))
79	74, 78	syldan 603	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐴↑(𝑘 + 1))) = ((abs‘𝐴)↑(𝑘 + 1)))
80	56, 25	expp1d 14203	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴)↑(𝑘 + 1)) = (((abs‘𝐴)↑𝑘) · (abs‘𝐴)))
81	79, 80	eqtrd 2801	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐴↑(𝑘 + 1))) = (((abs‘𝐴)↑𝑘) · (abs‘𝐴)))
82	74	faccld 14340	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘(𝑘 + 1)) ∈ ℕ)
83	82	nnred 12266	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘(𝑘 + 1)) ∈ ℝ)
84	82	nnnn0d 12583	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘(𝑘 + 1)) ∈ ℕ0)
85	84	nn0ge0d 12586	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → 0 ≤ (!‘(𝑘 + 1)))
86	83, 85	absidd 15500	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(!‘(𝑘 + 1))) = (!‘(𝑘 + 1)))
87		facp1 14334	. . . . . . . 8 ⊢ (𝑘 ∈ ℕ0 → (!‘(𝑘 + 1)) = ((!‘𝑘) · (𝑘 + 1)))
88	25, 87	syl 18	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘(𝑘 + 1)) = ((!‘𝑘) · (𝑘 + 1)))
89	86, 88	eqtrd 2801	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(!‘(𝑘 + 1))) = ((!‘𝑘) · (𝑘 + 1)))
90	81, 89	oveq12d 7441	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘(𝐴↑(𝑘 + 1))) / (abs‘(!‘(𝑘 + 1)))) = ((((abs‘𝐴)↑𝑘) · (abs‘𝐴)) / ((!‘𝑘) · (𝑘 + 1))))
91		expcl 14135	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ (𝑘 + 1) ∈ ℕ0) → (𝐴↑(𝑘 + 1)) ∈ ℂ)
92	74, 91	syldan 603	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝐴↑(𝑘 + 1)) ∈ ℂ)
93	82	nncnd 12267	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘(𝑘 + 1)) ∈ ℂ)
94	82	nnne0d 12304	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘(𝑘 + 1)) ≠ 0)
95	92, 93, 94	absdivd 15535	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘((𝐴↑(𝑘 + 1)) / (!‘(𝑘 + 1)))) = ((abs‘(𝐴↑(𝑘 + 1))) / (abs‘(!‘(𝑘 + 1)))))
96	30	recnd 11255	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘𝐴)↑𝑘) ∈ ℂ)
97	31	nncnd 12267	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘𝑘) ∈ ℂ)
98	31	nnne0d 12304	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (!‘𝑘) ≠ 0)
99	27	nnne0d 12304	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝑘 + 1) ≠ 0)
100	96, 97, 56, 60, 98, 99	divmuldivd 12050	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((((abs‘𝐴)↑𝑘) / (!‘𝑘)) · ((abs‘𝐴) / (𝑘 + 1))) = ((((abs‘𝐴)↑𝑘) · (abs‘𝐴)) / ((!‘𝑘) · (𝑘 + 1))))
101	90, 95, 100	3eqtr4d 2811	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘((𝐴↑(𝑘 + 1)) / (!‘(𝑘 + 1)))) = ((((abs‘𝐴)↑𝑘) / (!‘𝑘)) · ((abs‘𝐴) / (𝑘 + 1))))
102	77, 101	eqtrd 2801	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐹‘(𝑘 + 1))) = ((((abs‘𝐴)↑𝑘) / (!‘𝑘)) · ((abs‘𝐴) / (𝑘 + 1))))
103		halfcn 12476	. . . . 5 ⊢ (1 / 2) ∈ ℂ
104	25, 22	syldan 603	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝐹‘𝑘) ∈ ℂ)
105	104	abscld 15516	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐹‘𝑘)) ∈ ℝ)
106	105	recnd 11255	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐹‘𝑘)) ∈ ℂ)
107		mulcom 11204	. . . . 5 ⊢ (((1 / 2) ∈ ℂ ∧ (abs‘(𝐹‘𝑘)) ∈ ℂ) → ((1 / 2) · (abs‘(𝐹‘𝑘))) = ((abs‘(𝐹‘𝑘)) · (1 / 2)))
108	103, 106, 107	sylancr 599	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((1 / 2) · (abs‘(𝐹‘𝑘))) = ((abs‘(𝐹‘𝑘)) · (1 / 2)))
109	25, 19	syl 18	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (𝐹‘𝑘) = ((𝐴↑𝑘) / (!‘𝑘)))
110	109	fveq2d 6892	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐹‘𝑘)) = (abs‘((𝐴↑𝑘) / (!‘𝑘))))
111		eftabs 16154	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (abs‘((𝐴↑𝑘) / (!‘𝑘))) = (((abs‘𝐴)↑𝑘) / (!‘𝑘)))
112	25, 111	syldan 603	. . . . . 6 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘((𝐴↑𝑘) / (!‘𝑘))) = (((abs‘𝐴)↑𝑘) / (!‘𝑘)))
113	110, 112	eqtrd 2801	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐹‘𝑘)) = (((abs‘𝐴)↑𝑘) / (!‘𝑘)))
114	113	oveq1d 7438	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((abs‘(𝐹‘𝑘)) · (1 / 2)) = ((((abs‘𝐴)↑𝑘) / (!‘𝑘)) · (1 / 2)))
115	108, 114	eqtrd 2801	. . 3 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → ((1 / 2) · (abs‘(𝐹‘𝑘))) = ((((abs‘𝐴)↑𝑘) / (!‘𝑘)) · (1 / 2)))
116	72, 102, 115	3brtr4d 5148	. 2 ⊢ ((𝐴 ∈ ℂ ∧ 𝑘 ∈ (ℤ≥‘(⌊‘(2 · (abs‘𝐴))))) → (abs‘(𝐹‘(𝑘 + 1))) ≤ ((1 / 2) · (abs‘(𝐹‘𝑘))))
117	1, 2, 4, 6, 17, 22, 116	cvgrat 15963	1 ⊢ (𝐴 ∈ ℂ → seq0( + , 𝐹) ∈ dom ⇝ )

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2146   class class class wbr 5114   ↦ cmpt 5197  dom cdm 5666  ‘cfv 6543  (class class class)co 7423  ℂcc 11116  ℝcr 11117  0cc0 11118  1c1 11119   + caddc 11121   · cmul 11123   < clt 11261   ≤ cle 11262   / cdiv 11889  ℕcn 12251  2c2 12313  ℕ₀cn0 12522  ℤ_≥cuz 12880  ℝ⁺crp 13034  ⌊cfl 13843  seqcseq 14057  ↑cexp 14117  !cfa 14329  abscabs 15311   ⇝ cli 15561

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 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745  ax-inf2 9620  ax-cnex 11174  ax-resscn 11175  ax-1cn 11176  ax-icn 11177  ax-addcl 11178  ax-addrcl 11179  ax-mulcl 11180  ax-mulrcl 11181  ax-mulcom 11182  ax-addass 11183  ax-mulass 11184  ax-distr 11185  ax-i2m1 11186  ax-1ne0 11187  ax-1rid 11188  ax-rnegex 11189  ax-rrecex 11190  ax-cnre 11191  ax-pre-lttri 11192  ax-pre-lttrn 11193  ax-pre-ltadd 11194  ax-pre-mulgt0 11195  ax-pre-sup 11196

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 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-nel 3068  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-int 4918  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-tr 5224  df-id 5561  df-eprel 5566  df-po 5574  df-so 5575  df-fr 5619  df-se 5620  df-we 5621  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6309  df-ord 6370  df-on 6371  df-lim 6372  df-suc 6373  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7380  df-ov 7426  df-oprab 7427  df-mpo 7428  df-om 7872  df-1st 7995  df-2nd 7996  df-frecs 8287  df-wrecs 8318  df-recs 8367  df-rdg 8406  df-1o 8462  df-er 8703  df-pm 8836  df-en 8953  df-dom 8954  df-sdom 8955  df-fin 8956  df-sup 9412  df-inf 9413  df-oi 9482  df-card 9944  df-pnf 11263  df-mnf 11264  df-xr 11265  df-ltxr 11266  df-le 11267  df-sub 11461  df-neg 11462  df-div 11890  df-nn 12252  df-2 12321  df-3 12322  df-n0 12523  df-z 12610  df-uz 12881  df-rp 13035  df-ico 13396  df-fz 13554  df-fzo 13702  df-fl 13845  df-seq 14058  df-exp 14118  df-fac 14330  df-hash 14387  df-shft 15130  df-cj 15176  df-re 15177  df-im 15178  df-sqrt 15312  df-abs 15313  df-limsup 15548  df-clim 15565  df-rlim 15566  df-sum 15764

This theorem is used by:  eff  16160  efcvg  16164  reefcl  16166  efaddlem  16172  eftlcvg  16187  effsumlt  16192  eflegeo  16202  eirrlem  16285  expfac  46411