| j % 2 ^ i = 0, j + 2 ^ i < i, j + 2 ^ i ≤ 0, 0 < i ⊦ int2bits(j) = int2bits(j / 2 ^ i) + mklist(false, i→n(i)) |
j ≠ 0 ⊦ i % j = 0 ↔ (∃ j0. i = j0 * j)
2 ^ i ≠ 0, ∃ j0. j = j0 * 2 ^ i, j + 2 ^ i < i, j + 2 ^ i ≤ 0, 0 < i ⊦ int2bits(j) = int2bits(j / 2 ^ i) + mklist(false, i→n(i))
Used simplifier rules: ⊦ 0 < j → (i ^ j = 0 ↔ i = 0); Used terms: 2 ^ i, j