| 0 < j ⊦ rational(i, j).num + (0r - rational(i, j)).num = 0 ∧ rational(i, j).denom = (0r - rational(i, j)).denom |
⊦ ri - rj = rational(ri.num * rj.denom - ri.denom * rj.num, ri.denom * rj.denom)
0 < j ⊦ rational(i, j).num + rational(0r.num * rational(i, j).denom - 0r.denom * rational(i, j).num, 0r.denom * rational(i, j).denom).num = 0 ∧ rational(i, j).denom = rational(0r.num * rational(i, j).denom - 0r.denom * rational(i, j).num, 0r.denom * rational(i, j).denom).denom
Used terms: rational(i, j), 0r