MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  fsumcvg3 Unicode version

Theorem fsumcvg3 12451
Description: A finite sum is convergent. (Contributed by Mario Carneiro, 24-Apr-2014.)
Hypotheses
Ref Expression
fsumcvg3.1  |-  Z  =  ( ZZ>= `  M )
fsumcvg3.2  |-  ( ph  ->  M  e.  ZZ )
fsumcvg3.3  |-  ( ph  ->  A  e.  Fin )
fsumcvg3.4  |-  ( ph  ->  A  C_  Z )
fsumcvg3.5  |-  ( (
ph  /\  k  e.  Z )  ->  ( F `  k )  =  if ( k  e.  A ,  B , 
0 ) )
fsumcvg3.6  |-  ( (
ph  /\  k  e.  A )  ->  B  e.  CC )
Assertion
Ref Expression
fsumcvg3  |-  ( ph  ->  seq  M (  +  ,  F )  e. 
dom 
~~>  )
Distinct variable groups:    A, k    k, F    k, M    ph, k
Allowed substitution hints:    B( k)    Z( k)

Proof of Theorem fsumcvg3
Dummy variable  n is distinct from all other variables.
StepHypRef Expression
1 sseq1 3313 . . . 4  |-  ( A  =  (/)  ->  ( A 
C_  ( M ... n )  <->  (/)  C_  ( M ... n ) ) )
21rexbidv 2671 . . 3  |-  ( A  =  (/)  ->  ( E. n  e.  ( ZZ>= `  M ) A  C_  ( M ... n )  <->  E. n  e.  ( ZZ>=
`  M ) (/)  C_  ( M ... n
) ) )
3 fsumcvg3.4 . . . . . . 7  |-  ( ph  ->  A  C_  Z )
43adantr 452 . . . . . 6  |-  ( (
ph  /\  A  =/=  (/) )  ->  A  C_  Z
)
5 fsumcvg3.1 . . . . . 6  |-  Z  =  ( ZZ>= `  M )
64, 5syl6sseq 3338 . . . . 5  |-  ( (
ph  /\  A  =/=  (/) )  ->  A  C_  ( ZZ>=
`  M ) )
7 ltso 9090 . . . . . 6  |-  <  Or  RR
8 fsumcvg3.3 . . . . . . . 8  |-  ( ph  ->  A  e.  Fin )
98adantr 452 . . . . . . 7  |-  ( (
ph  /\  A  =/=  (/) )  ->  A  e.  Fin )
10 simpr 448 . . . . . . 7  |-  ( (
ph  /\  A  =/=  (/) )  ->  A  =/=  (/) )
11 uzssz 10438 . . . . . . . . . 10  |-  ( ZZ>= `  M )  C_  ZZ
12 zssre 10222 . . . . . . . . . 10  |-  ZZ  C_  RR
1311, 12sstri 3301 . . . . . . . . 9  |-  ( ZZ>= `  M )  C_  RR
145, 13eqsstri 3322 . . . . . . . 8  |-  Z  C_  RR
154, 14syl6ss 3304 . . . . . . 7  |-  ( (
ph  /\  A  =/=  (/) )  ->  A  C_  RR )
169, 10, 153jca 1134 . . . . . 6  |-  ( (
ph  /\  A  =/=  (/) )  ->  ( A  e.  Fin  /\  A  =/=  (/)  /\  A  C_  RR ) )
17 fisupcl 7406 . . . . . 6  |-  ( (  <  Or  RR  /\  ( A  e.  Fin  /\  A  =/=  (/)  /\  A  C_  RR ) )  ->  sup ( A ,  RR ,  <  )  e.  A
)
187, 16, 17sylancr 645 . . . . 5  |-  ( (
ph  /\  A  =/=  (/) )  ->  sup ( A ,  RR ,  <  )  e.  A )
196, 18sseldd 3293 . . . 4  |-  ( (
ph  /\  A  =/=  (/) )  ->  sup ( A ,  RR ,  <  )  e.  ( ZZ>= `  M ) )
20 fimaxre2 9889 . . . . . . . . . 10  |-  ( ( A  C_  RR  /\  A  e.  Fin )  ->  E. k  e.  RR  A. n  e.  A  n  <_  k
)
2115, 9, 20syl2anc 643 . . . . . . . . 9  |-  ( (
ph  /\  A  =/=  (/) )  ->  E. k  e.  RR  A. n  e.  A  n  <_  k
)
2215, 10, 213jca 1134 . . . . . . . 8  |-  ( (
ph  /\  A  =/=  (/) )  ->  ( A  C_  RR  /\  A  =/=  (/)  /\  E. k  e.  RR  A. n  e.  A  n  <_  k
) )
23 suprub 9902 . . . . . . . 8  |-  ( ( ( A  C_  RR  /\  A  =/=  (/)  /\  E. k  e.  RR  A. n  e.  A  n  <_  k )  /\  k  e.  A )  ->  k  <_  sup ( A ,  RR ,  <  ) )
2422, 23sylan 458 . . . . . . 7  |-  ( ( ( ph  /\  A  =/=  (/) )  /\  k  e.  A )  ->  k  <_  sup ( A ,  RR ,  <  ) )
256sselda 3292 . . . . . . . 8  |-  ( ( ( ph  /\  A  =/=  (/) )  /\  k  e.  A )  ->  k  e.  ( ZZ>= `  M )
)
2611, 19sseldi 3290 . . . . . . . . 9  |-  ( (
ph  /\  A  =/=  (/) )  ->  sup ( A ,  RR ,  <  )  e.  ZZ )
2726adantr 452 . . . . . . . 8  |-  ( ( ( ph  /\  A  =/=  (/) )  /\  k  e.  A )  ->  sup ( A ,  RR ,  <  )  e.  ZZ )
28 elfz5 10984 . . . . . . . 8  |-  ( ( k  e.  ( ZZ>= `  M )  /\  sup ( A ,  RR ,  <  )  e.  ZZ )  ->  ( k  e.  ( M ... sup ( A ,  RR ,  <  ) )  <->  k  <_  sup ( A ,  RR ,  <  ) ) )
2925, 27, 28syl2anc 643 . . . . . . 7  |-  ( ( ( ph  /\  A  =/=  (/) )  /\  k  e.  A )  ->  (
k  e.  ( M ... sup ( A ,  RR ,  <  ) )  <->  k  <_  sup ( A ,  RR ,  <  ) ) )
3024, 29mpbird 224 . . . . . 6  |-  ( ( ( ph  /\  A  =/=  (/) )  /\  k  e.  A )  ->  k  e.  ( M ... sup ( A ,  RR ,  <  ) ) )
3130ex 424 . . . . 5  |-  ( (
ph  /\  A  =/=  (/) )  ->  ( k  e.  A  ->  k  e.  ( M ... sup ( A ,  RR ,  <  ) ) ) )
3231ssrdv 3298 . . . 4  |-  ( (
ph  /\  A  =/=  (/) )  ->  A  C_  ( M ... sup ( A ,  RR ,  <  ) ) )
33 oveq2 6029 . . . . . 6  |-  ( n  =  sup ( A ,  RR ,  <  )  ->  ( M ... n )  =  ( M ... sup ( A ,  RR ,  <  ) ) )
3433sseq2d 3320 . . . . 5  |-  ( n  =  sup ( A ,  RR ,  <  )  ->  ( A  C_  ( M ... n )  <-> 
A  C_  ( M ... sup ( A ,  RR ,  <  ) ) ) )
3534rspcev 2996 . . . 4  |-  ( ( sup ( A ,  RR ,  <  )  e.  ( ZZ>= `  M )  /\  A  C_  ( M ... sup ( A ,  RR ,  <  ) ) )  ->  E. n  e.  ( ZZ>= `  M ) A  C_  ( M ... n ) )
3619, 32, 35syl2anc 643 . . 3  |-  ( (
ph  /\  A  =/=  (/) )  ->  E. n  e.  ( ZZ>= `  M ) A  C_  ( M ... n ) )
37 fsumcvg3.2 . . . . 5  |-  ( ph  ->  M  e.  ZZ )
38 uzid 10433 . . . . 5  |-  ( M  e.  ZZ  ->  M  e.  ( ZZ>= `  M )
)
3937, 38syl 16 . . . 4  |-  ( ph  ->  M  e.  ( ZZ>= `  M ) )
40 0ss 3600 . . . 4  |-  (/)  C_  ( M ... M )
41 oveq2 6029 . . . . . 6  |-  ( n  =  M  ->  ( M ... n )  =  ( M ... M
) )
4241sseq2d 3320 . . . . 5  |-  ( n  =  M  ->  ( (/)  C_  ( M ... n
)  <->  (/)  C_  ( M ... M ) ) )
4342rspcev 2996 . . . 4  |-  ( ( M  e.  ( ZZ>= `  M )  /\  (/)  C_  ( M ... M ) )  ->  E. n  e.  (
ZZ>= `  M ) (/)  C_  ( M ... n
) )
4439, 40, 43sylancl 644 . . 3  |-  ( ph  ->  E. n  e.  (
ZZ>= `  M ) (/)  C_  ( M ... n
) )
452, 36, 44pm2.61ne 2626 . 2  |-  ( ph  ->  E. n  e.  (
ZZ>= `  M ) A 
C_  ( M ... n ) )
465eleq2i 2452 . . . . . 6  |-  ( k  e.  Z  <->  k  e.  ( ZZ>= `  M )
)
47 fsumcvg3.5 . . . . . 6  |-  ( (
ph  /\  k  e.  Z )  ->  ( F `  k )  =  if ( k  e.  A ,  B , 
0 ) )
4846, 47sylan2br 463 . . . . 5  |-  ( (
ph  /\  k  e.  ( ZZ>= `  M )
)  ->  ( F `  k )  =  if ( k  e.  A ,  B ,  0 ) )
4948adantlr 696 . . . 4  |-  ( ( ( ph  /\  (
n  e.  ( ZZ>= `  M )  /\  A  C_  ( M ... n
) ) )  /\  k  e.  ( ZZ>= `  M ) )  -> 
( F `  k
)  =  if ( k  e.  A ,  B ,  0 ) )
50 simprl 733 . . . 4  |-  ( (
ph  /\  ( n  e.  ( ZZ>= `  M )  /\  A  C_  ( M ... n ) ) )  ->  n  e.  ( ZZ>= `  M )
)
51 fsumcvg3.6 . . . . 5  |-  ( (
ph  /\  k  e.  A )  ->  B  e.  CC )
5251adantlr 696 . . . 4  |-  ( ( ( ph  /\  (
n  e.  ( ZZ>= `  M )  /\  A  C_  ( M ... n
) ) )  /\  k  e.  A )  ->  B  e.  CC )
53 simprr 734 . . . 4  |-  ( (
ph  /\  ( n  e.  ( ZZ>= `  M )  /\  A  C_  ( M ... n ) ) )  ->  A  C_  ( M ... n ) )
5449, 50, 52, 53fsumcvg2 12449 . . 3  |-  ( (
ph  /\  ( n  e.  ( ZZ>= `  M )  /\  A  C_  ( M ... n ) ) )  ->  seq  M (  +  ,  F )  ~~>  (  seq  M (  +  ,  F ) `
 n ) )
55 climrel 12214 . . . 4  |-  Rel  ~~>
5655releldmi 5047 . . 3  |-  (  seq 
M (  +  ,  F )  ~~>  (  seq 
M (  +  ,  F ) `  n
)  ->  seq  M (  +  ,  F )  e.  dom  ~~>  )
5754, 56syl 16 . 2  |-  ( (
ph  /\  ( n  e.  ( ZZ>= `  M )  /\  A  C_  ( M ... n ) ) )  ->  seq  M (  +  ,  F )  e.  dom  ~~>  )
5845, 57rexlimddv 2778 1  |-  ( ph  ->  seq  M (  +  ,  F )  e. 
dom 
~~>  )
Colors of variables: wff set class
Syntax hints:    -> wi 4    <-> wb 177    /\ wa 359    /\ w3a 936    = wceq 1649    e. wcel 1717    =/= wne 2551   A.wral 2650   E.wrex 2651    C_ wss 3264   (/)c0 3572   ifcif 3683   class class class wbr 4154    Or wor 4444   dom cdm 4819   ` cfv 5395  (class class class)co 6021   Fincfn 7046   supcsup 7381   CCcc 8922   RRcr 8923   0cc0 8924    + caddc 8927    < clt 9054    <_ cle 9055   ZZcz 10215   ZZ>=cuz 10421   ...cfz 10976    seq cseq 11251    ~~> cli 12206
This theorem is referenced by:  isumless  12553  radcnv0  20200
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1661  ax-8 1682  ax-13 1719  ax-14 1721  ax-6 1736  ax-7 1741  ax-11 1753  ax-12 1939  ax-ext 2369  ax-rep 4262  ax-sep 4272  ax-nul 4280  ax-pow 4319  ax-pr 4345  ax-un 4642  ax-inf2 7530  ax-cnex 8980  ax-resscn 8981  ax-1cn 8982  ax-icn 8983  ax-addcl 8984  ax-addrcl 8985  ax-mulcl 8986  ax-mulrcl 8987  ax-mulcom 8988  ax-addass 8989  ax-mulass 8990  ax-distr 8991  ax-i2m1 8992  ax-1ne0 8993  ax-1rid 8994  ax-rnegex 8995  ax-rrecex 8996  ax-cnre 8997  ax-pre-lttri 8998  ax-pre-lttrn 8999  ax-pre-ltadd 9000  ax-pre-mulgt0 9001  ax-pre-sup 9002
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2243  df-mo 2244  df-clab 2375  df-cleq 2381  df-clel 2384  df-nfc 2513  df-ne 2553  df-nel 2554  df-ral 2655  df-rex 2656  df-reu 2657  df-rmo 2658  df-rab 2659  df-v 2902  df-sbc 3106  df-csb 3196  df-dif 3267  df-un 3269  df-in 3271  df-ss 3278  df-pss 3280  df-nul 3573  df-if 3684  df-pw 3745  df-sn 3764  df-pr 3765  df-tp 3766  df-op 3767  df-uni 3959  df-iun 4038  df-br 4155  df-opab 4209  df-mpt 4210  df-tr 4245  df-eprel 4436  df-id 4440  df-po 4445  df-so 4446  df-fr 4483  df-we 4485  df-ord 4526  df-on 4527  df-lim 4528  df-suc 4529  df-om 4787  df-xp 4825  df-rel 4826  df-cnv 4827  df-co 4828  df-dm 4829  df-rn 4830  df-res 4831  df-ima 4832  df-iota 5359  df-fun 5397  df-fn 5398  df-f 5399  df-f1 5400  df-fo 5401  df-f1o 5402  df-fv 5403  df-ov 6024  df-oprab 6025  df-mpt2 6026  df-1st 6289  df-2nd 6290  df-riota 6486  df-recs 6570  df-rdg 6605  df-1o 6661  df-er 6842  df-en 7047  df-dom 7048  df-sdom 7049  df-fin 7050  df-sup 7382  df-pnf 9056  df-mnf 9057  df-xr 9058  df-ltxr 9059  df-le 9060  df-sub 9226  df-neg 9227  df-div 9611  df-nn 9934  df-2 9991  df-n0 10155  df-z 10216  df-uz 10422  df-rp 10546  df-fz 10977  df-seq 11252  df-exp 11311  df-cj 11832  df-re 11833  df-im 11834  df-sqr 11968  df-abs 11969  df-clim 12210
  Copyright terms: Public domain W3C validator