| dec_j = mkDecimal(i1, i2), mkDecimal(0, 0) ≤ dec_j, mkDecimal(i, i0) * dec_j < mkDecimal(i, i0), mkDecimal(i, i0) * dec_j < mkDecimal(0, 0), mkDecimal(i, i0) * dec_j < dec_j, 0 ≤ i ⊦ |
mkDecimal(i, i0) * mkDecimal(i1, i2) < mkDecimal(i, i0), mkDecimal(i, i0) * mkDecimal(i1, i2) < mkDecimal(0, 0), mkDecimal(i, i0) * mkDecimal(i1, i2) < mkDecimal(i1, i2), 0 ≤ i, 0 ≤ i1 ⊦
Used simplifier rules: le-zero: ⊦ mkDecimal(0, 0) ≤ mkDecimal(i, j) ↔ 0 ≤ i;%forward-le-01: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward) from specification int-abs