| n = # fillsgn(n, bits), mklist(true, # bits) = bits, true ∈ bits, # bits < n ⊦ ¬ false ∈ bits, bits = [], bits0 = [], lastn(n, fillsgn(n, bits0)) = lastn(n, fillsgn(n, bitsand(bits, bits0))), ¬ false ∈ bits ∧ ¬ # bits < # bits0 ∧ bits0.first, ¬ false ∈ bits ∧ ¬ # bits0 < # bits, ¬ false ∈ bits ∧ ¬ # bits < # bits0 ∧ ¬ bits0.first |
n = # fillsgn(n, bits), mklist(true, # bits) = bits, false ∈ bits, true ∈ bits, # bits < n ⊦ bits = [], bits0 = [], lastn(n, fillsgn(n, bits0)) = lastn(n, fillsgn(n, bitsand(bits, bits0)))