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