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