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