| 8 < # bits, ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ # bits2bytes(bits0) = (# bits0 - 1) / 8 + 1 ⊦ bits = [], # bits2bytes(bits) = (# bits - 1) / 8 + 1 |
⊦ 8 < # bits → bits2bytes(bits) = bits2bytes(firstn(# bits - 8, bits)) + i2b(bits2int(lastn(8, bits)))
8 < # bits, 8 < # bits, ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ # bits2bytes(bits0) = (# bits0 - 1) / 8 + 1 ⊦ bits = [], #(bits2bytes(firstn(# bits - 8, bits)) + i2b(bits2int(lastn(8, bits)))) = (# bits - 1) / 8 + 1
Used terms: bits