| 3 |
|
xaddval |
|- ( ( +oo e. RR* /\ -oo e. RR* ) -> ( +oo +e -oo ) = if ( +oo = +oo , if ( -oo = -oo , 0 , +oo ) , if ( +oo = -oo , if ( -oo = +oo , 0 , -oo ) , if ( -oo = +oo , +oo , if ( -oo = -oo , -oo , ( +oo + -oo ) ) ) ) ) ) |
| 4 |
1 2 3
|
mp2an |
|- ( +oo +e -oo ) = if ( +oo = +oo , if ( -oo = -oo , 0 , +oo ) , if ( +oo = -oo , if ( -oo = +oo , 0 , -oo ) , if ( -oo = +oo , +oo , if ( -oo = -oo , -oo , ( +oo + -oo ) ) ) ) ) |
| 6 |
5
|
iftruei |
|- if ( +oo = +oo , if ( -oo = -oo , 0 , +oo ) , if ( +oo = -oo , if ( -oo = +oo , 0 , -oo ) , if ( -oo = +oo , +oo , if ( -oo = -oo , -oo , ( +oo + -oo ) ) ) ) ) = if ( -oo = -oo , 0 , +oo ) |