| # bits = # bits1, mklist(true, # bits1) = bits1, false ∈ bits1, bits1.first ⊦ bits3 + bits = [], bits = lastn(# bits1, fillsgn(# bits1, bits3 + bitsand(bits, bits1))), bits1 = [] |
Used simplifier rules: ⊦ # mklist(boolvar, n) = n;% ⊦ mklist(boolvar, m) = [] ↔ m = 0;% ⊦ # bits = 0 ↔ bits = [];% ⊦ ¬ false ∈ mklist(true, n);