| j = i * (i1 + 1) + j0 - 1, j + 1 = i * (i1 + 1) + j0, j0 ≤ 0, abs(j0) < i, j < i, j < 0, 0 < i, j0 < i, j + 1 < i ⊦ i * i0 ≤ j ↔ i0 ≤ i1, i = j + 1 |
j0 ≤ 0, abs(j0) < i, i * (i1 + 1) + j0 ≤ 0, 0 < i, j0 < i, i * (i1 + 1) + j0 < i ⊦ i * i0 < i * (i1 + 1) + j0 ↔ i0 ≤ i1, i = i * (i1 + 1) + j0
Used simplifier rules: lsone: ⊦ i < 1 ↔ i ≤ 0; from specification int-abs%lels-02: ⊦ i ≠ j → (i ≤ j ↔ i < j); from specification int-abs%succ-02: ⊦ i < j + 1 ↔ i ≤ j; from specification int-abs%sub-ls: ⊦ i - j < i0 ↔ i < j + i0; from specification int-abs%succ-01: ⊦ i + 1 ≤ j ↔ i < j; from specification int-abs%sub-le-01: ⊦ i ≤ j - i0 ↔ i + i0 ≤ j; from specification int-abs%add-in: ⊦ i + j = i + i0 ↔ j = i0; from specification int-basic2%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%Sub-def: ⊦ i + (j - i) = j; from specification int-abs