| ⊦ mkDecimal(dec.int * 10 ^ dec.scale - dec.int * 10 ^ dec.scale, dec.scale + dec.scale) = mkDecimal(0, 0) |
⊦ mkDecimal(0, 2 * dec.scale) = mkDecimal(0, 0)
Used simplifier rules: add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%add-mult-two: ⊦ i + i = 2 * i; from specification int-mult%sub-sub-03: ⊦ i - i = 0; from specification int-abs