| 1 < # bytes, b2i(bytes.first) < 0, ∀ n, bytes0. # bytes0 < # bytes → b2i(bytes0.first) < 0 → bytes2int(mklist(i2b(~1), n) + bytes0) = bytes2int(bytes0) ∨ bytes0 = [] ⊦ bytes = [], bytes2int(mklist(i2b(~1), n) + bytes) = bytes2int(bytes.butlast) * 256 + band(b2i(bytes.last), 255) |
b2i(bytes.first) < 0, ∀ n, bytes0. # bytes0 < # bytes → b2i(bytes0.first) < 0 → bytes2int(mklist(i2b(~1), n) + bytes0) = bytes2int(bytes0) ∨ bytes0 = [] ⊦ bytes = [], bytes2int(mklist(i2b(~1), n) + bytes) = bytes2int(bytes.butlast) * 256 + band(b2i(bytes.last), 255), # bytes = 1
Used simplifier rules: ⊦ # bytes = 0 ↔ bytes = [];% ⊦ 1 < m ↔ ¬(m = 0 ∨ m = 1);