| ¬ 8 < # bits, ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ sgn(bytes2bits(bits2bytes(bits0))) = sgn(bits0) ⊦ sgn(bytes2bits(bits2bytes(bits))) = sgn(bits), bits = [] |
# bits ≤ 8, ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ sgn(bytes2bits(bits2bytes(bits0))) = sgn(bits0) ⊦ bits = [], sgn(byte2bits(i2b(bits2int(bits)))) = sgn(bits)
Used simplifier rules: bits2bytes-base: ⊦ # bits ≤ 8 → bits2bytes(bits) = i2b(bits2int(bits)) ';%bytes2bits-one: ⊦ bytes2bits(by ') = byte2bits(by);% ⊦ ¬ m < n ↔ n ≤ m;