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