| rational(i, j) / rational(abs(i0), j0) = rational(i * j0, j * abs(i0)), 0 < j, 0 < j0, 0 < i ⊦ rational(i, j) / rational(i0, j0) = rational(i * j0, j * i0), i0 = 0 |
⊦ i < 0 → abs(i) = ~ i
i0 < 0, rational(i, j) / rational(~ i0, j0) = rational(i * j0, j * ~ i0), 0 < j, 0 < j0, 0 < i ⊦ rational(i, j) / rational(i0, j0) = rational(i * j0, j * i0), i0 = 0
Used simplifier rules: ⊦ i * j = j * i;% ⊦ ¬ j < 0 → abs(j) = j;% ⊦ ¬ i < j → (i ≠ j ↔ j < i); Used terms: i0