| j = 1, 0 < j, j0 < 0, 0 < i, 0 ≤ j0 + 2 ^ (i - 1) ⊦ uint2bits(j * 2 ^ i + j0) = uint2bits(j - 1) + fillsgn(i→n(i), int2bits(j0)) |
j0 < 0, 0 < i, 0 ≤ j0 + 2 ^ (i - 1) ⊦ uint2bits(2 ^ i + j0) = false ' + fillsgn(i→n(i), int2bits(j0))
Used simplifier rules: uint2bits-zero: ⊦ uint2bits(0) = false ';% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ 1 * i = i;