| int2bits(j0) = true ' + bits, j0 < 0, 0 < i, 2 ^ (i - 1) + j0 < 0, 0 ≤ j0 + 2 ^ i ⊦ bits = [], j0 = 0, sgn(bits) = sgn(false ' + fillsgn(i→n(i), bits)), ¬ fillsgn(i→n(i), bits).first ∧ (i ≠ 0 ∨ bits ≠ []) |
int2bits(j0) = true ' + bits, j0 < 0, 0 < i, 2 ^ (i - 1) + j0 < 0, 0 ≤ j0 + 2 ^ i, bits.first ⊦ bits = [], j0 = 0, sgn(bits) = sgn(false ' + fillsgn(i→n(i), bits))
Used simplifier rules: ⊦ bits ≠ [] → (fillsgn(n, bits).first ↔ bits.first);