| i < ~1, i < 0 ⊦ j = 0, bits2int(sublist(0, #(int2bits((i - 1) / 2) + int2bits(i % 2)), mklist(true, i→n(j)) + int2bits((i - 1) / 2) + int2bits(i % 2))) = bits2int(sublist(0, # int2bits((i - 1) / 2), mklist(true, i→n(abs(j) - 1)) + int2bits((i - 1) / 2))) |
i < ~1, i < 0 ⊦ j = 0, bits2int(sublist(0, # int2bits((i - 1) / 2) + # int2bits(i % 2), mklist(true, i→n(j)) + int2bits((i - 1) / 2) + int2bits(i % 2))) = bits2int(sublist(0, # int2bits((i - 1) / 2), mklist(true, i→n(abs(j) - 1)) + int2bits((i - 1) / 2)))
Used simplifier rules: ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ #(bits + bits0) = # bits + # bits0;