| i→n(i) < # int2bits(j), 0 < i ⊦ bits2int(bitsand(int2bits(j), int2bits(2 ^ i - 1))) = bits2uint(lastn(i→n(i), int2bits(j))), i→n(i) = # int2bits(j) |
i→n(i) < # int2bits(j), 0 < i ⊦ i→n(i) = # int2bits(j), bits2int(bitsand(int2bits(j), false ' + mklist(true, i→n(i)))) = bits2uint(lastn(i→n(i), int2bits(j)))
Used simplifier rules: 0 ≤ i ⊦ int2bits(2 ^ i - 1) = false ' + mklist(true, i→n(i));% ⊦ ¬ i ≤ j ↔ j < i;% ⊦ i < j → ¬ j < i;