Step |
Hyp |
Ref |
Expression |
1 |
|
id |
|- ( A = ( card ` x ) -> A = ( card ` x ) ) |
2 |
|
fveq2 |
|- ( A = ( card ` x ) -> ( card ` A ) = ( card ` ( card ` x ) ) ) |
3 |
|
cardidm |
|- ( card ` ( card ` x ) ) = ( card ` x ) |
4 |
2 3
|
eqtrdi |
|- ( A = ( card ` x ) -> ( card ` A ) = ( card ` x ) ) |
5 |
1 4
|
eqtr4d |
|- ( A = ( card ` x ) -> A = ( card ` A ) ) |
6 |
5
|
exlimiv |
|- ( E. x A = ( card ` x ) -> A = ( card ` A ) ) |
7 |
|
fvex |
|- ( card ` A ) e. _V |
8 |
|
eleq1 |
|- ( A = ( card ` A ) -> ( A e. _V <-> ( card ` A ) e. _V ) ) |
9 |
7 8
|
mpbiri |
|- ( A = ( card ` A ) -> A e. _V ) |
10 |
|
fveq2 |
|- ( x = A -> ( card ` x ) = ( card ` A ) ) |
11 |
10
|
eqeq2d |
|- ( x = A -> ( A = ( card ` x ) <-> A = ( card ` A ) ) ) |
12 |
11
|
spcegv |
|- ( A e. _V -> ( A = ( card ` A ) -> E. x A = ( card ` x ) ) ) |
13 |
9 12
|
mpcom |
|- ( A = ( card ` A ) -> E. x A = ( card ` x ) ) |
14 |
6 13
|
impbii |
|- ( E. x A = ( card ` x ) <-> A = ( card ` A ) ) |