| ¬(¬ false ∈ bits1 ∧ # bits1 ≤ # bits ∧ bits1 ≠ []), mklist(true, # bits1) = bits1, # bits = # bits1 ⊦ bits = [], bits = lastn(# bits1, fillsgn(# bits1, bitsand(bits1, bits))), bits2 + bits1 = [], bits1 = [], bits2 = [], bits.first |
# bits = # bits1, mklist(true, # bits1) = bits1, false ∈ bits1 ⊦ bits2 = [], bits1 = [], bits2 + bits1 = [], bits = lastn(# bits1, fillsgn(# bits1, bitsand(bits1, bits))), bits = [], bits.first
Used simplifier rules: ⊦ m ≤ m;% ⊦ ¬ m < n ↔ n ≤ m;% ⊦ ¬ n < n;% ⊦ # bits = 0 ↔ bits = [];% ⊦ m < n → n ≠ 0; (forward)% ⊦ m < n ∧ n = n0 → m < n0; (forward)% ⊦ m < n ∧ m = n0 → n0 < n; (forward)% ⊦ ¬ m ≤ n ↔ n < m;