| bits2int(lastn(8, bits)) ≤ 127, 8 < # bits, 0 ≤ bits2int(lastn(8, bits)), ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ sgn(bytes2bits(bits2bytes(bits0))) = sgn(bits0) ⊦ bits = [], true ' + byte2bits(i2b(bits2int(lastn(8, bits)))) = sgn(bits), false ∈ firstn(# bits - 8, bits), false ∈ bytes2bits(bits2bytes(firstn(# bits - 8, bits))) |
⊦ n ≤ # bits → firstn(# bits - n, bits) + lastn(n, bits) = bits
8 ≤ # bits → firstn(# bits - 8, bits) + lastn(8, bits) = bits, bits2int(lastn(8, bits)) ≤ 127, 8 < # bits, 0 ≤ bits2int(lastn(8, bits)), ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ sgn(bytes2bits(bits2bytes(bits0))) = sgn(bits0) ⊦ bits = [], true ' + byte2bits(i2b(bits2int(lastn(8, bits)))) = sgn(bits), false ∈ firstn(# bits - 8, bits), false ∈ bytes2bits(bits2bytes(firstn(# bits - 8, bits)))
Used terms: 8, bits