| # bits = n0 * 8, n0 < n ⊦ bits = [], mklist(i2b(0), n - n0) = bits2bytes(mklist(false, n * 8 - n0 * 8)), n = n0, bits.first |
⊦ # bits % 8 = 0 ∧ 8 < # bits → bits2bytes(bits) = bits2bytes(firstn(8, bits)) + bits2bytes(restn(8, bits))
¬(# mklist(false, n * 8 - n0 * 8) % 8 = 0 ∧ 8 < # mklist(false, n * 8 - n0 * 8)), # bits = n0 * 8, n0 < n ⊦ bits = [], mklist(i2b(0), n - n0) = bits2bytes(mklist(false, n * 8 - n0 * 8)), n = n0, bits.first
# mklist(false, n * 8 - n0 * 8) % 8 = 0 ∧ 8 < # mklist(false, n * 8 - n0 * 8), # bits = n0 * 8, n0 < n ⊦ bits = [], mklist(i2b(0), n - n0) = bits2bytes(firstn(8, mklist(false, n * 8 - n0 * 8))) + bits2bytes(restn(8, mklist(false, n * 8 - n0 * 8))), n = n0, bits.first
Used terms: mklist(false, n * 8 - n0 * 8)