(mkDecimal(i, i0) * mkDecimal(i, i0)).int < 0 ⊦
Used simplifier rules: forward-le-02: ⊦ j < i ∧ i ≤ 0 → j < 0; (forward) from specification int-abs