| # int2bits(j) ≤ i→n(i) ∧ int2bits(j) ≠ [], 0 ≤ j, j < 2 ^ (i - 1), 0 < i ⊦ bits2int(lastn(i→n(i), mklist(int2bits(j).first, i→n(i) - # int2bits(j)) + int2bits(j))) = j |
# int2bits(j) ≤ i→n(i), 0 ≤ j, j < 2 ^ (i - 1), 0 < i ⊦ bits2int(lastn(i→n(i), mklist(false, i→n(i) - # int2bits(j)) + int2bits(j))) = j
Used simplifier rules: ⊦ int2bits(j) ≠ [];% ⊦ i ≤ 0 ∧ 0 ≤ j → i ≤ j;% ⊦ ¬ i < j ↔ j ≤ i;% ⊦ int2bits(j).first ↔ j < 0;