| mkDecimal(i / 10, abs(j) - 1).int = (i / 10) / 10 ^ abs(abs(j) - 1), i % 10 = 0, abs(j) ≤ maxScale(i / 10), ∀ i0, j. i→n(i0) < i→n(i) → abs(j) < maxScale(i0) → mkDecimal(i0, j).int = i0 / 10 ^ abs(j) ⊦ j = 0, mkDecimal(i / 10, abs(j) - 1).int = i / 10 ^ abs(j), i = 0 |
i % 10 = 0, mkDecimal(i / 10, abs(j) - 1).int = (i / 10) / 10 ^ (abs(j) - 1), abs(j) ≤ maxScale(i / 10), ∀ i0, j. i→n(i0) < i→n(i) → abs(j) < maxScale(i0) → mkDecimal(i0, j).int = i0 / 10 ^ abs(j) ⊦ j = 0, (i / 10) / 10 ^ (abs(j) - 1) = i / 10 ^ abs(j), i = 0
Used simplifier rules: abs-abs: ⊦ j ≠ 0 → abs(abs(j) - 1) = abs(j) - 1; from specification int-abs