| ¬(# restn(# bits % 8, bits) % 8 = 0 ∧ firstn(# bits % 8, bits) ≠ [] ∧ restn(# bits % 8, bits) ≠ []), 8 < # bits ⊦ # bits % 8 = 0, bits2bytes(firstn(# bits % 8, bits) + restn(# bits % 8, bits)) = bits2bytes(firstn(# bits % 8, bits)) + bits2bytes(restn(# bits % 8, bits)), bits = [] |
8 < # bits ⊦ # bits % 8 = 0, bits2bytes(firstn(# bits % 8, bits) + restn(# bits % 8, bits)) = bits2bytes(firstn(# bits % 8, bits)) + bits2bytes(restn(# bits % 8, bits)), bits = [], (# bits - # bits % 8) % 8 = 0 ∧ restn(# bits % 8, bits) ≠ []
Used simplifier rules: ⊦ firstn(n, bits) = [] ↔ n = 0;%n ≤ # bits ⊦ # restn(n, bits) = # bits - n;%n ≠ 0 ⊦ m % n ≤ m;