| # mklist(false, n) ≤ 8, n % 8 = 0, n ≤ 8, ∀ n0. n0 < n → n0 % 8 = 0 → n0 = 0 ∨ bits2bytes(mklist(false, n0)) = mklist(i2b(0), n0 / 8) ⊦ i2b(bits2int(mklist(false, n))) ' = mklist(i2b(0), n / 8), n = 0 |
n % 8 = 0, n ≤ 8, ∀ n0. n0 < n → n0 % 8 = 0 → n0 = 0 ∨ bits2bytes(mklist(false, n0)) = mklist(i2b(0), n0 / 8) ⊦ n = 0, n / 8 = 1
Used simplifier rules: ⊦ # mklist(boolvar, n) = n;% ⊦ mklist(by, n) = by ' ↔ n = 1;% ⊦ m ≠ 0 → bits2int(mklist(false, m)) = 0;