| ∀ bits1, bits0. # bits0 < # bits → true → bits0 = [] ∨ bitsor(bits0, true ' + bits1) = true ' + bits1 ∨ true ∈ bits0 ⊦ # bits = 1, bits1 = [], bits = [], bitsor(bits.butlast, true ' + bits1.butlast) + (bits.last ∨ bits1.last)' = true ' + bits1, true ∈ bits |
bits = bits2 + boolvar ', ∀ bits1, bits0. # bits0 < # bits → true → bits0 = [] ∨ bitsor(bits0, true ' + bits1) = true ' + bits1 ∨ true ∈ bits0 ⊦ # bits = 1, bits1 = [], bits = [], bitsor(bits2, true ' + bits1.butlast) + (boolvar ∨ bits1.last)' = true ' + bits1, true ∈ bits
Used simplifier rules: bits ≠ [] ⊦ (boolvar ↔ bits.last) ∧ bits0 = bits.butlast ↔ bits = bits0 + boolvar '; (elim) Used terms: bits, boolvar, bits2