| ∃ bits0, bits2. bits = bits0 + bits2 ∧ # bits2 = # bits1, 1 + # bits1 < # bits ⊦ ¬ boolvar ∨ true ∈ bits1 ↔ boolvar ∈ bitsor(bits, false ' + bits1), bits = [], true ∈ bits |
# bits0 = # bits1 ⊦ bits2 + bits0 = [], ¬ boolvar ∨ true ∈ bits1 ↔ boolvar ∈ bitsor(bits2 + bits0, false ' + bits1), # bits2 = 1, bits2 = [], true ∈ bits2, true ∈ bits0
Used simplifier rules: ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ # bits = 0 ↔ bits = [];% ⊦ 1 < m ↔ ¬(m = 0 ∨ m = 1);% ⊦ m + n < m + n0 ↔ n < n0;% ⊦ m < n → n ≠ 0;% ⊦ m < n → n ≠ 0; (forward)% ⊦ boolvar ∈ bits + bits0 ↔ ¬ ¬(boolvar ∈ bits ∨ boolvar ∈ bits0);% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ #(bits + bits0) = # bits + # bits0;