ftalem4 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > ftalem4		Structured version Visualization version GIF version

Theorem ftalem4 27202

Description: Lemma for fta 27206: Closure of the auxiliary variables for ftalem5 27203. (Contributed by Mario Carneiro, 20-Sep-2014.) (Revised by AV, 28-Sep-2020.)

**Hypotheses**
Ref	Expression
ftalem.1	⊢ 𝐴 = (coeff‘𝐹)
ftalem.2	⊢ 𝑁 = (deg‘𝐹)
ftalem.3	⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
ftalem.4	⊢ (𝜑 → 𝑁 ∈ ℕ)
ftalem4.5	⊢ (𝜑 → (𝐹‘0) ≠ 0)
ftalem4.6	⊢ 𝐾 = inf({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0}, ℝ, < )
ftalem4.7	⊢ 𝑇 = (-((𝐹‘0) / (𝐴‘𝐾))↑_𝑐(1 / 𝐾))
ftalem4.8	⊢ 𝑈 = ((abs‘(𝐹‘0)) / (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) + 1))
ftalem4.9	⊢ 𝑋 = if(1 ≤ 𝑈, 1, 𝑈)

**Assertion**
Ref	Expression
ftalem4	⊢ (𝜑 → ((𝐾 ∈ ℕ ∧ (𝐴‘𝐾) ≠ 0) ∧ (𝑇 ∈ ℂ ∧ 𝑈 ∈ ℝ⁺ ∧ 𝑋 ∈ ℝ⁺)))

Distinct variable groups: 𝑘,𝑛,𝐴 𝑘,𝐾,𝑛 𝑘,𝑁,𝑛 𝑘,𝐹,𝑛 𝜑,𝑘 𝑆,𝑘 𝑇,𝑘 𝑘,𝑋,𝑛 Allowed substitution hints: 𝜑(𝑛) 𝑆(𝑛) 𝑇(𝑛) 𝑈(𝑘,𝑛)

