| i * j0 = i0 * j, 0 < j, 0 < j0, 0 < i, 0 < i0 ⊦ rational(i, j).num = rational(i0, j0).num ∧ rational(i, j).denom = rational(i0, j0).denom |
i * j0 = i0 * j, 0 < j, 0 < j0, 0 < i, 0 < i0 ⊦ i / gcd(i, j) = i0 / gcd(i0, j0) ∧ rational(i, j).denom = rational(i0, j0).denom
Used simplifier rules: num-pos: ⊦ 0 < i ∧ 0 < j → rational(i, j).num = i / gcd(i, j);% ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward)