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

Theorem ftalem4 27057
Description: Lemma for fta 27061: Closure of the auxiliary variables for ftalem5 27058. (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
StepHypRef Expression
1 ftalem4.6 . . . 4 𝐾 = inf({𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0}, ℝ, < )
2 ssrab2 4011 . . . . . 6 {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0} ⊆ ℕ
3 nnuz 12818 . . . . . 6 ℕ = (ℤ‘1)
42, 3sseqtri 3963 . . . . 5 {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0} ⊆ (ℤ‘1)
5 fveq2 6827 . . . . . . . 8 (𝑛 = 𝑁 → (𝐴𝑛) = (𝐴𝑁))
65neeq1d 2993 . . . . . . 7 (𝑛 = 𝑁 → ((𝐴𝑛) ≠ 0 ↔ (𝐴𝑁) ≠ 0))
7 ftalem.4 . . . . . . 7 (𝜑𝑁 ∈ ℕ)
87nnne0d 12218 . . . . . . . 8 (𝜑𝑁 ≠ 0)
9 ftalem.3 . . . . . . . . . . 11 (𝜑𝐹 ∈ (Poly‘𝑆))
10 ftalem.2 . . . . . . . . . . . 12 𝑁 = (deg‘𝐹)
11 ftalem.1 . . . . . . . . . . . 12 𝐴 = (coeff‘𝐹)
1210, 11dgreq0 26248 . . . . . . . . . . 11 (𝐹 ∈ (Poly‘𝑆) → (𝐹 = 0𝑝 ↔ (𝐴𝑁) = 0))
139, 12syl 17 . . . . . . . . . 10 (𝜑 → (𝐹 = 0𝑝 ↔ (𝐴𝑁) = 0))
14 fveq2 6827 . . . . . . . . . . . 12 (𝐹 = 0𝑝 → (deg‘𝐹) = (deg‘0𝑝))
15 dgr0 26245 . . . . . . . . . . . 12 (deg‘0𝑝) = 0
1614, 15eqtrdi 2790 . . . . . . . . . . 11 (𝐹 = 0𝑝 → (deg‘𝐹) = 0)
1710, 16eqtrid 2786 . . . . . . . . . 10 (𝐹 = 0𝑝𝑁 = 0)
1813, 17biimtrrdi 255 . . . . . . . . 9 (𝜑 → ((𝐴𝑁) = 0 → 𝑁 = 0))
1918necon3d 2955 . . . . . . . 8 (𝜑 → (𝑁 ≠ 0 → (𝐴𝑁) ≠ 0))
208, 19mpd 15 . . . . . . 7 (𝜑 → (𝐴𝑁) ≠ 0)
216, 7, 20elrabd 3631 . . . . . 6 (𝜑𝑁 ∈ {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0})
2221ne0d 4270 . . . . 5 (𝜑 → {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0} ≠ ∅)
23 infssuzcl 12873 . . . . 5 (({𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0} ⊆ (ℤ‘1) ∧ {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0} ≠ ∅) → inf({𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0})
244, 22, 23sylancr 593 . . . 4 (𝜑 → inf({𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0}, ℝ, < ) ∈ {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0})
251, 24eqeltrid 2843 . . 3 (𝜑𝐾 ∈ {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0})
26 fveq2 6827 . . . . 5 (𝑛 = 𝐾 → (𝐴𝑛) = (𝐴𝐾))
2726neeq1d 2993 . . . 4 (𝑛 = 𝐾 → ((𝐴𝑛) ≠ 0 ↔ (𝐴𝐾) ≠ 0))
2827elrab 3629 . . 3 (𝐾 ∈ {𝑛 ∈ ℕ ∣ (𝐴𝑛) ≠ 0} ↔ (𝐾 ∈ ℕ ∧ (𝐴𝐾) ≠ 0))
2925, 28sylib 219 . 2 (𝜑 → (𝐾 ∈ ℕ ∧ (𝐴𝐾) ≠ 0))
30 ftalem4.7 . . . 4 𝑇 = (-((𝐹‘0) / (𝐴𝐾))↑𝑐(1 / 𝐾))
31 plyf 26181 . . . . . . . . 9 (𝐹 ∈ (Poly‘𝑆) → 𝐹:ℂ⟶ℂ)
329, 31syl 17 . . . . . . . 8 (𝜑𝐹:ℂ⟶ℂ)
33 0cn 11127 . . . . . . . 8 0 ∈ ℂ
34 ffvelcdm 7022 . . . . . . . 8 ((𝐹:ℂ⟶ℂ ∧ 0 ∈ ℂ) → (𝐹‘0) ∈ ℂ)
3532, 33, 34sylancl 592 . . . . . . 7 (𝜑 → (𝐹‘0) ∈ ℂ)
3611coef3 26215 . . . . . . . . 9 (𝐹 ∈ (Poly‘𝑆) → 𝐴:ℕ0⟶ℂ)
379, 36syl 17 . . . . . . . 8 (𝜑𝐴:ℕ0⟶ℂ)
3829simpld 495 . . . . . . . . 9 (𝜑𝐾 ∈ ℕ)
3938nnnn0d 12489 . . . . . . . 8 (𝜑𝐾 ∈ ℕ0)
4037, 39ffvelcdmd 7026 . . . . . . 7 (𝜑 → (𝐴𝐾) ∈ ℂ)
4129simprd 496 . . . . . . 7 (𝜑 → (𝐴𝐾) ≠ 0)
4235, 40, 41divcld 11922 . . . . . 6 (𝜑 → ((𝐹‘0) / (𝐴𝐾)) ∈ ℂ)
4342negcld 11483 . . . . 5 (𝜑 → -((𝐹‘0) / (𝐴𝐾)) ∈ ℂ)
4438nnrecred 12219 . . . . . 6 (𝜑 → (1 / 𝐾) ∈ ℝ)
4544recnd 11164 . . . . 5 (𝜑 → (1 / 𝐾) ∈ ℂ)
4643, 45cxpcld 26690 . . . 4 (𝜑 → (-((𝐹‘0) / (𝐴𝐾))↑𝑐(1 / 𝐾)) ∈ ℂ)
4730, 46eqeltrid 2843 . . 3 (𝜑𝑇 ∈ ℂ)
48 ftalem4.8 . . . 4 𝑈 = ((abs‘(𝐹‘0)) / (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴𝑘) · (𝑇𝑘))) + 1))
49 ftalem4.5 . . . . . 6 (𝜑 → (𝐹‘0) ≠ 0)
5035, 49absrpcld 15404 . . . . 5 (𝜑 → (abs‘(𝐹‘0)) ∈ ℝ+)
51 fzfid 13926 . . . . . . 7 (𝜑 → ((𝐾 + 1)...𝑁) ∈ Fin)
52 peano2nn0 12468 . . . . . . . . . . . 12 (𝐾 ∈ ℕ0 → (𝐾 + 1) ∈ ℕ0)
5339, 52syl 17 . . . . . . . . . . 11 (𝜑 → (𝐾 + 1) ∈ ℕ0)
54 elfzuz 13465 . . . . . . . . . . 11 (𝑘 ∈ ((𝐾 + 1)...𝑁) → 𝑘 ∈ (ℤ‘(𝐾 + 1)))
55 eluznn0 12858 . . . . . . . . . . 11 (((𝐾 + 1) ∈ ℕ0𝑘 ∈ (ℤ‘(𝐾 + 1))) → 𝑘 ∈ ℕ0)
5653, 54, 55syl2an 602 . . . . . . . . . 10 ((𝜑𝑘 ∈ ((𝐾 + 1)...𝑁)) → 𝑘 ∈ ℕ0)
5737ffvelcdmda 7025 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → (𝐴𝑘) ∈ ℂ)
5856, 57syldan 597 . . . . . . . . 9 ((𝜑𝑘 ∈ ((𝐾 + 1)...𝑁)) → (𝐴𝑘) ∈ ℂ)
59 expcl 14032 . . . . . . . . . 10 ((𝑇 ∈ ℂ ∧ 𝑘 ∈ ℕ0) → (𝑇𝑘) ∈ ℂ)
6047, 56, 59syl2an2r 691 . . . . . . . . 9 ((𝜑𝑘 ∈ ((𝐾 + 1)...𝑁)) → (𝑇𝑘) ∈ ℂ)
6158, 60mulcld 11156 . . . . . . . 8 ((𝜑𝑘 ∈ ((𝐾 + 1)...𝑁)) → ((𝐴𝑘) · (𝑇𝑘)) ∈ ℂ)
6261abscld 15392 . . . . . . 7 ((𝜑𝑘 ∈ ((𝐾 + 1)...𝑁)) → (abs‘((𝐴𝑘) · (𝑇𝑘))) ∈ ℝ)
6351, 62fsumrecl 15687 . . . . . 6 (𝜑 → Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴𝑘) · (𝑇𝑘))) ∈ ℝ)
6461absge0d 15400 . . . . . . 7 ((𝜑𝑘 ∈ ((𝐾 + 1)...𝑁)) → 0 ≤ (abs‘((𝐴𝑘) · (𝑇𝑘))))
6551, 62, 64fsumge0 15749 . . . . . 6 (𝜑 → 0 ≤ Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴𝑘) · (𝑇𝑘))))
6663, 65ge0p1rpd 13007 . . . . 5 (𝜑 → (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴𝑘) · (𝑇𝑘))) + 1) ∈ ℝ+)
6750, 66rpdivcld 12994 . . . 4 (𝜑 → ((abs‘(𝐹‘0)) / (Σ𝑘 ∈ ((𝐾 + 1)...𝑁)(abs‘((𝐴𝑘) · (𝑇𝑘))) + 1)) ∈ ℝ+)
6848, 67eqeltrid 2843 . . 3 (𝜑𝑈 ∈ ℝ+)
69 ftalem4.9 . . . 4 𝑋 = if(1 ≤ 𝑈, 1, 𝑈)
70 1rp 12937 . . . . 5 1 ∈ ℝ+
71 ifcl 4500 . . . . 5 ((1 ∈ ℝ+𝑈 ∈ ℝ+) → if(1 ≤ 𝑈, 1, 𝑈) ∈ ℝ+)
7270, 68, 71sylancr 593 . . . 4 (𝜑 → if(1 ≤ 𝑈, 1, 𝑈) ∈ ℝ+)
7369, 72eqeltrid 2843 . . 3 (𝜑𝑋 ∈ ℝ+)
7447, 68, 733jca 1134 . 2 (𝜑 → (𝑇 ∈ ℂ ∧ 𝑈 ∈ ℝ+𝑋 ∈ ℝ+))
7529, 74jca 516 1 (𝜑 → ((𝐾 ∈ ℕ ∧ (𝐴𝐾) ≠ 0) ∧ (𝑇 ∈ ℂ ∧ 𝑈 ∈ ℝ+𝑋 ∈ ℝ+)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1092   = wceq 1547  wcel 2119  wne 2934  {crab 3391  wss 3883  c0 4261  ifcif 4454   class class class wbr 5072  wf 6481  cfv 6485  (class class class)co 7356  infcinf 9344  cc 11027  cr 11028  0cc0 11029  1c1 11030   + caddc 11032   · cmul 11034   < clt 11170  cle 11171  -cneg 11369   / cdiv 11798  cn 12165  0cn0 12428  cuz 12779  +crp 12933  ...cfz 13452  cexp 14014  abscabs 15187  Σcsu 15639  0𝑝c0p 25654  Polycply 26167  coeffccoe 26169  degcdgr 26170  𝑐ccxp 26537
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5199  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-inf2 9553  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107  ax-addf 11108
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-tp 4560  df-op 4562  df-uni 4839  df-int 4878  df-iun 4923  df-iin 4924  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-se 5572  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-isom 6494  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-of 7620  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8101  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-er 8633  df-map 8765  df-pm 8766  df-ixp 8836  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-fsupp 9265  df-fi 9314  df-sup 9345  df-inf 9346  df-oi 9415  df-card 9854  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-3 12236  df-4 12237  df-5 12238  df-6 12239  df-7 12240  df-8 12241  df-9 12242  df-n0 12429  df-z 12516  df-dec 12636  df-uz 12780  df-q 12890  df-rp 12934  df-xneg 13054  df-xadd 13055  df-xmul 13056  df-ioo 13293  df-ioc 13294  df-ico 13295  df-icc 13296  df-fz 13453  df-fzo 13600  df-fl 13742  df-mod 13820  df-seq 13955  df-exp 14015  df-fac 14227  df-bc 14256  df-hash 14284  df-shft 15020  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189  df-limsup 15424  df-clim 15441  df-rlim 15442  df-sum 15640  df-ef 16023  df-sin 16025  df-cos 16026  df-pi 16028  df-struct 17108  df-sets 17125  df-slot 17143  df-ndx 17155  df-base 17171  df-ress 17192  df-plusg 17224  df-mulr 17225  df-starv 17226  df-sca 17227  df-vsca 17228  df-ip 17229  df-tset 17230  df-ple 17231  df-ds 17233  df-unif 17234  df-hom 17235  df-cco 17236  df-rest 17376  df-topn 17377  df-0g 17395  df-gsum 17396  df-topgen 17397  df-pt 17398  df-prds 17401  df-xrs 17457  df-qtop 17462  df-imas 17463  df-xps 17465  df-mre 17539  df-mrc 17540  df-acs 17542  df-mgm 18599  df-sgrp 18678  df-mnd 18694  df-submnd 18743  df-mulg 19035  df-cntz 19283  df-cmn 19748  df-psmet 21339  df-xmet 21340  df-met 21341  df-bl 21342  df-mopn 21343  df-fbas 21344  df-fg 21345  df-cnfld 21348  df-top 22877  df-topon 22894  df-topsp 22916  df-bases 22929  df-cld 23002  df-ntr 23003  df-cls 23004  df-nei 23081  df-lp 23119  df-perf 23120  df-cn 23210  df-cnp 23211  df-haus 23298  df-tx 23545  df-hmeo 23738  df-fil 23829  df-fm 23921  df-flim 23922  df-flf 23923  df-xms 24303  df-ms 24304  df-tms 24305  df-cncf 24863  df-0p 25655  df-limc 25851  df-dv 25852  df-ply 26171  df-coe 26173  df-dgr 26174  df-log 26538  df-cxp 26539
This theorem is referenced by:  ftalem5  27058
  Copyright terms: Public domain W3C validator