| 0 ≤ i0 +1, 0 ≤ j, ∀ j. 0 ≤ j ∧ 0 ≤ i0 → (i→n(i0) < i→n(j) ↔ abs(i0) < abs(j)) ⊦ i→n(i0 +1) < i→n(j) ↔ abs(i0 +1) < abs(j) |
~1 ≤ i0, 0 ≤ j, ∀ j0. 0 ≤ j0 ∧ 0 ≤ i0 → (i→n(i0) < i→n(j0) ↔ i0 < j0) ⊦ i→n(i0 + 1) < i→n(j) ↔ abs(i0 + 1) < j
Used simplifier rules: forward-le-01: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward) from specification int-abs%add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2% ⊦ (* j) ≤ i0 + (* j0) ↔ j - j0 ≤ i0; (s)% ⊦ 0 ≤ i → abs(i) = i; (s)% ⊦ i +1 = i + 1; (s)