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