| # bits0 < n, ∀ n, bits, bits1. # bits1 < # bits0 → true → bits = [] ∨ bits1 = [] ∨ fillsgn(n, bitsand(fillsgn(n, bits), bits1)) = fillsgn(n, bitsand(bits, bits1)) ⊦ bits0 = [], fillsgn(n, mklist(false, # bits0)) = mklist(false, n), bits0.first |
bits0 = boolvar + bits2, # bits0 < n, ∀ n, bits, bits1. # bits1 < # bits0 → true → bits = [] ∨ bits1 = [] ∨ fillsgn(n, bitsand(fillsgn(n, bits), bits1)) = fillsgn(n, bitsand(bits, bits1)) ⊦ bits0 = [], fillsgn(n, mklist(false, # bits0)) = mklist(false, n), boolvar
Used simplifier rules: bits ≠ [] ⊦ (boolvar ↔ bits.first) ∧ bits0 = bits.rest ↔ bits = boolvar + bits0; (elim) Used terms: bits0, boolvar, bits2