| # int2bytes(i >> 8) < n - 1 ∧ bytes2int(int2bytes(i >> 8)) < 0, # int2bytes(i >> 8) < n, # int2bytes(i >> 8) + 1 < n, i < ~128 ∨ 128 ≤ i ⊦ fillsgn(n, int2bytes(i >> 8) + i2b(i) ') = (mklist(i2b(~1), n - 1 - # int2bytes(i >> 8)) + int2bytes(i >> 8)) + i2b(i) ', n = # int2bytes(i >> 8) + 1 |
# int2bytes(i >> 8) < n, # int2bytes(i >> 8) + 1 < n, i < ~128, i >> 8 < 0, i < 0 ⊦ fillsgn(n, int2bytes(i >> 8) + i2b(i) ') = (mklist(i2b(~1), n - 1 - # int2bytes(i >> 8)) + int2bytes(i >> 8)) + i2b(i) ', n = # int2bytes(i >> 8) + 1
Used simplifier rules: int2int: ⊦ bytes2int(int2bytes(i)) = i;% ⊦ i < (* j) ∧ j < 0 → i < 0; (forward)%j0 ≠ 0, j < j0 ⊦ i < (* j) → i < (* j0);% ⊦ ¬ i ≤ j ↔ j < i;% ⊦ 0 ≤ i → ¬ i >> j < 0;% ⊦ i ≤ j ∧ 0 < i → 0 < j; (forward)% ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward)% ⊦ j < i ∧ i ≤ 0 → j < 0; (forward)% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;%n0 ≤ n ⊦ m < n - n0 ↔ m + n0 < n;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < 1 ↔ m = 0;% ⊦ m < n → n ≠ 0;