| ∀ n, bits, bits1. # bits1 < # bits0 → true → bits = [] ∨ bits1 = [] ∨ fillsgn(n, bitsand(fillsgn(n, bits), bits1)) = fillsgn(n, bitsand(bits, bits1)) ⊦ bits0 = [], fillsgn(n, bitsand(fillsgn(n, false '), bits0)) = fillsgn(n, false ') |
⊦ 0 < n → fillsgn(n, boolvar ') = mklist(boolvar, n)
0 < n, ∀ n, bits, bits1. # bits1 < # bits0 → true → bits = [] ∨ bits1 = [] ∨ fillsgn(n, bitsand(fillsgn(n, bits), bits1)) = fillsgn(n, bitsand(bits, bits1)) ⊦ bits0 = [], fillsgn(n, bitsand(mklist(false, n), bits0)) = mklist(false, n)
Used simplifier rules: and-zero-02: ⊦ bits ≠ [] → bitsand(false ', bits) = false ';% ⊦ 0 < n ↔ n ≠ 0;% ⊦ fillsgn(0, bits) = bits;% ⊦ boolvar ' = boolvar0 ' ↔ boolvar ↔ boolvar0; Used terms: false, n