| ((8 - n0) + # bits) % 8 = 0, # bits = m * 8 + n0, m < n, # bits ≤ 8 * (n - 1), # bits / 8 + 1 < n, bits.first, n0 < 8 ⊦ # bits % 8 = 0, n - 1 - m = 0, mklist(true, 8 - n0) + bits = [], n0 = 0, n * 8 = # bits, mklist(i2b(~1), n - # bits / 8 + 1) + bits2bytes(bits) = bits2bytes(mklist(true, (n - 1 - m) * 8)) + bits2bytes(mklist(true, 8 - n0) + bits), bits = [] |
((8 - n0) + m * 8 + n0) % 8 = 0, # bits = m * 8 + n0, m < n, m * 8 + n0 ≤ 8 * (n - 1), (m * 8 + n0) / 8 + 1 < n, bits.first, n0 < 8 ⊦ (m * 8 + n0) % 8 = 0, n - 1 - m = 0, mklist(true, 8 - n0) + bits = [], n0 = 0, n * 8 = m * 8 + n0, mklist(i2b(~1), n - (m * 8 + n0) / 8 + 1) + bits2bytes(bits) = bits2bytes(mklist(true, (n - 1 - m) * 8)) + bits2bytes(mklist(true, 8 - n0) + bits), bits = []