| 0 < j1 ∧ 0 < abs(j2), j2 < 0, 0 < j1, j2 < 0 ⊦ j2 = 0, rational(i1 * abs(j2) + j1 * ~ i2, j1 * abs(j2)) = rational(i1 * j2 + j1 * i2, j1 * j2) |
0 < j1, j2 < 0 ⊦ j2 = 0, rational(~(j2 * i1 + i2 * j1), ~(j2 * j1)) = rational(i1 * j2 + j1 * i2, j1 * j2)
Used simplifier rules: ⊦ i < 0 ∧ 0 ≤ j → i < j;% ⊦ 0 < ~ i ↔ i < 0;% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ ~ i + ~ j = ~(i + j);% ⊦ i < 0 → abs(i) = ~ i;% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ ~ i * j = ~(i * j);