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