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