| ⊦ bits2int(sublist(0, # int2bits(i), mklist(int2bits(i).first, i→n(j)) + int2bits(i))) = i >> abs(j) |
⊦ bits2int(sublist(0, # int2bits(i), mklist(¬ 0 ≤ i, i→n(j)) + int2bits(i))) = i >> abs(j)
Used simplifier rules: ⊦ ¬ i < j ↔ j ≤ i;% ⊦ int2bits(j).first ↔ j < 0;