ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  elply2 Unicode version

Theorem elply2 15649
Description: The coefficient function can be assumed to have zeroes outside  0 ... n. (Contributed by Mario Carneiro, 20-Jul-2014.) (Revised by Mario Carneiro, 23-Aug-2014.)
Assertion
Ref Expression
elply2  |-  ( F  e.  (Poly `  S
)  <->  ( S  C_  CC  /\  E. n  e. 
NN0  E. a  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) ) )
Distinct variable groups:    S, a, n   
k, a, z, n    F, a, n
Allowed substitution hints:    S( z, k)    F( z, k)

Proof of Theorem elply2
Dummy variables  f  x  w are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elply 15648 . . 3  |-  ( F  e.  (Poly `  S
)  <->  ( S  C_  CC  /\  E. n  e. 
NN0  E. f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) ) ) )
2 simpr 110 . . . . . . . . . . . . 13  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  f  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) )
3 simpll 527 . . . . . . . . . . . . . . . 16  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  S  C_  CC )
4 cnex 8256 . . . . . . . . . . . . . . . 16  |-  CC  e.  _V
5 ssexg 4251 . . . . . . . . . . . . . . . 16  |-  ( ( S  C_  CC  /\  CC  e.  _V )  ->  S  e.  _V )
63, 4, 5sylancl 413 . . . . . . . . . . . . . . 15  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  S  e.  _V )
7 c0ex 8273 . . . . . . . . . . . . . . . 16  |-  0  e.  _V
87snex 4300 . . . . . . . . . . . . . . 15  |-  { 0 }  e.  _V
9 unexg 4566 . . . . . . . . . . . . . . 15  |-  ( ( S  e.  _V  /\  { 0 }  e.  _V )  ->  ( S  u.  { 0 } )  e. 
_V )
106, 8, 9sylancl 413 . . . . . . . . . . . . . 14  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  ( S  u.  { 0 } )  e.  _V )
11 nn0ex 9507 . . . . . . . . . . . . . 14  |-  NN0  e.  _V
12 elmapg 6897 . . . . . . . . . . . . . 14  |-  ( ( ( S  u.  {
0 } )  e. 
_V  /\  NN0  e.  _V )  ->  ( f  e.  ( ( S  u.  { 0 } )  ^m  NN0 )  <->  f : NN0 --> ( S  u.  { 0 } ) ) )
1310, 11, 12sylancl 413 . . . . . . . . . . . . 13  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  (
f  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) 
<->  f : NN0 --> ( S  u.  { 0 } ) ) )
142, 13mpbid 147 . . . . . . . . . . . 12  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  f : NN0 --> ( S  u.  { 0 } ) )
1514ffvelcdmda 5814 . . . . . . . . . . 11  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  ->  (
f `  x )  e.  ( S  u.  {
0 } ) )
16 ssun2 3385 . . . . . . . . . . . . 13  |-  { 0 }  C_  ( S  u.  { 0 } )
177snss 3831 . . . . . . . . . . . . 13  |-  ( 0  e.  ( S  u.  { 0 } )  <->  { 0 }  C_  ( S  u.  { 0 } ) )
1816, 17mpbir 146 . . . . . . . . . . . 12  |-  0  e.  ( S  u.  {
0 } )
1918a1i 9 . . . . . . . . . . 11  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  ->  0  e.  ( S  u.  {
0 } ) )
20 nn0z 9602 . . . . . . . . . . . . 13  |-  ( x  e.  NN0  ->  x  e.  ZZ )
2120adantl 277 . . . . . . . . . . . 12  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  ->  x  e.  ZZ )
22 0zd 9594 . . . . . . . . . . . 12  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  ->  0  e.  ZZ )
23 simpllr 536 . . . . . . . . . . . . 13  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  ->  n  e.  NN0 )
2423nn0zd 9704 . . . . . . . . . . . 12  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  ->  n  e.  ZZ )
25 fzdcel 10380 . . . . . . . . . . . 12  |-  ( ( x  e.  ZZ  /\  0  e.  ZZ  /\  n  e.  ZZ )  -> DECID  x  e.  (
0 ... n ) )
2621, 22, 24, 25syl3anc 1274 . . . . . . . . . . 11  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  -> DECID  x  e.  (
0 ... n ) )
2715, 19, 26ifcldcd 3662 . . . . . . . . . 10  |-  ( ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) )  /\  x  e.  NN0 )  ->  if ( x  e.  (
0 ... n ) ,  ( f `  x
) ,  0 )  e.  ( S  u.  { 0 } ) )
2827fmpttd 5834 . . . . . . . . 9  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  (
x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) ) : NN0 --> ( S  u.  { 0 } ) )
29 elmapg 6897 . . . . . . . . . 10  |-  ( ( ( S  u.  {
0 } )  e. 
_V  /\  NN0  e.  _V )  ->  ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) 
<->  ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) ) : NN0 --> ( S  u.  { 0 } ) ) )
3010, 11, 29sylancl 413 . . . . . . . . 9  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  (
( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  e.  ( ( S  u.  {
0 } )  ^m  NN0 )  <->  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) ) : NN0 --> ( S  u.  { 0 } ) ) )
3128, 30mpbird 167 . . . . . . . 8  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  (
x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) )
32 mptima 5115 . . . . . . . . . 10  |-  ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) ) " ( ZZ>= `  ( n  +  1
) ) )  =  ran  ( x  e.  ( NN0  i^i  ( ZZ>=
`  ( n  + 
1 ) ) ) 
|->  if ( x  e.  ( 0 ... n
) ,  ( f `
 x ) ,  0 ) )
