Step |
Hyp |
Ref |
Expression |
1 |
|
en1 |
|- ( A ~~ 1o <-> E. x A = { x } ) |
2 |
|
id |
|- ( A = { x } -> A = { x } ) |
3 |
|
unieq |
|- ( A = { x } -> U. A = U. { x } ) |
4 |
|
vex |
|- x e. _V |
5 |
4
|
unisn |
|- U. { x } = x |
6 |
3 5
|
eqtrdi |
|- ( A = { x } -> U. A = x ) |
7 |
6
|
sneqd |
|- ( A = { x } -> { U. A } = { x } ) |
8 |
2 7
|
eqtr4d |
|- ( A = { x } -> A = { U. A } ) |
9 |
8
|
exlimiv |
|- ( E. x A = { x } -> A = { U. A } ) |
10 |
1 9
|
sylbi |
|- ( A ~~ 1o -> A = { U. A } ) |
11 |
|
id |
|- ( A = { U. A } -> A = { U. A } ) |
12 |
|
eqsnuniex |
|- ( A = { U. A } -> U. A e. _V ) |
13 |
|
ensn1g |
|- ( U. A e. _V -> { U. A } ~~ 1o ) |
14 |
12 13
|
syl |
|- ( A = { U. A } -> { U. A } ~~ 1o ) |
15 |
11 14
|
eqbrtrd |
|- ( A = { U. A } -> A ~~ 1o ) |
16 |
10 15
|
impbii |
|- ( A ~~ 1o <-> A = { U. A } ) |