| n ≤ 8 ⊦ n % 8 = 0, bits2bytes(mklist(true, n)) = i2b(~1) ' + mklist(i2b(~1), n / 8) |
⊦ # bits ≤ 8 → bits2bytes(bits) = i2b(bits2int(bits)) '
# mklist(true, n) ≤ 8, n ≤ 8 ⊦ n % 8 = 0, i2b(bits2int(mklist(true, n))) ' = i2b(~1) ' + mklist(i2b(~1), n / 8)
Used simplifier rules: ⊦ # mklist(boolvar, n) = n;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m ≤ n → (n < m ↔ false); Used terms: mklist(true, n)