| 0 ≤ i, 0 ≤ i0 ⊦ bits2int(sublist(0, # int2bits(i), (mklist(false, i→n(i0)) + false ') + int2bits(i))) = bits2int(sublist(0, # int2bits(i / 2), mklist(int2bits(i / 2).first, i→n(i0)) + int2bits(i / 2))) |
0 ≤ i, 0 ≤ i0 ⊦ bits2int(sublist(0, # int2bits(i), (mklist(false, i→n(i0)) + false ') + int2bits(i))) = bits2int(sublist(0, # int2bits(i / 2), mklist(false, i→n(i0)) + int2bits(i / 2)))
Used simplifier rules: ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;%i0 ≠ 0, i0 < i ⊦ (* i) ≤ j → (* i0) < j;% ⊦ ¬ i ≤ j ↔ j < i;% ⊦ i + (* j) ≤ (* j0) ↔ i ≤ j0 - j;%0 < j ⊦ i / (* j) < 0 ↔ i + j ≤ 0;% ⊦ int2bits(j).first ↔ j < 0;