33 fznuz 10443 . . . . . . . . . . . . . . . 16  |-  ( x  e.  ( 0 ... n )  ->  -.  x  e.  ( ZZ>= `  ( n  +  1
) ) )
34 elinel2 3408 . . . . . . . . . . . . . . . 16  |-  ( x  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) )  ->  x  e.  ( ZZ>= `  ( n  +  1 ) ) )
3533, 34nsyl3 631 . . . . . . . . . . . . . . 15  |-  ( x  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) )  ->  -.  x  e.  ( 0 ... n
) )
3635iffalsed 3634 . . . . . . . . . . . . . 14  |-  ( x  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) )  ->  if (
x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 )  =  0 )
3736mpteq2ia 4198 . . . . . . . . . . . . 13  |-  ( x  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) )  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  =  ( x  e.  ( NN0  i^i  ( ZZ>=
`  ( n  + 
1 ) ) ) 
|->  0 )
38 fconstmpt 4799 . . . . . . . . . . . . 13  |-  ( ( NN0  i^i  ( ZZ>= `  ( n  +  1
) ) )  X. 
{ 0 } )  =  ( x  e.  ( NN0  i^i  ( ZZ>=
`  ( n  + 
1 ) ) ) 
|->  0 )
3937, 38eqtr4i 2258 . . . . . . . . . . . 12  |-  ( x  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) )  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  =  ( ( NN0 
i^i  ( ZZ>= `  (
n  +  1 ) ) )  X.  {
0 } )
4039rneqi 4987 . . . . . . . . . . 11  |-  ran  (
x  e.  ( NN0 
i^i  ( ZZ>= `  (
n  +  1 ) ) )  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )  =  ran  (
( NN0  i^i  ( ZZ>=
`  ( n  + 
1 ) ) )  X.  { 0 } )
41 peano2nn0 9541 . . . . . . . . . . . . 13  |-  ( n  e.  NN0  ->  ( n  +  1 )  e. 
NN0 )
42 nn0z 9602 . . . . . . . . . . . . . . 15  |-  ( n  e.  NN0  ->  n  e.  ZZ )
4342peano2zd 9709 . . . . . . . . . . . . . 14  |-  ( n  e.  NN0  ->  ( n  +  1 )  e.  ZZ )
4443uzidd 9875 . . . . . . . . . . . . 13  |-  ( n  e.  NN0  ->  ( n  +  1 )  e.  ( ZZ>= `  ( n  +  1 ) ) )
4541, 44elind 3406 . . . . . . . . . . . 12  |-  ( n  e.  NN0  ->  ( n  +  1 )  e.  ( NN0  i^i  ( ZZ>=
`  ( n  + 
1 ) ) ) )
46 elex2 2832 . . . . . . . . . . . 12  |-  ( ( n  +  1 )  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) )  ->  E. w  w  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) ) )
47 rnxpm 5194 . . . . . . . . . . . 12  |-  ( E. w  w  e.  ( NN0  i^i  ( ZZ>= `  ( n  +  1
) ) )  ->  ran  ( ( NN0  i^i  ( ZZ>= `  ( n  +  1 ) ) )  X.  { 0 } )  =  {
0 } )
4845, 46, 473syl 17 . . . . . . . . . . 11  |-  ( n  e.  NN0  ->  ran  (
( NN0  i^i  ( ZZ>=
`  ( n  + 
1 ) ) )  X.  { 0 } )  =  { 0 } )
4940, 48eqtrid 2279 . . . . . . . . . 10  |-  ( n  e.  NN0  ->  ran  (
x  e.  ( NN0 
i^i  ( ZZ>= `  (
n  +  1 ) ) )  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )  =  { 0 } )
5032, 49eqtrid 2279 . . . . . . . . 9  |-  ( n  e.  NN0  ->  ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) ) " ( ZZ>= `  ( n  +  1
) ) )  =  { 0 } )
5150ad2antlr 489 . . . . . . . 8  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  (
( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) ) " ( ZZ>=
`  ( n  + 
1 ) ) )  =  { 0 } )
52 eqidd 2235 . . . . . . . 8  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  (
z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( f `
 k )  x.  ( z ^ k
) ) ) )
53 imaeq1 5098 . . . . . . . . . . 11  |-  ( a  =  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  ->  ( a "
( ZZ>= `  ( n  +  1 ) ) )  =  ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) ) " ( ZZ>= `  ( n  +  1
) ) ) )
5453eqeq1d 2243 . . . . . . . . . 10  |-  ( a  =  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  ->  ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  <->  ( (
x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) ) " ( ZZ>= `  ( n  +  1
) ) )  =  { 0 } ) )
55 fveq1 5671 . . . . . . . . . . . . . . 15  |-  ( a  =  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  ->  ( a `  k )  =  ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) ) `  k
) )
56 elfznn0 10455 . . . . . . . . . . . . . . . . 17  |-  ( k  e.  ( 0 ... n )  ->  k  e.  NN0 )
57 eleq1w 2295 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  k  ->  (
x  e.  ( 0 ... n )  <->  k  e.  ( 0 ... n
) ) )
58 fveq2 5672 . . . . . . . . . . . . . . . . . . 19  |-  ( x  =  k  ->  (
f `  x )  =  ( f `  k ) )
5957, 58ifbieq1d 3647 . . . . . . . . . . . . . . . . . 18  |-  ( x  =  k  ->  if ( x  e.  (
0 ... n ) ,  ( f `  x
) ,  0 )  =  if ( k  e.  ( 0 ... n ) ,  ( f `  k ) ,  0 ) )
60 eqid 2234 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )  =  ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )
61 vex 2818 . . . . . . . . . . . . . . . . . . . 20  |-  f  e. 
_V
62 vex 2818 . . . . . . . . . . . . . . . . . . . 20  |-  k  e. 
_V
6361, 62fvex 5692 . . . . . . . . . . . . . . . . . . 19  |-  ( f `
 k )  e. 
_V
6463, 7ifex 4609 . . . . . . . . . . . . . . . . . 18  |-  if ( k  e.  ( 0 ... n ) ,  ( f `  k
) ,  0 )  e.  _V
6559, 60, 64fvmpt 5756 . . . . . . . . . . . . . . . . 17  |-  ( k  e.  NN0  ->  ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) ) `  k )  =  if ( k  e.  ( 0 ... n ) ,  ( f `  k ) ,  0 ) )
6656, 65syl 14 . . . . . . . . . . . . . . . 16  |-  ( k  e.  ( 0 ... n )  ->  (
( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) ) `  k
)  =  if ( k  e.  ( 0 ... n ) ,  ( f `  k
) ,  0 ) )
67 iftrue 3629 . . . . . . . . . . . . . . . 16  |-  ( k  e.  ( 0 ... n )  ->  if ( k  e.  ( 0 ... n ) ,  ( f `  k ) ,  0 )  =  ( f `
 k ) )
6866, 67eqtrd 2267 . . . . . . . . . . . . . . 15  |-  ( k  e.  ( 0 ... n )  ->  (
( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) ) `  k
)  =  ( f `
 k ) )
