Step |
Hyp |
Ref |
Expression |
1 |
|
df-0p |
|- 0p = ( CC X. { 0 } ) |
2 |
|
id |
|- ( S C_ CC -> S C_ CC ) |
3 |
|
0cnd |
|- ( S C_ CC -> 0 e. CC ) |
4 |
3
|
snssd |
|- ( S C_ CC -> { 0 } C_ CC ) |
5 |
2 4
|
unssd |
|- ( S C_ CC -> ( S u. { 0 } ) C_ CC ) |
6 |
|
ssun2 |
|- { 0 } C_ ( S u. { 0 } ) |
7 |
|
c0ex |
|- 0 e. _V |
8 |
7
|
snss |
|- ( 0 e. ( S u. { 0 } ) <-> { 0 } C_ ( S u. { 0 } ) ) |
9 |
6 8
|
mpbir |
|- 0 e. ( S u. { 0 } ) |
10 |
|
plyconst |
|- ( ( ( S u. { 0 } ) C_ CC /\ 0 e. ( S u. { 0 } ) ) -> ( CC X. { 0 } ) e. ( Poly ` ( S u. { 0 } ) ) ) |
11 |
5 9 10
|
sylancl |
|- ( S C_ CC -> ( CC X. { 0 } ) e. ( Poly ` ( S u. { 0 } ) ) ) |
12 |
1 11
|
eqeltrid |
|- ( S C_ CC -> 0p e. ( Poly ` ( S u. { 0 } ) ) ) |
13 |
|
plyun0 |
|- ( Poly ` ( S u. { 0 } ) ) = ( Poly ` S ) |
14 |
12 13
|
eleqtrdi |
|- ( S C_ CC -> 0p e. ( Poly ` S ) ) |