| mklist(false, i→n(j)) + mklist(false, n - # int2bits(i)) + int2bits(i) = mklist(false, i→n(j) + (n - # int2bits(i))) + int2bits(i), # int2bits(i) < i→n(j), 0 ≤ i, # int2bits(i) < n ⊦ j = 0, bits2int(firstn(n, mklist(false, i→n(j)) + mklist(false, n - # int2bits(i)) + int2bits(i))) = 0 |
# int2bits(i) < i→n(j), 0 ≤ i, # int2bits(i) < n ⊦ j = 0, bits2int(firstn(n, mklist(false, i→n(j) + (n - # int2bits(i))) + int2bits(i))) = 0