| ¬ ¬ dec.int < 0 ⊦ mkDecimal(abs(dec.int), dec.scale).scale = dec.scale |
dec.int < 0 ⊦ mkDecimal(dec.int, dec.scale).scale = dec.scale
Used simplifier rules: forward-le-02: ⊦ j < i ∧ i ≤ 0 → j < 0; (forward) from specification int-abs%scale-negate: ⊦ mkDecimal(~ i, j).scale = mkDecimal(i, j).scale; from specification decimal%abs-08: ⊦ i < 0 → abs(i) = ~ i; from specification int-abs