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