| bitsand(false ' + mklist(true, i→n(i)), sgn(bitsinvert(uint2bits(~ j)) +1)) = false ' + bits, j < i, 0 ≤ i, j < 0 ⊦ ¬ false ∈ mklist(true, i→n(i)) ∧ sgn(bitsinvert(uint2bits(~ j)) +1) ≠ [] ∧ sgn(bitsinvert(uint2bits(~ j)) +1).first, (j + 1) % 2 ^ i + 2 ^ i = 1 + bits2uint(bits) |
bitsand(false ' + mklist(true, i→n(i)), sgn(bitsinvert(uint2bits(~ j)) +1)) = false ' + bits, j < i, 0 ≤ i, j < 0 ⊦ (j + 1) % 2 ^ i + 2 ^ i = 1 + bits2uint(bits), sgn(bitsinvert(uint2bits(~ j)) +1).first
Used simplifier rules: ⊦ ¬ bits +1 ≠ [] ↔ false;% ⊦ sgn(bits) = [] ↔ bits = [];% ⊦ ¬ false ∈ mklist(true, n);