| 0 ≤ b2i(bytes.first), ∀ n, bytes0. # bytes0 < # bytes → 0 ≤ b2i(bytes0.first) → bytes2int(mklist(i2b(0), n) + bytes0) = bytes2int(bytes0) ∨ bytes0 = [] ⊦ bytes = [], bytes2int(mklist(i2b(0), n) + bytes) = bytes2int(bytes.butlast) * 256 + band(b2i(bytes.last), 255), # bytes = 1 |
bytes = bytes1 + by ', 0 ≤ b2i(bytes.first), ∀ n, bytes0. # bytes0 < # bytes → 0 ≤ b2i(bytes0.first) → bytes2int(mklist(i2b(0), n) + bytes0) = bytes2int(bytes0) ∨ bytes0 = [] ⊦ bytes = [], bytes2int(mklist(i2b(0), n) + bytes) = bytes2int(bytes1) * 256 + band(b2i(by), 255), # bytes = 1
Used simplifier rules: bytes ≠ [] ⊦ by = bytes.last ∧ bytes0 = bytes.butlast ↔ bytes = bytes0 + by '; (elim) Used terms: bytes, by, bytes1