| int2bytes(i) ≠ [], i < 0, bytes2int(int2bytes(i)) + 2 ^ (8 * n→i(# int2bytes(i).rest)) < 0 ⊦ int2bytes(i).first = i2b(~1), n ≤ # int2bytes(i) ↔ ¬ 0 ≤ i + 2 ^ (8 * (n→i(n) - 1)), b2i(int2bytes(i).first) = ~1 |
i < 0, 2 ^ (8 * n→i(# int2bytes(i).rest)) + i < 0 ⊦ int2bytes(i).first = i2b(~1), n ≤ # int2bytes(i) ↔ ¬ 0 ≤ i + 2 ^ (8 * (n→i(n) - 1)), b2i(int2bytes(i).first) = ~1
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];%int2int: ⊦ bytes2int(int2bytes(i)) = i;% ⊦ j < i ∧ i ≤ 0 → j < 0; (forward)