| ⊦ n % 8 ≠ 0 → bits2bytes(mklist(true, n)) = mklist(i2b(~1), n / 8 + 1) |
⊦ n % 8 = 0, bits2bytes(mklist(true, n)) = i2b(~1) ' + mklist(i2b(~1), n / 8)
Used simplifier rules: ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ mklist(by, n) + by ' = by ' + mklist(by, n);% ⊦ mklist(by, 1) = by ';% ⊦ mklist(by, m + n) = mklist(by, m) + mklist(by, n);