| j < 0 ∧ j0 < 0 ∧ abs(j0) < 2 ^ i ∧ 0 ≤ i, 0 < 2 ^ (i - 1) + j0, j0 < 0, j < 0, 0 < i, i < n→i(# int2bits(~ j) + i→n(i)), j * 2 ^ i + j0 < 0, 0 ≤ (j + 2 ^ (n→i(# int2bits(~ j) + i→n(i)) - i)) * 2 ^ i + j0, j + 2 ^ (n→i(# int2bits(~ j) + i→n(i)) - i) ≤ 0 ⊦ j0 = 0, sgn(uint2bits((j + 2 ^ (n→i(# int2bits(~ j) + i→n(i)) - i)) * 2 ^ i + j0).rest) = int2bits(j - 1) + fillsgn(i→n(i), int2bits(j0)), j * 2 ^ i + j0 = 0 |
0 < 2 ^ (i - 1) + j0, j0 < 0, j < 0, 0 < i, j * 2 ^ i + j0 < 0, 0 < 2 ^ i + j0, 0 ≤ i, 0 ≤ 2 ^ i * (2 ^ n→i(# int2bits(~ j)) + j) + j0, 2 ^ n→i(# int2bits(~ j)) + j ≤ 0 ⊦ j * 2 ^ i + j0 = 0, j0 = 0, sgn(uint2bits(2 ^ i * (2 ^ n→i(# int2bits(~ j)) + j) + j0).rest) = int2bits(j - 1) + fillsgn(i→n(i), int2bits(j0))
Used simplifier rules: int2bits-not-empty: ⊦ int2bits(j) ≠ [];% ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward)% ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward)% ⊦ j ≤ i ∧ i ≤ 0 → j ≤ 0; (forward)% ⊦ # bits = 0 ↔ bits = [];% ⊦ 0 < n ↔ n ≠ 0;%0 ≤ i ⊦ (* i) < n→i(n) ↔ i→n(i) < n;% ⊦ i < i + j ↔ 0 < j;% ⊦ ~ i < j ↔ 0 < j + i;% ⊦ i < 0 → abs(i) = ~ i;% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ i + j - i = j;% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ 0 < i → n→i(i→n(i)) = i;% ⊦ n→i(m + n) = n→i(m) + n→i(n);