| # bits = m * 8 + n0, # bits2bytes(bits) < n, m * 8 + n0 < 8 * n, n0 < 8, m < n ⊦ mklist(i2b(0), n - # bits2bytes(bits)) + bits2bytes(bits) = bits2bytes(mklist(false, n * 8 - m * 8 + n0) + bits), bits = [], n * 8 = m * 8 + n0, n0 = 0, bits.first |
n * 8 - m * 8 + n0 = (n - 1 - m) * 8 + (8 - n0), # bits = m * 8 + n0, # bits2bytes(bits) < n, m * 8 + n0 < 8 * n, n0 < 8, m < n ⊦ mklist(i2b(0), n - # bits2bytes(bits)) + bits2bytes(bits) = bits2bytes(mklist(false, n * 8 - m * 8 + n0) + bits), bits = [], n * 8 = m * 8 + n0, n0 = 0, bits.first
# bits = m * 8 + n0, # bits2bytes(bits) < n, m * 8 + n0 < 8 * n, n0 < 8, m < n ⊦ n * 8 - m * 8 + n0 = (n - 1 - m) * 8 + (8 - n0), mklist(i2b(0), n - # bits2bytes(bits)) + bits2bytes(bits) = bits2bytes(mklist(false, n * 8 - m * 8 + n0) + bits), bits = [], n * 8 = m * 8 + n0, n0 = 0, bits.first
Used formulas: n * 8 - m * 8 + n0 = (n - 1 - m) * 8 + (8 - n0)