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