| ⊦ abs(mkDecimal(dec.int * dec0.int, dec.scale + dec0.scale)) = mkDecimal(abs(dec).int * abs(dec0).int, abs(dec).scale + abs(dec0).scale) |
⊦ abs(mkDecimal(dec.int * dec0.int, dec.scale + dec0.scale)) = mkDecimal(abs(dec.int) * abs(dec0.int), dec.scale + dec0.scale)
Used simplifier rules: getint-abs: ⊦ abs(dec).int = abs(dec.int);%scale-abs: ⊦ abs(dec).scale = dec.scale;