| bits2bytes(int2bits(i)) = i2b(~1) ', 8 < # int2bits(i) ⊦ i = ~1 |
⊦ 8 < # bits → bits2bytes(bits) = bits2bytes(firstn(# bits - 8, bits)) + i2b(bits2int(lastn(8, bits)))
Used simplifier rules: bits2bytes-empty: ⊦ bits2bytes(bits) ≠ [];% ⊦ bytes + by = bytes + by ';% ⊦ by ' = bytes + by0 ' ↔ by = by0 ∧ bytes = [];% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1; Used terms: int2bits(i)