| 0 ≤ bytes2int(int2bytes(i >> 8) + i2b(i) '), i < 0, i >> 8 < 0, i < ~128, # int2bytes(i >> 8) + 1 < n, # int2bytes(i >> 8) < n ⊦ n = # int2bytes(i >> 8) + 1, fillsgn(n, int2bytes(i >> 8) + i2b(i) ') = (mklist(i2b(~1), n - 1 - # int2bytes(i >> 8)) + int2bytes(i >> 8)) + i2b(i) ' |
⊦ 0 ≤ bytes2int(bytes) ↔ bytes = [] ∨ 0 ≤ b2i(bytes.first)
int2bytes(i >> 8) + i2b(i) ' = [] ∨ 0 ≤ b2i((int2bytes(i >> 8) + i2b(i) ').first), i < 0, i >> 8 < 0, i < ~128, # int2bytes(i >> 8) + 1 < n, # int2bytes(i >> 8) < n ⊦ n = # int2bytes(i >> 8) + 1, fillsgn(n, int2bytes(i >> 8) + i2b(i) ') = (mklist(i2b(~1), n - 1 - # int2bytes(i >> 8)) + int2bytes(i >> 8)) + i2b(i) '
Used terms: int2bytes(i >> 8) + i2b(i) '