| # bits ≤ 8 * (n - 1) ⊦ ¬ n ≤ # bits2bytes(bits), bits = [], n = 0, fix(n, bits2bytes(bits)) = bits2bytes(fillsgn(n * 8, bits)), ¬ n ≤ # bits2bytes(bits) ∧ bits.first, ¬ n ≤ # bits2bytes(bits) ∧ ¬ bits.first |
n ≤ # bits2bytes(bits), # bits ≤ 8 * (n - 1) ⊦ bits = [], n = 0, fix(n, bits2bytes(bits)) = bits2bytes(fillsgn(n * 8, bits))