| # 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) ⊦ 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 |
# int2bits(j % 2 ^ (i * 8)) = i→n(i * 8), # 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) ⊦ 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
# 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
Used formulas: # int2bits(j % 2 ^ (i * 8)) = i→n(i * 8)