| ∀ bytes1. # bytes1 < #((by0 + bytes) + by ') → bytes2bits(bytes1) ≠ [] → bytes1 = [] ∨ b2i(bytes1.first) = 0 ∨ b2i(bytes1.first) = ~1 ∨ bits2bytes(sgn(bytes2bits(bytes1))) = bytes1 ⊦ b2i(by0) = ~1, b2i(by0) = 0, bits2bytes(sgn(byte2bits(by0) + bytes2bits(bytes))) + i2b(bits2int(lastn(8, sgn(byte2bits(by0) + bytes2bits(bytes)) + byte2bits(by)))) ' = (by0 ' + bytes) + by ', ¬ false ∈ byte2bits(by0) ∧ ¬ false ∈ bytes2bits(bytes), ¬ true ∈ byte2bits(by0) ∧ ¬ true ∈ bytes2bits(bytes) |
⊦ n = # bits → lastn(n, bits0 + bits) = bits
8 = # byte2bits(by), ∀ bytes1. # bytes1 < #((by0 + bytes) + by ') → bytes2bits(bytes1) ≠ [] → bytes1 = [] ∨ b2i(bytes1.first) = 0 ∨ b2i(bytes1.first) = ~1 ∨ bits2bytes(sgn(bytes2bits(bytes1))) = bytes1 ⊦ b2i(by0) = ~1, b2i(by0) = 0, bits2bytes(sgn(byte2bits(by0) + bytes2bits(bytes))) + i2b(bits2int(byte2bits(by))) ' = (by0 ' + bytes) + by ', ¬ false ∈ byte2bits(by0) ∧ ¬ false ∈ bytes2bits(bytes), ¬ true ∈ byte2bits(by0) ∧ ¬ true ∈ bytes2bits(bytes)
Used simplifier rules: byte2bits-length: ⊦ # byte2bits(by) = 8; Used terms: byte2bits(by), sgn(byte2bits(by0) + bytes2bits(bytes)), 8