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 26993

Description: Lemma for fta 26997: Closure of the auxiliary variables for ftalem5 26994. (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 4046	. . . . . 6 ⊢ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ⊆ ℕ
3		nnuz 12843	. . . . . 6 ⊢ ℕ = (ℤ_≥‘1)
4	2, 3	sseqtri 3998	. . . . 5 ⊢ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ⊆ (ℤ_≥‘1)
5		fveq2 6861	. . . . . . . 8 ⊢ (𝑛 = 𝑁 → (𝐴‘𝑛) = (𝐴‘𝑁))
6	5	neeq1d 2985	. . . . . . 7 ⊢ (𝑛 = 𝑁 → ((𝐴‘𝑛) ≠ 0 ↔ (𝐴‘𝑁) ≠ 0))
7		ftalem.4	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℕ)
8	7	nnne0d 12243	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ≠ 0)
9		ftalem.3	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
10		ftalem.2	. . . . . . . . . . . 12 ⊢ 𝑁 = (deg‘𝐹)
11		ftalem.1	. . . . . . . . . . . 12 ⊢ 𝐴 = (coeff‘𝐹)
12	10, 11	dgreq0 26178	. . . . . . . . . . 11 ⊢ (𝐹 ∈ (Poly‘𝑆) → (𝐹 = 0_𝑝 ↔ (𝐴‘𝑁) = 0))
13	9, 12	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 = 0_𝑝 ↔ (𝐴‘𝑁) = 0))
14		fveq2 6861	. . . . . . . . . . . 12 ⊢ (𝐹 = 0_𝑝 → (deg‘𝐹) = (deg‘0_𝑝))
15		dgr0 26175	. . . . . . . . . . . 12 ⊢ (deg‘0_𝑝) = 0
16	14, 15	eqtrdi 2781	. . . . . . . . . . 11 ⊢ (𝐹 = 0_𝑝 → (deg‘𝐹) = 0)
17	10, 16	eqtrid 2777	. . . . . . . . . 10 ⊢ (𝐹 = 0_𝑝 → 𝑁 = 0)
18	13, 17	biimtrrdi 254	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴‘𝑁) = 0 → 𝑁 = 0))
19	18	necon3d 2947	. . . . . . . 8 ⊢ (𝜑 → (𝑁 ≠ 0 → (𝐴‘𝑁) ≠ 0))
20	8, 19	mpd 15	. . . . . . 7 ⊢ (𝜑 → (𝐴‘𝑁) ≠ 0)
21	6, 7, 20	elrabd 3664	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
22	21	ne0d 4308	. . . . 5 ⊢ (𝜑 → {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ≠ ∅)
23		infssuzcl 12898	. . . . 5 ⊢ (({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ⊆ (ℤ_≥‘1) ∧ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ≠ ∅) → inf({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
24	4, 22, 23	sylancr 587	. . . 4 ⊢ (𝜑 → inf({𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
25	1, 24	eqeltrid 2833	. . 3 ⊢ (𝜑 → 𝐾 ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0})
26		fveq2 6861	. . . . 5 ⊢ (𝑛 = 𝐾 → (𝐴‘𝑛) = (𝐴‘𝐾))
27	26	neeq1d 2985	. . . 4 ⊢ (𝑛 = 𝐾 → ((𝐴‘𝑛) ≠ 0 ↔ (𝐴‘𝐾) ≠ 0))
28	27	elrab 3662	. . 3 ⊢ (𝐾 ∈ {𝑛 ∈ ℕ ∣ (𝐴‘𝑛) ≠ 0} ↔ (𝐾 ∈ ℕ ∧ (𝐴‘𝐾) ≠ 0))
29	25, 28	sylib 218	. 2 ⊢ (𝜑 → (𝐾 ∈ ℕ ∧ (𝐴‘𝐾) ≠ 0))
30		ftalem4.7	. . . 4 ⊢ 𝑇 = (-((𝐹‘0) / (𝐴‘𝐾))↑_𝑐(1 / 𝐾))
31		plyf 26110	. . . . . . . . 9 ⊢ (𝐹 ∈ (Poly‘𝑆) → 𝐹:ℂ⟶ℂ)
32	9, 31	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐹:ℂ⟶ℂ)
33		0cn 11173	. . . . . . . 8 ⊢ 0 ∈ ℂ
34		ffvelcdm 7056	. . . . . . . 8 ⊢ ((𝐹:ℂ⟶ℂ ∧ 0 ∈ ℂ) → (𝐹‘0) ∈ ℂ)
35	32, 33, 34	sylancl 586	. . . . . . 7 ⊢ (𝜑 → (𝐹‘0) ∈ ℂ)
36	11	coef3 26144	. . . . . . . . 9 ⊢ (𝐹 ∈ (Poly‘𝑆) → 𝐴:ℕ₀⟶ℂ)
37	9, 36	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐴:ℕ₀⟶ℂ)
38	29	simpld 494	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ ℕ)
39	38	nnnn0d 12510	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ∈ ℕ₀)
40	37, 39	ffvelcdmd 7060	. . . . . . 7 ⊢ (𝜑 → (𝐴‘𝐾) ∈ ℂ)
41	29	simprd 495	. . . . . . 7 ⊢ (𝜑 → (𝐴‘𝐾) ≠ 0)
42	35, 40, 41	divcld 11965	. . . . . 6 ⊢ (𝜑 → ((𝐹‘0) / (𝐴‘𝐾)) ∈ ℂ)
43	42	negcld 11527	. . . . 5 ⊢ (𝜑 → -((𝐹‘0) / (𝐴‘𝐾)) ∈ ℂ)
44	38	nnrecred 12244	. . . . . 6 ⊢ (𝜑 → (1 / 𝐾) ∈ ℝ)
45	44	recnd 11209	. . . . 5 ⊢ (𝜑 → (1 / 𝐾) ∈ ℂ)
46	43, 45	cxpcld 26624	. . . 4 ⊢ (𝜑 → (-((𝐹‘0) / (𝐴‘𝐾))↑_𝑐(1 / 𝐾)) ∈ ℂ)
47	30, 46	eqeltrid 2833	. . 3 ⊢ (𝜑 → 𝑇 ∈ ℂ)
48		ftalem4.8	. . . 4 ⊢ 𝑈 = ((abs‘(𝐹‘0)) / (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) + 1))
49		ftalem4.5	. . . . . 6 ⊢ (𝜑 → (𝐹‘0) ≠ 0)
50	35, 49	absrpcld 15424	. . . . 5 ⊢ (𝜑 → (abs‘(𝐹‘0)) ∈ ℝ⁺)
51		fzfid 13945	. . . . . . 7 ⊢ (𝜑 → ((𝐾 + 1)...𝑁) ∈ Fin)
52		peano2nn0 12489	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ ℕ₀ → (𝐾 + 1) ∈ ℕ₀)
53	39, 52	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐾 + 1) ∈ ℕ₀)
54		elfzuz 13488	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ((𝐾 + 1)...𝑁) → 𝑘 ∈ (ℤ_≥‘(𝐾 + 1)))
55		eluznn0 12883	. . . . . . . . . . 11 ⊢ (((𝐾 + 1) ∈ ℕ₀ ∧ 𝑘 ∈ (ℤ_≥‘(𝐾 + 1))) → 𝑘 ∈ ℕ₀)
56	53, 54, 55	syl2an 596	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → 𝑘 ∈ ℕ₀)
57	37	ffvelcdmda 7059	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ₀) → (𝐴‘𝑘) ∈ ℂ)
58	56, 57	syldan 591	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → (𝐴‘𝑘) ∈ ℂ)
59		expcl 14051	. . . . . . . . . 10 ⊢ ((𝑇 ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (𝑇↑𝑘) ∈ ℂ)
60	47, 56, 59	syl2an2r 685	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → (𝑇↑𝑘) ∈ ℂ)
61	58, 60	mulcld 11201	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → ((𝐴‘𝑘) · (𝑇↑𝑘)) ∈ ℂ)
62	61	abscld 15412	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → (abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) ∈ ℝ)
63	51, 62	fsumrecl 15707	. . . . . 6 ⊢ (𝜑 → Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) ∈ ℝ)
64	61	absge0d 15420	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → 0 ≤ (abs‘((𝐴‘𝑘) · (𝑇↑𝑘))))
65	51, 62, 64	fsumge0 15768	. . . . . 6 ⊢ (𝜑 → 0 ≤ Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))))
66	63, 65	ge0p1rpd 13032	. . . . 5 ⊢ (𝜑 → (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) + 1) ∈ ℝ⁺)
67	50, 66	rpdivcld 13019	. . . 4 ⊢ (𝜑 → ((abs‘(𝐹‘0)) / (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴‘𝑘) · (𝑇↑𝑘))) + 1)) ∈ ℝ⁺)
68	48, 67	eqeltrid 2833	. . 3 ⊢ (𝜑 → 𝑈 ∈ ℝ⁺)
69		ftalem4.9	. . . 4 ⊢ 𝑋 = if(1 ≤ 𝑈, 1, 𝑈)
70		1rp 12962	. . . . 5 ⊢ 1 ∈ ℝ⁺
71		ifcl 4537	. . . . 5 ⊢ ((1 ∈ ℝ⁺ ∧ 𝑈 ∈ ℝ⁺) → if(1 ≤ 𝑈, 1, 𝑈) ∈ ℝ⁺)
72	70, 68, 71	sylancr 587	. . . 4 ⊢ (𝜑 → if(1 ≤ 𝑈, 1, 𝑈) ∈ ℝ⁺)
73	69, 72	eqeltrid 2833	. . 3 ⊢ (𝜑 → 𝑋 ∈ ℝ⁺)
74	47, 68, 73	3jca 1128	. 2 ⊢ (𝜑 → (𝑇 ∈ ℂ ∧ 𝑈 ∈ ℝ⁺ ∧ 𝑋 ∈ ℝ⁺))
75	29, 74	jca 511	1 ⊢ (𝜑 → ((𝐾 ∈ ℕ ∧ (𝐴‘𝐾) ≠ 0) ∧ (𝑇 ∈ ℂ ∧ 𝑈 ∈ ℝ⁺ ∧ 𝑋 ∈ ℝ⁺)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ≠ wne 2926 {crab 3408 ⊆ wss 3917 ∅c0 4299 ifcif 4491 class class class wbr 5110 ⟶wf 6510 ‘cfv 6514 (class class class)co 7390 infcinf 9399 ℂcc 11073 ℝcr 11074 0cc0 11075 1c1 11076 + caddc 11078 · cmul 11080 < clt 11215 ≤ cle 11216 -cneg 11413 / cdiv 11842 ℕcn 12193 ℕ₀cn0 12449 ℤ_≥cuz 12800 ℝ⁺crp 12958 ...cfz 13475 ↑cexp 14033 abscabs 15207 Σcsu 15659 0_𝑝c0p 25577 Polycply 26096 coeffccoe 26098 degcdgr 26099 ↑_𝑐ccxp 26471

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 2702 ax-rep 5237 ax-sep 5254 ax-nul 5264 ax-pow 5323 ax-pr 5390 ax-un 7714 ax-inf2 9601 ax-cnex 11131 ax-resscn 11132 ax-1cn 11133 ax-icn 11134 ax-addcl 11135 ax-addrcl 11136 ax-mulcl 11137 ax-mulrcl 11138 ax-mulcom 11139 ax-addass 11140 ax-mulass 11141 ax-distr 11142 ax-i2m1 11143 ax-1ne0 11144 ax-1rid 11145 ax-rnegex 11146 ax-rrecex 11147 ax-cnre 11148 ax-pre-lttri 11149 ax-pre-lttrn 11150 ax-pre-ltadd 11151 ax-pre-mulgt0 11152 ax-pre-sup 11153 ax-addf 11154

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 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3356 df-reu 3357 df-rab 3409 df-v 3452 df-sbc 3757 df-csb 3866 df-dif 3920 df-un 3922 df-in 3924 df-ss 3934 df-pss 3937 df-nul 4300 df-if 4492 df-pw 4568 df-sn 4593 df-pr 4595 df-tp 4597 df-op 4599 df-uni 4875 df-int 4914 df-iun 4960 df-iin 4961 df-br 5111 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5536 df-eprel 5541 df-po 5549 df-so 5550 df-fr 5594 df-se 5595 df-we 5596 df-xp 5647 df-rel 5648 df-cnv 5649 df-co 5650 df-dm 5651 df-rn 5652 df-res 5653 df-ima 5654 df-pred 6277 df-ord 6338 df-on 6339 df-lim 6340 df-suc 6341 df-iota 6467 df-fun 6516 df-fn 6517 df-f 6518 df-f1 6519 df-fo 6520 df-f1o 6521 df-fv 6522 df-isom 6523 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-of 7656 df-om 7846 df-1st 7971 df-2nd 7972 df-supp 8143 df-frecs 8263 df-wrecs 8294 df-recs 8343 df-rdg 8381 df-1o 8437 df-2o 8438 df-er 8674 df-map 8804 df-pm 8805 df-ixp 8874 df-en 8922 df-dom 8923 df-sdom 8924 df-fin 8925 df-fsupp 9320 df-fi 9369 df-sup 9400 df-inf 9401 df-oi 9470 df-card 9899 df-pnf 11217 df-mnf 11218 df-xr 11219 df-ltxr 11220 df-le 11221 df-sub 11414 df-neg 11415 df-div 11843 df-nn 12194 df-2 12256 df-3 12257 df-4 12258 df-5 12259 df-6 12260 df-7 12261 df-8 12262 df-9 12263 df-n0 12450 df-z 12537 df-dec 12657 df-uz 12801 df-q 12915 df-rp 12959 df-xneg 13079 df-xadd 13080 df-xmul 13081 df-ioo 13317 df-ioc 13318 df-ico 13319 df-icc 13320 df-fz 13476 df-fzo 13623 df-fl 13761 df-mod 13839 df-seq 13974 df-exp 14034 df-fac 14246 df-bc 14275 df-hash 14303 df-shft 15040 df-cj 15072 df-re 15073 df-im 15074 df-sqrt 15208 df-abs 15209 df-limsup 15444 df-clim 15461 df-rlim 15462 df-sum 15660 df-ef 16040 df-sin 16042 df-cos 16043 df-pi 16045 df-struct 17124 df-sets 17141 df-slot 17159 df-ndx 17171 df-base 17187 df-ress 17208 df-plusg 17240 df-mulr 17241 df-starv 17242 df-sca 17243 df-vsca 17244 df-ip 17245 df-tset 17246 df-ple 17247 df-ds 17249 df-unif 17250 df-hom 17251 df-cco 17252 df-rest 17392 df-topn 17393 df-0g 17411 df-gsum 17412 df-topgen 17413 df-pt 17414 df-prds 17417 df-xrs 17472 df-qtop 17477 df-imas 17478 df-xps 17480 df-mre 17554 df-mrc 17555 df-acs 17557 df-mgm 18574 df-sgrp 18653 df-mnd 18669 df-submnd 18718 df-mulg 19007 df-cntz 19256 df-cmn 19719 df-psmet 21263 df-xmet 21264 df-met 21265 df-bl 21266 df-mopn 21267 df-fbas 21268 df-fg 21269 df-cnfld 21272 df-top 22788 df-topon 22805 df-topsp 22827 df-bases 22840 df-cld 22913 df-ntr 22914 df-cls 22915 df-nei 22992 df-lp 23030 df-perf 23031 df-cn 23121 df-cnp 23122 df-haus 23209 df-tx 23456 df-hmeo 23649 df-fil 23740 df-fm 23832 df-flim 23833 df-flf 23834 df-xms 24215 df-ms 24216 df-tms 24217 df-cncf 24778 df-0p 25578 df-limc 25774 df-dv 25775 df-ply 26100 df-coe 26102 df-dgr 26103 df-log 26472 df-cxp 26473

This theorem is referenced by: ftalem5 26994

W3C validator