| # bits ≤ 8 * n ⊦ n = 0, bits = [], fix(n, bits2bytes(bits)) = bits2bytes(mklist(bits.first, n * 8 - # bits) + bits), ¬ n ≤ # bits2bytes(bits) ∧ bits.first, ¬ n ≤ # bits2bytes(bits) ∧ ¬ bits.first |
# bits ≤ 8 * n ⊦ ¬ n ≤ # bits2bytes(bits), n = 0, bits = [], fix(n, bits2bytes(bits)) = bits2bytes(mklist(bits.first, n * 8 - # bits) + bits), ¬ n ≤ # bits2bytes(bits) ∧ bits.first, ¬ n ≤ # bits2bytes(bits) ∧ ¬ bits.first
Used simplifier rules: ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < n → n ≠ 0;% ⊦ m < n → (n ≤ m ↔ false); Used formulas: ¬ n ≤ # bits2bytes(bits)