| 0 < j1, 0 < j2 ⊦ rational (rational(i1, j1).num * rational(i2, j2).denom - rational(i1, j1).denom * rational(i2, j2).num, rational(i1, j1).denom * rational(i2, j2).denom) = rational (rational(i1, j1).num * rational(i2, j2).denom + rational(i1, j1).denom * rational(~ i2, j2).num, rational(i1, j1).denom * rational(i2, j2).denom) |
⊦ rational(~ i, j).num = ~ rational(i, j).num
Used simplifier rules: ⊦ i * j = j * i;% ⊦ ~ i * j = ~(i * j);% ⊦ i * j * j0 = (i * j) * j0;% ⊦ i + ~ j = i - j;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ i + j = j + i; Used terms: j2, i2