| ¬ 1 < # bytes, 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) |
# 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)
Used simplifier rules: ⊦ # bytes = 0 ↔ bytes = [];% ⊦ 1 < m ↔ ¬(m = 0 ∨ m = 1);