| abs(i1) / gcd(i1, j1) = abs(i2) / gcd(i2, j2), j2 / gcd(i2, j2) + j1 / gcd(i1, j1) = 0, 0 < j1, j2 < 0, 0 < i1 ∧ i2 < 0 ∨ i1 < 0 ∧ 0 < i2 ⊦ j2 = 0, j1 = 0, i2 = 0, i1 / gcd(i1, j1) = rational(i2, j2).num, i1 = 0 |
⊦ 0 < i ∧ j < 0 → rational(i, j).num = ~(i / gcd(i, j))
Used simplifier rules: numerator-neg2: ⊦ i < 0 ∧ j < 0 → rational(i, j).num = abs(i) / gcd(i, j);% ⊦ ¬ i < j ↔ j ≤ i;% ⊦ i ≠ j → (i ≤ j ↔ i < j);% ⊦ i < j → ¬ j < i;% ⊦ i < 0 → abs(i) = ~ i;% ⊦ gcd(i, j) = 0 ↔ i = 0 ∧ j = 0;%j ≠ 0 ⊦ ~ i / j = ~(i / j);% ⊦ ~ i = j ↔ i + j = 0;% ⊦ i < 0 ∧ 0 ≤ j → i < j;% ⊦ 0 < j → abs(j) = j;% ⊦ i + j = j + i;% ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward)% ⊦ j < i ∧ i ≤ 0 → j < 0; (forward) Used terms: j2, i2