| bits1 ≠ [] ∧ bits3 + bits ≠ [], # bits = # bits1 ⊦ bits3 = [], lastn(# bits1, fillsgn(# bits1, bitsand(bits3 + bits, bits1))) = lastn(# bits1, fillsgn(# bits1, bitsand(bits2 + bits1, bits3 + bits))), bits3 + bits = [], bits2 + bits1 = [], bits2 = [] |
# bits = # bits1 ⊦ bits2 + bits1 = [], bits2 = [], bits3 + bits = [], bits1 = [], bits3 = [], lastn(# bits1, fillsgn(# bits1, bitsand(bits3 + bits, bits1))) = lastn(# bits1, fillsgn(# bits1, bitsand(bits2, bits3) + bitsand(bits1, bits)))
Used simplifier rules: bitsand-app: ⊦ # bits = # bits1 ∧ bits0 ≠ [] ∧ bits2 ≠ [] ∧ bits ≠ [] → bitsand(bits0 + bits, bits2 + bits1) = bitsand(bits0, bits2) + bitsand(bits, bits1);% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;