| ⊦ abs(mkDecimal(dec.int * dec0.int, dec.scale + dec0.scale)) = mkDecimal(abs(dec.int) * abs(dec0.int), dec.scale + dec0.scale) |
⊦ abs(mkDecimal(i, j)) = mkDecimal(abs(i), j)
Used simplifier rules: abs-eqall: ⊦ abs(i * j) = abs(i) * abs(j); from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%commutativity: ⊦ i * j = j * i; from specification int-mult%eq-same: ⊦ mkDecimal(i, j) = mkDecimal(i0, j) ↔ i = i0; from specification decimal Used terms: dec.scale + dec0.scale, dec.int * dec0.int