| bits.last ∨ false ∈ bits.butlast ⊦ bits = [], false ∈ bits +1 |
⊦ 0 ≠ # bits ∧ bits.last → bits +1 = bits.butlast +1 + false '
Used simplifier rules: succ-zero-03: ⊦ bits ≠ [] ∧ ¬ bits.last → bits +1 = bits.butlast + true;% ⊦ bits + boolvar = bits + boolvar ';% ⊦ boolvar ∈ bits + bits0 ↔ ¬ ¬(boolvar ∈ bits ∨ boolvar ∈ bits0);% ⊦ boolvar ∈ boolvar0 ' ↔ boolvar ↔ boolvar0;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ # bits = 0 ↔ bits = []; Used terms: bits