| int2bits(j0) = boolvar + bits ∧ int2bits(j0) ≠ [], bits = [], j0 < 0, 0 < i, 2 ^ (i - 1) + j0 < 0, 0 ≤ j0 + 2 ^ i ⊦ i = 0, mklist(false, i→n(i)).first |
int2bits(j0) = boolvar ', j0 < 0, 0 < i, 2 ^ (i - 1) + j0 < 0, 0 ≤ j0 + 2 ^ i ⊦ i = 0, mklist(false, i→n(i)).first
Used simplifier rules: int2bits-not-empty: ⊦ int2bits(j) ≠ [];% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ bits + [] = bits;% ⊦ boolvar + bits = boolvar ' + bits;