6955, 68sylan9eq 2287 . . . . . . . . . . . . . 14  |-  ( ( a  =  ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )  /\  k  e.  ( 0 ... n
) )  ->  (
a `  k )  =  ( f `  k ) )
7069oveq1d 6067 . . . . . . . . . . . . 13  |-  ( ( a  =  ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) )  /\  k  e.  ( 0 ... n
) )  ->  (
( a `  k
)  x.  ( z ^ k ) )  =  ( ( f `
 k )  x.  ( z ^ k
) ) )
7170sumeq2dv 12061 . . . . . . . . . . . 12  |-  ( a  =  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  ->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) )  =  sum_ k  e.  ( 0 ... n
) ( ( f `
 k )  x.  ( z ^ k
) ) )
7271mpteq2dv 4203 . . . . . . . . . . 11  |-  ( a  =  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  ->  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) ) )
7372eqeq2d 2246 . . . . . . . . . 10  |-  ( a  =  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  ->  ( ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( f `
 k )  x.  ( z ^ k
) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) )  <->  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k )  x.  (
z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) ) ) )
7454, 73anbi12d 473 . . . . . . . . 9  |-  ( a  =  ( x  e. 
NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  ->  ( ( ( a " ( ZZ>= `  ( n  +  1
) ) )  =  { 0 }  /\  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( a `
 k )  x.  ( z ^ k
) ) ) )  <-> 
( ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x
) ,  0 ) ) " ( ZZ>= `  ( n  +  1
) ) )  =  { 0 }  /\  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( f `
 k )  x.  ( z ^ k
) ) ) ) ) )
7574rspcev 2923 . . . . . . . 8  |-  ( ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) )  e.  ( ( S  u.  {
0 } )  ^m  NN0 )  /\  ( ( ( x  e.  NN0  |->  if ( x  e.  ( 0 ... n ) ,  ( f `  x ) ,  0 ) ) " ( ZZ>=
`  ( n  + 
1 ) ) )  =  { 0 }  /\  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k )  x.  (
z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) ) ) )  ->  E. a  e.  (
( S  u.  {
0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  (
z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( a `
 k )  x.  ( z ^ k
) ) ) ) )
7631, 51, 52, 75syl12anc 1272 . . . . . . 7  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  (
z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( a `
 k )  x.  ( z ^ k
) ) ) ) )
77 eqeq1 2241 . . . . . . . . 9  |-  ( F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k )  x.  (
z ^ k ) ) )  ->  ( F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) )  <->  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k )  x.  (
z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) ) ) )
7877anbi2d 464 . . . . . . . 8  |-  ( F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k )  x.  (
z ^ k ) ) )  ->  (
( ( a "
( ZZ>= `  ( n  +  1 ) ) )  =  { 0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) ) )  <->  ( (
a " ( ZZ>= `  ( n  +  1
) ) )  =  { 0 }  /\  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( a `
 k )  x.  ( z ^ k
) ) ) ) ) )
7978rexbidv 2545 . . . . . . 7  |-  ( F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k )  x.  (
z ^ k ) ) )  ->  ( E. a  e.  (
( S  u.  {
0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) )  <->  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  (
z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n
) ( ( a `
 k )  x.  ( z ^ k
) ) ) ) ) )
8076, 79syl5ibrcom 157 . . . . . 6  |-  ( ( ( S  C_  CC  /\  n  e.  NN0 )  /\  f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) )  ->  ( F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k )  x.  (
z ^ k ) ) )  ->  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) ) )
8180rexlimdva 2662 . . . . 5  |-  ( ( S  C_  CC  /\  n  e.  NN0 )  ->  ( E. f  e.  (
( S  u.  {
0 } )  ^m  NN0 ) F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  ->  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) ) )
8281reximdva 2646 . . . 4  |-  ( S 
C_  CC  ->  ( E. n  e.  NN0  E. f  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) )  ->  E. n  e.  NN0  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) ) )
8382imdistani 445 . . 3  |-  ( ( S  C_  CC  /\  E. n  e.  NN0  E. f  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( f `  k
)  x.  ( z ^ k ) ) ) )  ->  ( S  C_  CC  /\  E. n  e.  NN0  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) ) )
841, 83sylbi 121 . 2  |-  ( F  e.  (Poly `  S
)  ->  ( S  C_  CC  /\  E. n  e.  NN0  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) ) )
85 simpr 110 . . . . . 6  |-  ( ( ( a " ( ZZ>=
`  ( n  + 
1 ) ) )  =  { 0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) ) )  ->  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) )
8685reximi 2641 . . . . 5  |-  ( E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) )  ->  E. a  e.  (
( S  u.  {
0 } )  ^m  NN0 ) F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) ) )
8786reximi 2641 . . . 4  |-  ( E. n  e.  NN0  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) )  ->  E. n  e.  NN0  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) F  =  (
z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) ) )
8887anim2i 342 . . 3  |-  ( ( S  C_  CC  /\  E. n  e.  NN0  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) )  ->  ( S  C_  CC  /\  E. n  e. 
NN0  E. a  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) ) ) )
89 elply 15648 . . 3  |-  ( F  e.  (Poly `  S
)  <->  ( S  C_  CC  /\  E. n  e. 
NN0  E. a  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k
)  x.  ( z ^ k ) ) ) ) )
9088, 89sylibr 134 . 2  |-  ( ( S  C_  CC  /\  E. n  e.  NN0  E. a  e.  ( ( S  u.  { 0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) )  ->  F  e.  (Poly `  S ) )
9184, 90impbii 126 1  |-  ( F  e.  (Poly `  S
)  <->  ( S  C_  CC  /\  E. n  e. 
NN0  E. a  e.  ( ( S  u.  {
0 } )  ^m  NN0 ) ( ( a
" ( ZZ>= `  (
n  +  1 ) ) )  =  {
0 }  /\  F  =  ( z  e.  CC  |->  sum_ k  e.  ( 0 ... n ) ( ( a `  k )  x.  (
z ^ k ) ) ) ) ) )
Colors of variables: wff set class
Syntax hints:    /\ wa 104    <-> wb 105  DECID wdc 842    = wceq 1398   E.wex 1541    e. wcel 2205   E.wrex 2523   _Vcvv 2815    u. cun 3211    i^i cin 3212    C_ wss 3213   ifcif 3622   {csn 3691    |-> cmpt 4173    X. cxp 4749   ran crn 4752   "cima 4754   -->wf 5350   ` cfv 5354  (class class class)co 6052    ^m cmap 6884   CCcc 8130   0cc0 8132   1c1 8133    + caddc 8135    x. cmul 8137   NN0cn0 9501   ZZcz 9582   ZZ>=cuz 9859   ...cfz 10348   ^cexp 10907   sum_csu 12046  Polycply 15642
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2207  ax-14 2208  ax-ext 2216  ax-coll 4227  ax-sep 4230  ax-pow 4289  ax-pr 4324  ax-un 4556  ax-setind 4661  ax-cnex 8223  ax-resscn 8224  ax-1cn 8225  ax-1re 8226  ax-icn 8227  ax-addcl 8228  ax-addrcl 8229  ax-mulcl 8230  ax-addcom 8232  ax-addass 8234  ax-distr 8236  ax-i2m1 8237  ax-0lt1 8238  ax-0id 8240  ax-rnegex 8241  ax-cnre 8243  ax-pre-ltirr 8244  ax-pre-ltwlin 8245  ax-pre-lttrn 8246  ax-pre-ltadd 8248
This theorem depends on definitions:  df-bi 117  df-dc 843  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1812  df-eu 2085  df-mo 2086  df-clab 2221  df-cleq 2227  df-clel 2230  df-nfc 2375  df-ne 2415  df-nel 2510  df-ral 2527  df-rex 2528  df-reu 2529  df-rab 2531  df-v 2817  df-sbc 3045  df-csb 3141  df-dif 3215  df-un 3217  df-in 3219  df-ss 3226  df-if 3623  df-pw 3673  df-sn 3697  df-pr 3698  df-op 3700  df-uni 3917  df-int 3952  df-iun 3995  df-br 4112  df-opab 4174  df-mpt 4175  df-id 4416  df-xp 4757  df-rel 4758  df-cnv 4759  df-co 4760  df-dm 4761  df-rn 4762  df-res 4763  df-ima 4764  df-iota 5314  df-fun 5356  df-fn 5357  df-f 5358  df-f1 5359  df-fo 5360  df-f1o 5361  df-fv 5362  df-riota 6005  df-ov 6055  df-oprab 6056  df-mpo 6057  df-1st 6336  df-2nd 6337  df-recs 6538  df-frec 6624  df-map 6886  df-pnf 8315  df-mnf 8316  df-xr 8317  df-ltxr 8318  df-le 8319  df-sub 8451  df-neg 8452  df-inn 9243  df-n0 9502  df-z 9583  df-uz 9860  df-fz 10349  df-seqfrec 10817  df-sumdc 12047  df-ply 15644
This theorem is referenced by:  plyadd  15665  plymul  15666  plyco  15673  dvply2g  15680
  Copyright terms: Public domain W3C validator