| # int2bits(j % 2 ^ (i * 8)) ≤ i→n(i * 8), i→n(i * 8) % 8 = 0, 2 ^ (i * 8) ≤ j, 0 < i, # int2bits(j % 2 ^ (i * 8)) ≤ i→n(i * 8), 0 ≤ j % 2 ^ (i * 8) ⊦ # int2bits(j % 2 ^ (i * 8)) = i→n(i * 8), i→n(i * 8) + 1 = # int2bits(j % 2 ^ (i * 8)), mklist(false, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = [], bits2bytes(mklist(false, 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 |
i→n(i * 8) % 8 = 0, # int2bits(j % 2 ^ (i * 8)) < i→n(i * 8), 0 < i, 2 ^ (i * 8) ≤ j, 0 ≤ j % 2 ^ (i * 8) ⊦ bits2bytes(mklist(false, 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, mklist(false, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = [], i→n(i * 8) + 1 = # int2bits(j % 2 ^ (i * 8)), # int2bits(j % 2 ^ (i * 8)) = i→n(i * 8), i = 0
Used simplifier rules: ⊦ i * j * j0 = (i * j) * j0;% ⊦ i * j = 0 ↔ i = 0 ∨ j = 0;% ⊦ i→n(i) = 0 ↔ i = 0;% ⊦ m < n → n ≠ 0; (forward)% ⊦ m ≠ n → (m ≤ n ↔ m < n);% ⊦ i * j = j * i;