Metamath Proof Explorer


Theorem coeval

Description: Value of the coefficient function. (Contributed by Mario Carneiro, 22-Jul-2014)

Ref Expression
Assertion coeval ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โ†’ ( coeff โ€˜ ๐น ) = ( โ„ฉ ๐‘Ž โˆˆ ( โ„‚ โ†‘m โ„•0 ) โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) )

Proof

Step Hyp Ref Expression
1 plyssc โŠข ( Poly โ€˜ ๐‘† ) โІ ( Poly โ€˜ โ„‚ )
2 1 sseli โŠข ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โ†’ ๐น โˆˆ ( Poly โ€˜ โ„‚ ) )
3 eqeq1 โŠข ( ๐‘“ = ๐น โ†’ ( ๐‘“ = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) โ†” ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) )
4 3 anbi2d โŠข ( ๐‘“ = ๐น โ†’ ( ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐‘“ = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) โ†” ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) )
5 4 rexbidv โŠข ( ๐‘“ = ๐น โ†’ ( โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐‘“ = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) โ†” โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) )
6 5 riotabidv โŠข ( ๐‘“ = ๐น โ†’ ( โ„ฉ ๐‘Ž โˆˆ ( โ„‚ โ†‘m โ„•0 ) โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐‘“ = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) = ( โ„ฉ ๐‘Ž โˆˆ ( โ„‚ โ†‘m โ„•0 ) โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) )
7 df-coe โŠข coeff = ( ๐‘“ โˆˆ ( Poly โ€˜ โ„‚ ) โ†ฆ ( โ„ฉ ๐‘Ž โˆˆ ( โ„‚ โ†‘m โ„•0 ) โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐‘“ = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) )
8 riotaex โŠข ( โ„ฉ ๐‘Ž โˆˆ ( โ„‚ โ†‘m โ„•0 ) โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) โˆˆ V
9 6 7 8 fvmpt โŠข ( ๐น โˆˆ ( Poly โ€˜ โ„‚ ) โ†’ ( coeff โ€˜ ๐น ) = ( โ„ฉ ๐‘Ž โˆˆ ( โ„‚ โ†‘m โ„•0 ) โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) )
10 2 9 syl โŠข ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โ†’ ( coeff โ€˜ ๐น ) = ( โ„ฉ ๐‘Ž โˆˆ ( โ„‚ โ†‘m โ„•0 ) โˆƒ ๐‘› โˆˆ โ„•0 ( ( ๐‘Ž โ€œ ( โ„คโ‰ฅ โ€˜ ( ๐‘› + 1 ) ) ) = { 0 } โˆง ๐น = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... ๐‘› ) ( ( ๐‘Ž โ€˜ ๐‘˜ ) ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) ) ) )