| mklist(true, # bits1) = bits1, true ∈ bits1 ⊦ bits2 + bits1 = [], bits0 = [], lastn(# bits1, fillsgn(# bits1, bitsand(sgn(bits1), bits0))) = lastn(# bits1, fillsgn(# bits1, bitsand(bits2 + bits1, bits0))) |
mklist(true, # bits1) = bits1, true ∈ mklist(true, # bits1) ⊦ bits2 + mklist(true, # bits1) = [], bits0 = [], lastn(# mklist(true, # bits1), fillsgn(# mklist(true, # bits1), bitsand(sgn(mklist(true, # bits1)), bits0))) = lastn(# mklist(true, # bits1), fillsgn(# mklist(true, # bits1), bitsand(bits2 + mklist(true, # bits1), bits0)))