| (# int2bits(j % 2 ^ (i * 8)) + (i→n(i * 8) - # int2bits(j % 2 ^ (i * 8)))) % 8 = 0, 2 ^ (i * 8) ≤ j, 0 < i, # int2bits(j % 2 ^ (i * 8)) ≤ i→n(i * 8) ⊦ 0 ≤ j % 2 ^ (i * 8), i→n(i * 8) + 1 = # int2bits(j % 2 ^ (i * 8)), mklist(¬ 0 ≤ j % 2 ^ (i * 8), i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = [], bits2bytes(mklist(¬ 0 ≤ j % 2 ^ (i * 8), i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8))) = fix(i→n(i) + 1, bits2bytes(int2bits(j % 2 ^ (i * 8)))).rest |
(# int2bits(j % 2 ^ (i * 8)) + (i→n(i * 8) - # int2bits(j % 2 ^ (i * 8)))) % 8 = 0, 2 ^ (i * 8) ≤ j, 0 < i, # int2bits(j % 2 ^ (i * 8)) ≤ i→n(i * 8), j % 2 ^ (i * 8) < 0 ⊦ i→n(i * 8) + 1 = # int2bits(j % 2 ^ (i * 8)), mklist(true, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = [], bits2bytes(mklist(true, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8))) = fix(i→n(i) + 1, bits2bytes(int2bits(j % 2 ^ (i * 8)))).rest
Used simplifier rules: ⊦ j < i ∧ i ≤ 0 → j < 0; (forward)% ⊦ ¬ i ≤ j ↔ j < i;% ⊦ i * j = j * i;