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