| 0 ≤ i ∧ 0 < j, 0 ≤ j * 2 ^ i, 0 ≤ i ⊦ j = 0, uint2bits(j) + mklist(false, i→n(i)) = int2bits(j) + mklist(false, i→n(i)) |
0 ≤ i, 0 < j, 0 ≤ 2 ^ i ⊦ j = 0, uint2bits(j) = int2bits(j)
Used simplifier rules: ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ 0 < i → (0 ≤ i * j ↔ 0 ≤ j);% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ bits + bits0 = bits1 + bits0 ↔ bits = bits1;