| ~128 ≤ bits2int(lastn(8, bits)) ∧ bits2int(lastn(8, bits)) ≤ 127, firstn(# bits - 8, bits) + lastn(8, bits) = bits, 8 < # bits, 0 ≤ bits2int(lastn(8, bits)), ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ sgn(bytes2bits(bits2bytes(bits0))) = sgn(bits0) ⊦ bits = [], sgn(false ' + byte2bits(i2b(bits2int(lastn(8, bits))))) = sgn(false ' + lastn(8, bits)), true ∈ bytes2bits(bits2bytes(firstn(# bits - 8, bits))), true ∈ firstn(# 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 = [], sgn(false ' + byte2bits(i2b(bits2int(lastn(8, bits))))) = sgn(false ' + lastn(8, bits)), true ∈ bytes2bits(bits2bytes(firstn(# bits - 8, bits))), true ∈ firstn(# bits - 8, bits)
Used simplifier rules: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward)% ⊦ j ≤ j0 ∧ j0 ≤ j1 → j ≤ j1; (forward)%i0 ≠ 0, i0 ≤ i ⊦ (* i) ≤ j → (* i0) ≤ j;