| # int2bytes(i) ≤ i→n(j) ⊦ i >> 8 * j = bytes2int(firstn(# int2bytes(i), fillsgn(i→n(j) + # int2bytes(i), int2bytes(i)))) |
⊦ # bytes < n ∧ bytes2int(bytes) < 0 → fillsgn(n, bytes) = mklist(i2b(~1), n - # bytes) + bytes
¬(# int2bytes(i) < i→n(j) + # int2bytes(i) ∧ bytes2int(int2bytes(i)) < 0), # int2bytes(i) ≤ i→n(j) ⊦ i >> 8 * j = bytes2int(firstn(# int2bytes(i), fillsgn(i→n(j) + # int2bytes(i), int2bytes(i))))
# int2bytes(i) < i→n(j) + # int2bytes(i) ∧ bytes2int(int2bytes(i)) < 0, # int2bytes(i) ≤ i→n(j) ⊦ i >> 8 * j = bytes2int(firstn(# int2bytes(i), mklist(i2b(~1), i→n(j) + # int2bytes(i) - # int2bytes(i)) + int2bytes(i)))
Used terms: int2bytes(i), i→n(j) + # int2bytes(i)