| mklist(true, # bits1) = bits1 ⊦ bits2 + bits1 = [], bits0 = [], lastn(# bits1, fillsgn(# bits1, bits0)) = lastn(# bits1, fillsgn(# bits1, bitsand(bits2 + bits1, bits0))), bits1 = [] |
⊦ n ≤ # bits → fillsgn(n, bits) = bits
¬ # bits1 ≤ # bits0, mklist(true, # bits1) = bits1 ⊦ bits2 + bits1 = [], bits0 = [], lastn(# bits1, fillsgn(# bits1, bits0)) = lastn(# bits1, fillsgn(# bits1, bitsand(bits2 + bits1, bits0))), bits1 = []
# bits1 ≤ # bits0, mklist(true, # bits1) = bits1 ⊦ bits2 + bits1 = [], bits0 = [], lastn(# bits1, bits0) = lastn(# bits1, fillsgn(# bits1, bitsand(bits2 + bits1, bits0))), bits1 = []
Used terms: bits0, # bits1