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