Step |
Hyp |
Ref |
Expression |
1 |
|
sltsubsubbd.1 |
|- ( ph -> A e. No ) |
2 |
|
sltsubsubbd.2 |
|- ( ph -> B e. No ) |
3 |
|
sltsubsubbd.3 |
|- ( ph -> C e. No ) |
4 |
|
sltsubsubbd.4 |
|- ( ph -> D e. No ) |
5 |
2 1 4 3
|
sltsubsubbd |
|- ( ph -> ( ( B -s D ) ( B -s A ) |
6 |
5
|
notbid |
|- ( ph -> ( -. ( B -s D ) -. ( B -s A ) |
7 |
1 3
|
subscld |
|- ( ph -> ( A -s C ) e. No ) |
8 |
2 4
|
subscld |
|- ( ph -> ( B -s D ) e. No ) |
9 |
|
slenlt |
|- ( ( ( A -s C ) e. No /\ ( B -s D ) e. No ) -> ( ( A -s C ) <_s ( B -s D ) <-> -. ( B -s D ) |
10 |
7 8 9
|
syl2anc |
|- ( ph -> ( ( A -s C ) <_s ( B -s D ) <-> -. ( B -s D ) |
11 |
4 3
|
subscld |
|- ( ph -> ( D -s C ) e. No ) |
12 |
2 1
|
subscld |
|- ( ph -> ( B -s A ) e. No ) |
13 |
|
slenlt |
|- ( ( ( D -s C ) e. No /\ ( B -s A ) e. No ) -> ( ( D -s C ) <_s ( B -s A ) <-> -. ( B -s A ) |
14 |
11 12 13
|
syl2anc |
|- ( ph -> ( ( D -s C ) <_s ( B -s A ) <-> -. ( B -s A ) |
15 |
6 10 14
|
3bitr4d |
|- ( ph -> ( ( A -s C ) <_s ( B -s D ) <-> ( D -s C ) <_s ( B -s A ) ) ) |