| 8 ≠ 0 ∧ 8 ≤ # bits - 1, # bits2bytes(firstn(# bits - 8, bits)) = 1 + (# bits - 8 - 1) / 8, 8 < # bits, ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ # bits2bytes(bits0) = (# bits0 - 1) / 8 + 1 ⊦ bits = [], 1 + (# bits - 8 - 1) / 8 = (# bits - 1 - 8) / 8 + 1 |
# bits2bytes(firstn(# bits - 8, bits)) = 1 + (# bits - 8 - 1) / 8, 8 < # bits, 9 ≤ # bits, ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ # bits2bytes(bits0) = (# bits0 - 1) / 8 + 1 ⊦ bits = [], (# bits - 8 - 1) / 8 = (# bits - 1 - 8) / 8
Used simplifier rules: n0 ≤ n ⊦ m ≤ n - n0 ↔ m + n0 ≤ n;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < 1 ↔ m = 0;% ⊦ # bits = 0 ↔ bits = [];% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = m + n0 ↔ n = n0;