| Step |
Hyp |
Ref |
Expression |
| 1 |
|
ssid |
|- A C_ A |
| 2 |
|
bj-restsnss |
|- ( ( A e. _V /\ A C_ A ) -> ( { A } |`t A ) = { A } ) |
| 3 |
1 2
|
mpan2 |
|- ( A e. _V -> ( { A } |`t A ) = { A } ) |
| 4 |
|
df-rest |
|- |`t = ( x e. _V , y e. _V |-> ran ( z e. x |-> ( z i^i y ) ) ) |
| 5 |
4
|
reldmmpo |
|- Rel dom |`t |
| 6 |
5
|
ovprc2 |
|- ( -. A e. _V -> ( { A } |`t A ) = (/) ) |
| 7 |
|
snprc |
|- ( -. A e. _V <-> { A } = (/) ) |
| 8 |
7
|
biimpi |
|- ( -. A e. _V -> { A } = (/) ) |
| 9 |
6 8
|
eqtr4d |
|- ( -. A e. _V -> ( { A } |`t A ) = { A } ) |
| 10 |
3 9
|
pm2.61i |
|- ( { A } |`t A ) = { A } |