| b2i((int2bytes(i >> 8) + i2b(i) ').first) < 0, # int2bytes(i >> 8) < n, 128 ≤ i, 0 ≤ i >> 8, 0 < i, 0 ≤ i, # int2bytes(i >> 8) + 1 < n ⊦ fillsgn(n, int2bytes(i >> 8) + i2b(i) ') = (mklist(i2b(0), n - 1 - # int2bytes(i >> 8)) + int2bytes(i >> 8)) + i2b(i) ', n = # int2bytes(i >> 8) + 1 |
⊦ bytes ≠ [] → (bytes + bytes0).first = bytes.first
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];%int2bytes-empty: ⊦ int2bytes(i) ≠ [];%bytes2int-first-lez: ⊦ b2i(int2bytes(i).first) < 0 ↔ i < 0;% ⊦ 0 ≤ i → ¬ i >> j < 0; Used terms: i2b(i) ', int2bytes(i >> 8)