| j < 0, j0 < 0, 0 < i, 2 ^ (i - 1) + j0 < 0, 0 < 2 ^ i + j0, 0 ≤ i, j * 2 ^ i + j0 < 0, (2 ^ n→i(# int2bits(~ j)) + j) * 2 ^ i + j0 < 0, 0 < 2 ^ n→i(# int2bits(~ j)) + j ⊦ sgn(int2bits((2 ^ n→i(# int2bits(~ j)) + j) * 2 ^ i + j0).rest) = int2bits(j - 1) + fillsgn(i→n(i), int2bits(j0).rest) |
⊦ 0 < i ∧ abs(j0) < j → ¬ i * j + j0 < 0
Used simplifier rules: ⊦ i + j + i0 = (i + j) + i0;% ⊦ i + j = j + i;% ⊦ ¬ i < j ↔ j ≤ i;% ⊦ i < j → (¬ ¬ j ≤ i ↔ false);% ⊦ i < 0 → abs(i) = ~ i;% ⊦ ~ i < j ↔ 0 < j + i; Used terms: j0, 2 ^ i, 2 ^ n→i(# int2bits(~ j)) + j