| i - 1 = i0 * 2 + j1 ∧ j1 ≤ 0 ∧ abs(j1) < 2 ∧ i0 ≤ 0 ∧ 0 < 2 ∧ i - 1 < 0, 0 < j, i < 0, j < 32, ∀ i, j0. i→n(j0) < i→n(j) → true → i < 0 ∧ 0 < j0 ∧ j0 < 32 → i i>> j0 = (i - (2 ^ j0 - 1)) / 2 ^ j0 ⊦ (i0 + 1 - 2 ^ (j - 1)) / 2 ^ (j - 1) = (i + 1 - 2 ^ j) / 2 ^ j, j = 1 |
0 < j, abs(j1) < 2, i0 < j, i0 ≤ 0, j1 < j, j1 ≤ 0, j < 32, i0 * 2 + j1 < ~1, i0 * 2 + j1 < 0, ∀ i, j0. i→n(j0) < i→n(j) → true → i < 0 ∧ 0 < j0 ∧ j0 < 32 → i i>> j0 = (i - (2 ^ j0 - 1)) / 2 ^ j0 ⊦ j = 1, (i0 + 1 - 2 ^ (j - 1)) / 2 ^ (j - 1) = (2 * (i0 + 1) + j1 - 2 ^ j) / 2 ^ j
Used simplifier rules: ⊦ i < (* j) ∧ j < 0 → i < 0; (forward)% ⊦ i + (* j) < (* j0) ↔ i < j0 - j;% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ i * j + i = i * (j + 1);% ⊦ j ≤ i ∧ i ≤ 0 → j ≤ 0; (forward)% ⊦ i ≤ j ∧ j < j0 → i < j0; (forward)% ⊦ i < 0 ∧ 0 ≤ j → i ≤ j;% ⊦ i < 1 ↔ i ≤ 0;% ⊦ i - j < i0 ↔ i < j + i0;% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ i - j = i0 ↔ i = i0 + j;