| # bits = n + 1 + # bits1, # bits1 < # bits ⊦ bits = [], bitsand(bits, true ' + bits1) = (true ' + mklist(true, n)) + bits1, false ∈ bits |
# bits = n + 1 + # bits1 ∧ # bits1 < # bits, ∀ bits0, bits, n. # bits0 < # bits1 → # bits = n + 1 + # bits0 ∧ # bits0 < # bits → bits = [] ∨ bitsand(bits, true ' + bits0) = (true ' + mklist(true, n)) + bits0 ∨ false ∈ bits ⊦ bits = [] ∨ bitsand(bits, true ' + bits1) = (true ' + mklist(true, n)) + bits1 ∨ false ∈ bits
Used simplifier rules: <; (wellfounded) Used terms: # bits1