| 0 ≤ abs(i2) ⊦ mkDecimal(i * 10 ^ abs(i2), abs(abs(j)) + abs(i2)) < mkDecimal(i1 * 10 ^ abs(j) + i0 * 10 ^ abs(i2), abs(i2) + abs(j)) ↔ mkDecimal(i - i0, j) < mkDecimal(i1, i2) |
⊦ i * 10 ^ abs(i2) < i1 * 10 ^ abs(j) + i0 * 10 ^ abs(i2) ↔ mkDecimal(i - i0, j) < mkDecimal(i1, i2)
Used simplifier rules: less-same: ⊦ mkDecimal(i, j) < mkDecimal(i0, j) ↔ i < i0;%abs-03: ⊦ 0 ≤ abs(i); from specification int-abs%add-c: ⊦ i + j = j + i; from specification int-basic2%abs-01: ⊦ abs(abs(i)) = abs(i); from specification int-abs