| n = # fillsgn(n, bits), # bits0 + 1 < n, # bits0 < # bits, # bits < n, # bits0 < n ⊦ bits0 = [], bits = [], mklist(false, n) = mklist(mklist(false, # bits0).first, n - # bits0) + mklist(false, # bits0), bits0.first, true ∈ bits |
⊦ m ≠ 0 → (mklist(boolvar, m).first ↔ boolvar)
# bits0 ≠ 0, n = # fillsgn(n, bits), # bits0 + 1 < n, # bits0 < # bits, # bits < n, # bits0 < n ⊦ bits0 = [], bits = [], mklist(false, n) = mklist(false, n - # bits0) + mklist(false, # bits0), bits0.first, true ∈ bits
Used simplifier rules: ⊦ # bits = 0 ↔ bits = []; Used terms: # bits0, false