| bitsinvert(int2bits(j0)) ≠ [], int2bits(j0) = false ' + bitsinvert(bits), 0 < j, j0 < 2 ^ i, 0 ≤ i, 0 ≤ j0, 0 < 2 ^ i, 0 ≤ j, false ∈ int2bits(j0), # int2bits(j0) ≤ i→n(i) ⊦ bitsinvert(uint2bits(j)) + mklist(true, i→n(i)) = [], 2 ^ n→i(# fillsgn(i→n(i), bitsinvert(int2bits(j0)))) * j + bits2uint(fillsgn(i→n(i), bitsinvert(bitsinvert(int2bits(j0))))) = j * 2 ^ i + j0, fillsgn(i→n(i), bitsinvert(int2bits(j0))) = [] |
int2bits(j0) = false ' + bitsinvert(bits), 0 < j, j0 < 2 ^ i, 0 ≤ i, 0 ≤ j0, 0 < 2 ^ i, 0 ≤ j, false ∈ int2bits(j0), # int2bits(j0) ≤ i→n(i) ⊦ fillsgn(i→n(i), bitsinvert(int2bits(j0))) = [], bitsinvert(uint2bits(j)) + mklist(true, i→n(i)) = [], bits2uint(fillsgn(i→n(i), int2bits(j0))) + 2 ^ n→i(# fillsgn(i→n(i), bitsinvert(int2bits(j0)))) * j = j * 2 ^ i + j0
Used simplifier rules: ⊦ int2bits(j) ≠ [];% ⊦ bitsinvert(bits) = [] ↔ bits = [];% ⊦ bitsinvert(bitsinvert(bits)) = bits;