| 31 = # int2bits(~128) + n, 32 = n + # int2bits(128), 30 = n0 + n, i2b(bits2uint(firstn(# int2bits(~128), int2bits(128)))) = i2b(bits2uint(true ' + firstn(n0, int2bits(~128))) + 2 ^ (1 + n→i(n0)) * bits2uint(mklist(true, n))), n ≤ 31, # int2bits(128) ≤ 32, # int2bits(~128) ≤ 32, n ≤ 32, n ≤ 30 ⊦ |
i < 0 ⊦ int2bits((* i)) = sgn(bitsinvert(uint2bits(abs(i))) +1)
~128 < 0, 31 = # sgn(bitsinvert(uint2bits(abs(~128))) +1) + n, 32 = n + # int2bits(128), 30 = n0 + n, i2b(bits2uint(firstn(# sgn(bitsinvert(uint2bits(abs(~128))) +1), int2bits(128)))) = i2b(bits2uint(true ' + firstn(n0, sgn(bitsinvert(uint2bits(abs(~128))) +1))) + 2 ^ (1 + n→i(n0)) * bits2uint(mklist(true, n))), n ≤ 31, # int2bits(128) ≤ 32, # sgn(bitsinvert(uint2bits(abs(~128))) +1) ≤ 32, n ≤ 32, n ≤ 30 ⊦
Used terms: ~128