| int2bits(i % 2).butlast = [], abs(j) = 1, i < ~1, i < 0 ⊦ int2bits((i - 1) / 2) + int2bits(i % 2) = [], j = 0, bits2int(true ' + int2bits((i - 1) / 2)) = (i - 1) / 2 |
⊦ i < 0 → bits2int(true ' + int2bits(i)) = i
Used simplifier rules: 0 < j ⊦ i / (* j) < 0 ↔ i + j ≤ 0;% ⊦ i + (j - i0) = i + j - i0;% ⊦ (* i) + i0 - (* j) = (i - j) + i0;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ i + j = j + i;% ⊦ i + (* j) ≤ (* j0) ↔ i ≤ j0 - j;% ⊦ i ≤ ~1 ↔ i < 0;% ⊦ ¬ i < j ↔ j ≤ i;% ⊦ i < j → (¬ ¬ j ≤ i ↔ false); Used terms: (i - 1) / 2