| int2bits(j % 2 ^ (i * 8)) ≠ [] ∧ i→n(i) + 1 ≠ 0 ∧ # int2bits(j % 2 ^ (i * 8)) ≤ 8 * (i→n(i) + 1), # int2bits(j % 2 ^ (i * 8)) < 8 * i→n(i), j + 2 ^ (i * 8 - 1) < 0, j + 2 ^ (i * 8) ≤ 0, j + 2 ^ (i * 8) < i, j % 2 ^ (i * 8) < 0, 0 < i ⊦ 1 + 8 * i→n(i) = # int2bits(j % 2 ^ (i * 8)), mklist(true, 8 * i→n(i) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = [], j % 2 ^ (i * 8) = 0, bits2bytes(mklist(true, 8 * i→n(i) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8))) = bits2bytes(fillsgn((i→n(i) + 1) * 8, int2bits(j % 2 ^ (i * 8)))).rest, i = 0 |
# int2bits(j % 2 ^ (i * 8)) < 8 * i→n(i), j + 2 ^ (i * 8 - 1) < 0, j + 2 ^ (i * 8) ≤ 0, j + 2 ^ (i * 8) < i, j % 2 ^ (i * 8) < 0, 0 < i, # int2bits(j % 2 ^ (i * 8)) ≤ 8 * i→n(i) + 8 ⊦ i = 0, 1 + 8 * i→n(i) = # int2bits(j % 2 ^ (i * 8)), mklist(true, 8 * i→n(i) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = [], j % 2 ^ (i * 8) = 0, bits2bytes(mklist(true, 8 * i→n(i) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8))) = bits2bytes(fillsgn(8 * i→n(i) + 8, int2bits(j % 2 ^ (i * 8)))).rest
Used simplifier rules: ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ int2bits(j) ≠ [];% ⊦ m + 1 ≠ 0;% ⊦ m * n = n * m;% ⊦ m0 * m * n = (m0 * m) * n;% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m * (n + 1) = m * n + m;% ⊦ i * j = j * i;