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