| # int2bits(i) ≤ i→n(j), # int2bits(i) < i→n(j), 0 ≤ i, # int2bits(i) < n ⊦ bits2int(firstn(n, mklist(false, i→n(j)) + mklist(false, n - # int2bits(i)) + int2bits(i))) = bits2int(mklist(false, # int2bits(i))), j = 0 |
# 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
Used simplifier rules: ⊦ m < n → m ≤ n;% ⊦ bits2int(mklist(false, # int2bits(i))) = 0;