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