**Proof of Theorem ftalem4**
Step	Hyp	Ref	Expression
1		ftalem4.6	. . . 4 ⊢ 𝐾 = inf({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0}, ℝ, < )
2		ssrab2 4042	. . . . . 6 ⊢ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ⊆ ℕ
3		nnuz 12897	. . . . . 6 ⊢ ℕ = (ℤ_≥‘1)
4	2, 3	sseqtri 3993	. . . . 5 ⊢ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ⊆ (ℤ_≥‘1)
5		fveq2 6879	. . . . . . . 8 ⊢ (𝑛 = 𝑁 → (𝐴‘𝑛) = (𝐴‘𝑁))
6	5	neeq1d 3023	. . . . . . 7 ⊢ (𝑛 = 𝑁 → ((𝐴‘𝑛) ≠ 0 ↔ (𝐴‘𝑁) ≠ 0))
7		ftalem.4	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℕ)
8	7	nnne0d 12282	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ≠ 0)
9		ftalem.3	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
10		ftalem.2	. . . . . . . . . . . 12 ⊢ 𝑁 = (deg‘𝐹)
11		ftalem.1	. . . . . . . . . . . 12 ⊢ 𝐴 = (coeff‘𝐹)
12	10, 11	dgreq0 26387	. . . . . . . . . . 11 ⊢ (𝐹 ∈ (Poly‘𝑆) → (𝐹 = 0_𝑝 ↔ (𝐴‘𝑁) = 0))
13	9, 12	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 = 0_𝑝 ↔ (𝐴‘𝑁) = 0))
14		fveq2 6879	. . . . . . . . . . . 12 ⊢ (𝐹 = 0_𝑝 → (deg‘𝐹) = (deg‘0_𝑝))
15		dgr0 26384	. . . . . . . . . . . 12 ⊢ (deg‘0_𝑝) = 0
16	14, 15	eqtrdi 2820	. . . . . . . . . . 11 ⊢ (𝐹 = 0_𝑝 → (deg‘𝐹) = 0)
17	10, 16	eqtrid 2816	. . . . . . . . . 10 ⊢ (𝐹 = 0_𝑝 → 𝑁 = 0)
18	13, 17	biimtrrdi 257	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴‘𝑁) = 0 → 𝑁 = 0))
19	18	necon3d 2985	. . . . . . . 8 ⊢ (𝜑 → (𝑁 ≠ 0 → (𝐴‘𝑁) ≠ 0))
20	8, 19	mpd 16	. . . . . . 7 ⊢ (𝜑 → (𝐴‘𝑁) ≠ 0)
21	6, 7, 20	elrabd 3661	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
22	21	ne0d 4303	. . . . 5 ⊢ (𝜑 → {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ≠ ∅)
23		infssuzcl 12952	. . . . 5 ⊢ (({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ⊆ (ℤ_≥‘1) ∧ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ≠ ∅) → inf({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
24	4, 22, 23	sylancr 598	. . . 4 ⊢ (𝜑 → inf({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
25	1, 24	eqeltrid 2873	. . 3 ⊢ (𝜑 → 𝐾 ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
26		fveq2 6879	. . . . 5 ⊢ (𝑛 = 𝐾 → (𝐴‘𝑛) = (𝐴‘𝐾))
27	26	neeq1d 3023	. . . 4 ⊢ (𝑛 = 𝐾 → ((𝐴‘𝑛) ≠ 0 ↔ (𝐴‘𝐾) ≠ 0))
28	27	elrab 3659	. . 3 ⊢ (𝐾 ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ↔ (𝐾 ∈ ℕ ∧ (𝐴‘𝐾) ≠ 0))
29	25, 28	sylib 221	. 2 ⊢ (𝜑 → (𝐾 ∈ ℕ ∧ (𝐴‘𝐾) ≠ 0))
30		ftalem4.7	. . . 4 ⊢ 𝑇 = (-((𝐹‘0) / (𝐴‘𝐾))↑_𝑐(1 / 𝐾))
31		plyf 26320	. . . . . . . . 9 ⊢ (𝐹 ∈ (Poly‘𝑆) → 𝐹:ℂ⟶ℂ)
32	9, 31	syl 18	. . . . . . . 8 ⊢ (𝜑 → 𝐹:ℂ⟶ℂ)
33		0cn 11194	. . . . . . . 8 ⊢ 0 ∈ ℂ
34		ffvelcdm 7074	. . . . . . . 8 ⊢ ((𝐹:ℂ⟶ℂ ∧ 0 ∈ ℂ) → (𝐹‘0) ∈ ℂ)
35	32, 33, 34	sylancl 597	. . . . . . 7 ⊢ (𝜑 → (𝐹‘0) ∈ ℂ)
36	11	coef3 26354	. . . . . . . . 9 ⊢ (𝐹 ∈ (Poly‘𝑆) → 𝐴:ℕ₀⟶ℂ)
37	9, 36	syl 18	. . . . . . . 8 ⊢ (𝜑 → 𝐴:ℕ₀⟶ℂ)
38	29	simpld 499	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ ℕ)
39	38	nnnn0d 12561	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ∈ ℕ₀)
40	37, 39	ffvelcdmd 7078	. . . . . . 7 ⊢ (𝜑 → (𝐴‘𝐾) ∈ ℂ)
41	29	simprd 500	. . . . . . 7 ⊢ (𝜑 → (𝐴‘𝐾) ≠ 0)
42	35, 40, 41	divcld 11987	. . . . . 6 ⊢ (𝜑 → ((𝐹‘0) / (𝐴‘𝐾)) ∈ ℂ)
43	42	negcld 11552	. . . . 5 ⊢ (𝜑 → -((𝐹‘0) / (𝐴‘𝐾)) ∈ ℂ)
44	38	nnrecred 12283	. . . . . 6 ⊢ (𝜑 → (1 / 𝐾) ∈ ℝ)
45	44	recnd 11233	. . . . 5 ⊢ (𝜑 → (1 / 𝐾) ∈ ℂ)
46	43, 45	cxpcld 26835	. . . 4 ⊢ (𝜑 → (-((𝐹‘0) / (𝐴‘𝐾))↑_𝑐(1 / 𝐾)) ∈ ℂ)
47	30, 46	eqeltrid 2873	. . 3 ⊢ (𝜑 → 𝑇 ∈ ℂ)
48		ftalem4.8	. . . 4 ⊢ 𝑈 = ((abs‘(𝐹‘0)) / (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) + 1))
49		ftalem4.5	. . . . . 6 ⊢ (𝜑 → (𝐹‘0) ≠ 0)
50	35, 49	absrpcld 15498	. . . . 5 ⊢ (𝜑 → (abs‘(𝐹‘0)) ∈ ℝ⁺)
51		fzfid 14005	. . . . . . 7 ⊢ (𝜑 → ((𝐾 + 1)...𝑁) ∈ Fin)
52		peano2nn0 12540	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ ℕ₀ → (𝐾 + 1) ∈ ℕ₀)
53	39, 52	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐾 + 1) ∈ ℕ₀)
54		elfzuz 13544	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((𝐾 + 1)...𝑁) → 𝑘 ∈ (ℤ_≥‘(𝐾 + 1)))
55		eluznn0 12937	. . . . . . . . . . 11 ⊢ (((𝐾 + 1) ∈ ℕ₀ ∧ 𝑘 ∈ (ℤ_≥‘(𝐾 + 1))) → 𝑘 ∈ ℕ₀)
56	53, 54, 55	syl2an 607	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → 𝑘 ∈ ℕ₀)
57	37	ffvelcdmda 7077	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ₀) → (𝐴‘𝑘) ∈ ℂ)
58	56, 57	syldan 602	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → (𝐴‘𝑘) ∈ ℂ)
59		expcl 14111	. . . . . . . . . 10 ⊢ ((𝑇 ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (𝑇↑𝑘) ∈ ℂ)
60	47, 56, 59	syl2an2r 697	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → (𝑇↑𝑘) ∈ ℂ)
61	58, 60	mulcld 11225	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → ((𝐴‘𝑘) · (𝑇↑𝑘)) ∈ ℂ)
62	61	abscld 15486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → (abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) ∈ ℝ)
63	51, 62	fsumrecl 15781	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) ∈ ℝ)
64	61	absge0d 15494	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → 0 ≤ (abs‘((𝐴‘𝑘) · (𝑇↑𝑘))))
65	51, 62, 64	fsumge0 15843	. . . . . 6 ⊢ (𝜑 → 0 ≤ Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))))
66	63, 65	ge0p1rpd 13086	. . . . 5 ⊢ (𝜑 → (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) + 1) ∈ ℝ⁺)
67	50, 66	rpdivcld 13073	. . . 4 ⊢ (𝜑 → ((abs‘(𝐹‘0)) / (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) + 1)) ∈ ℝ⁺)
68	48, 67	eqeltrid 2873	. . 3 ⊢ (𝜑 → 𝑈 ∈ ℝ⁺)
69		ftalem4.9	. . . 4 ⊢ 𝑋 = if(1 ≤ 𝑈, 1, 𝑈)
70		1rp 13016	. . . . 5 ⊢ 1 ∈ ℝ⁺
71		ifcl 4535	. . . . 5 ⊢ ((1 ∈ ℝ⁺ ∧ 𝑈 ∈ ℝ⁺) → if(1 ≤ 𝑈, 1, 𝑈) ∈ ℝ⁺)
72	70, 68, 71	sylancr 598	. . . 4 ⊢ (𝜑 → if(1 ≤ 𝑈, 1, 𝑈) ∈ ℝ⁺)
73	69, 72	eqeltrid 2873	. . 3 ⊢ (𝜑 → 𝑋 ∈ ℝ⁺)
74	47, 68, 73	3jca 1144	. 2 ⊢ (𝜑 → (𝑇 ∈ ℂ ∧ 𝑈 ∈ ℝ⁺ ∧ 𝑋 ∈ ℝ⁺))
75	29, 74	jca 520	1 ⊢ (𝜑 → ((𝐾 ∈ ℕ ∧ (𝐴‘𝐾) ≠ 0) ∧ (𝑇 ∈ ℂ ∧ 𝑈 ∈ ℝ⁺ ∧ 𝑋 ∈ ℝ⁺)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 209 ∧ wa 400 ∧ w3a 1101 = wceq 1567 ∈ wcel 2149 ≠ wne 2964 {crab 3423 ⊆ wss 3913 ∅c0 4294 ifcif 4489 class class class wbr 5110 ⟶wf 6530 ‘cfv 6534 (class class class)co 7408 infcinf 9397 ℂcc 11094 ℝcr 11095 0cc0 11096 1c1 11097 + caddc 11099 · cmul 11101 < clt 11239 ≤ cle 11240 -cneg 11438 / cdiv 11867 ℕcn 12229 ℕ₀cn0 12500 ℤ_≥cuz 12858 ℝ⁺crp 13012 ...cfz 13531 ↑cexp 14093 abscabs 15281 Σcsu 15733 0_𝑝c0p 25793 Polycply 26306 coeffccoe 26308 degcdgr 26309 ↑_𝑐ccxp 26682

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1822 ax-4 1836 ax-5 1937 ax-6 1994 ax-7 2035 ax-8 2151 ax-9 2159 ax-10 2182 ax-11 2198 ax-12 2219 ax-ext 2741 ax-rep 5239 ax-sep 5258 ax-nul 5268 ax-pow 5334 ax-pr 5402 ax-un 7730 ax-inf2 9606 ax-cnex 11152 ax-resscn 11153 ax-1cn 11154 ax-icn 11155 ax-addcl 11156 ax-addrcl 11157 ax-mulcl 11158 ax-mulrcl 11159 ax-mulcom 11160 ax-addass 11161 ax-mulass 11162 ax-distr 11163 ax-i2m1 11164 ax-1ne0 11165 ax-1rid 11166 ax-rnegex 11167 ax-rrecex 11168 ax-cnre 11169 ax-pre-lttri 11170 ax-pre-lttrn 11171 ax-pre-ltadd 11172 ax-pre-mulgt0 11173 ax-pre-sup 11174 ax-addf 11175

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1570 df-fal 1580 df-ex 1807 df-nf 1811 df-sb 2098 df-mo 2573 df-eu 2603 df-clab 2748 df-cleq 2761 df-clel 2844 df-nfc 2918 df-ne 2965 df-nel 3071 df-ral 3086 df-rex 3096 df-rmo 3376 df-reu 3377 df-rab 3424 df-v 3465 df-sbc 3754 df-csb 3862 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3933 df-nul 4295 df-if 4490 df-pw 4566 df-sn 4592 df-pr 4594 df-tp 4596 df-op 4598 df-uni 4874 df-int 4914 df-iun 4959 df-iin 4960 df-br 5111 df-opab 5175 df-mpt 5194 df-tr 5220 df-id 5554 df-eprel 5559 df-po 5567 df-so 5568 df-fr 5612 df-se 5613 df-we 5614 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 df-pred 6300 df-ord 6361 df-on 6362 df-lim 6363 df-suc 6364 df-iota 6490 df-fun 6536 df-fn 6537 df-f 6538 df-f1 6539 df-fo 6540 df-f1o 6541 df-fv 6542 df-isom 6543 df-riota 7365 df-ov 7411 df-oprab 7412 df-mpo 7413 df-of 7672 df-om 7859 df-1st 7982 df-2nd 7983 df-supp 8153 df-frecs 8274 df-wrecs 8305 df-recs 8354 df-rdg 8393 df-1o 8449 df-2o 8450 df-er 8690 df-map 8822 df-pm 8823 df-ixp 8892 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-fsupp 9318 df-fi 9367 df-sup 9398 df-inf 9399 df-oi 9468 df-card 9921 df-pnf 11241 df-mnf 11242 df-xr 11243 df-ltxr 11244 df-le 11245 df-sub 11439 df-neg 11440 df-div 11868 df-nn 12230 df-2 12299 df-3 12300 df-4 12301 df-5 12302 df-6 12303 df-7 12304 df-8 12305 df-9 12306 df-n0 12501 df-z 12588 df-dec 12708 df-uz 12859 df-q 12969 df-rp 13013 df-xneg 13133 df-xadd 13134 df-xmul 13135 df-ioo 13372 df-ioc 13373 df-ico 13374 df-icc 13375 df-fz 13532 df-fzo 13679 df-fl 13821 df-mod 13899 df-seq 14034 df-exp 14094 df-fac 14306 df-bc 14335 df-hash 14363 df-shft 15100 df-cj 15146 df-re 15147 df-im 15148 df-sqrt 15282 df-abs 15283 df-limsup 15518 df-clim 15535 df-rlim 15536 df-sum 15734 df-ef 16117 df-sin 16119 df-cos 16120 df-pi 16122 df-struct 17203 df-sets 17220 df-slot 17238 df-ndx 17250 df-base 17266 df-ress 17287 df-plusg 17319 df-mulr 17320 df-starv 17321 df-sca 17322 df-vsca 17323 df-ip 17324 df-tset 17325 df-ple 17326 df-ds 17328 df-unif 17329 df-hom 17330 df-cco 17331 df-rest 17471 df-topn 17472 df-0g 17490 df-gsum 17491 df-topgen 17492 df-pt 17493 df-prds 17496 df-xrs 17552 df-qtop 17557 df-imas 17558 df-xps 17560 df-mre 17634 df-mrc 17635 df-acs 17637 df-mgm 18694 df-sgrp 18773 df-mnd 18789 df-submnd 18838 df-mulg 19130 df-cntz 19383 df-cmn 19848 df-psmet 21479 df-xmet 21480 df-met 21481 df-bl 21482 df-mopn 21483 df-fbas 21484 df-fg 21485 df-cnfld 21488 df-top 23016 df-topon 23033 df-topsp 23055 df-bases 23068 df-cld 23141 df-ntr 23142 df-cls 23143 df-nei 23220 df-lp 23258 df-perf 23259 df-cn 23349 df-cnp 23350 df-haus 23437 df-tx 23684 df-hmeo 23877 df-fil 23968 df-fm 24060 df-flim 24061 df-flf 24062 df-xms 24442 df-ms 24443 df-tms 24444 df-cncf 25002 df-0p 25794 df-limc 25990 df-dv 25991 df-ply 26310 df-coe 26312 df-dgr 26313 df-log 26683 df-cxp 26684

This theorem is referenced by: ftalem5 27203

W3C validator