| (bits + bits0).first ∧ bits + bits0 ≠ [] ⊦ bits = [], bits2uint((false ' + bitsinvert(bits0))+1) + ~ bits2uint(bitsinvert(bits + bits0) +1) = 0, false ∈ bits |
bits.first ⊦ bits + bits0 = [], bits = [], bits2uint((false ' + bitsinvert(bits0))+1) = bits2uint((bitsinvert(bits) + bitsinvert(bits0))+1), false ∈ bits
Used simplifier rules: ⊦ bits ≠ [] → ((bits + bits0).first ↔ bits.first);% ⊦ i + 0 = i;% ⊦ i - j = i0 ↔ i = i0 + j;% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ i + ~ j = i - j;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ bitsinvert(bits + bits0) = bitsinvert(bits) + bitsinvert(bits0);