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