| rj.num = 0 ∨ ri.denom = 0 ⊦ rj = 0r, rational(rj.denom * ri.num, 0) = ~(ri / rj) |
rj.num = 0 ⊦ rj = 0r, rational(ri.num, 0) = ~(ri / rj)
Used simplifier rules: denom-not-zero: ⊦ ri.denom ≠ 0;%num-zero-denum-one: ⊦ rj.num = 0 → rj.denom = 1;% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ 1 * i = i;