| j % 2 ^ (i * 8) = 0, 0 < i, j + 2 ^ (i * 8) < 0 ⊦ bits2bytes(int2bits(j / 2 ^ (i * 8)) + mklist(false, i→n(i * 8))) = int2bytes(j / 2 ^ (i * 8)) + fix(i→n(i) + 1, i2b(0) ').rest |
⊦ int2bytes(i) = bits2bytes(int2bits(i))
j % 2 ^ (i * 8) = 0, 0 < i, j + 2 ^ (i * 8) < 0 ⊦ bits2bytes(int2bits(j / 2 ^ (i * 8)) + mklist(false, i→n(i * 8))) = bits2bytes(int2bits(j / 2 ^ (i * 8))) + fix(i→n(i) + 1, i2b(0) ').rest
Used terms: j / 2 ^ (i * 8)