| i % 10 = 0, ∀ i0, j. i→n(i0) < i→n(i) → true → ~ mkDecimal(i0, j).int = mkDecimal(~ i0, j).int ⊦ j = 0, i = 0, mkDecimal(i / 10, abs(j) - 1).int + mkDecimal(~(i / 10), abs(j) - 1).int = 0 |
Used simplifier rules: negeq: ⊦ ~ i = j ↔ i + j = 0; from specification int-abs%labs: ⊦ i→n(i) < i→n(j) ↔ abs(i) < abs(j); from specification intnat%abs: j ≠ 0 ⊦ abs(i / j) = abs(i) / abs(j); from specification int-div%lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%abs-div10-le: ⊦ abs(i) ≤ abs(i) / 10 ↔ i = 0; from specification int-div Used terms: i / 10, abs(j) - 1