| bytes = by + bytes1, bytes = by ', b2i(by) < 0, ∀ n, bytes0. # bytes0 < 1 → b2i(bytes0.first) < 0 → bytes2int(mklist(i2b(~1), n) + bytes0) = bytes2int(bytes0) ∨ bytes0 = [] ⊦ bytes = [], bytes2int(mklist(i2b(~1), n) + bytes) = bytes2int(bytes) |
b2i(by) < 0, ∀ n, bytes0. # bytes0 < 1 → b2i(bytes0.first) < 0 → bytes2int(mklist(i2b(~1), n) + bytes0) = bytes2int(bytes0) ∨ bytes0 = [] ⊦ bytes2int(mklist(i2b(~1), n) + by ') = b2i(by)
Used simplifier rules: bytes2int-one: ⊦ bytes2int(by ') = b2i(by);% ⊦ bytes + [] = bytes;% ⊦ j < i ∧ i ≤ 0 → j < 0; (forward)% ⊦ by ' + bytes ≠ [];% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ by ' = by0 ' + bytes ↔ by = by0 ∧ bytes = [];% ⊦ by + bytes = by ' + bytes;