| Step |
Hyp |
Ref |
Expression |
| 1 |
|
slttrieq2 |
|- ( ( A e. No /\ B e. No ) -> ( A = B <-> ( -. A |
| 2 |
|
slenlt |
|- ( ( A e. No /\ B e. No ) -> ( A <_s B <-> -. B |
| 3 |
|
slenlt |
|- ( ( B e. No /\ A e. No ) -> ( B <_s A <-> -. A |
| 4 |
3
|
ancoms |
|- ( ( A e. No /\ B e. No ) -> ( B <_s A <-> -. A |
| 5 |
2 4
|
anbi12d |
|- ( ( A e. No /\ B e. No ) -> ( ( A <_s B /\ B <_s A ) <-> ( -. B |
| 6 |
|
ancom |
|- ( ( -. B ( -. A |
| 7 |
5 6
|
bitrdi |
|- ( ( A e. No /\ B e. No ) -> ( ( A <_s B /\ B <_s A ) <-> ( -. A |
| 8 |
1 7
|
bitr4d |
|- ( ( A e. No /\ B e. No ) -> ( A = B <-> ( A <_s B /\ B <_s A ) ) ) |