| mklist(i < 0, i→n(j)) + int2bits(i) ≠ [] ∧ # int2bits(i) ≠ 0, j < 32, 0 ≤ j ⊦ bits2int((mklist(i < 0, i→n(j)) + int2bits(i)).first ' + sublist(0, (# int2bits(i))-1, (mklist(i < 0, i→n(j)) + int2bits(i)).rest)) < 0 ↔ ¬ 0 ≤ i |
j < 32, 0 ≤ j ⊦ bits2int((mklist(i < 0, i→n(j)) + int2bits(i)).first ' + sublist(0, # int2bits(i) - 1, (mklist(i < 0, i→n(j)) + int2bits(i)).rest)) < 0 ↔ ¬ 0 ≤ i, mklist(¬ 0 ≤ i, i→n(j)) + int2bits(i) = []
Used simplifier rules: ⊦ ¬ i < j ↔ j ≤ i;% ⊦ int2bits(j) ≠ [];% ⊦ # bits = 0 ↔ bits = [];% ⊦ n -1 = n - 1;