Step |
Hyp |
Ref |
Expression |
1 |
|
elfvex |
|- ( Y e. ( har ` X ) -> X e. _V ) |
2 |
|
reldom |
|- Rel ~<_ |
3 |
2
|
brrelex2i |
|- ( Y ~<_ X -> X e. _V ) |
4 |
3
|
adantl |
|- ( ( Y e. On /\ Y ~<_ X ) -> X e. _V ) |
5 |
|
harval |
|- ( X e. _V -> ( har ` X ) = { y e. On | y ~<_ X } ) |
6 |
5
|
eleq2d |
|- ( X e. _V -> ( Y e. ( har ` X ) <-> Y e. { y e. On | y ~<_ X } ) ) |
7 |
|
breq1 |
|- ( y = Y -> ( y ~<_ X <-> Y ~<_ X ) ) |
8 |
7
|
elrab |
|- ( Y e. { y e. On | y ~<_ X } <-> ( Y e. On /\ Y ~<_ X ) ) |
9 |
6 8
|
bitrdi |
|- ( X e. _V -> ( Y e. ( har ` X ) <-> ( Y e. On /\ Y ~<_ X ) ) ) |
10 |
1 4 9
|
pm5.21nii |
|- ( Y e. ( har ` X ) <-> ( Y e. On /\ Y ~<_ X ) ) |