| # bits % 8 = 0 ∧ bits ≠ [], n ≤ # bits / 8, # bits ≤ 8 * n ⊦ n = 0, bits = [], fix(n, bits2bytes(bits)) = bits2bytes(mklist(bits.first, n * 8 - # bits) + bits) |
# bits % 8 = 0, # bits ≤ 8 * n, n ≤ # bits / 8 ⊦ bits = [], fix(n, bits2bytes(bits)) = bits2bytes(mklist(bits.first, n * 8 - # bits) + bits), n = 0