| # bits1 < n, # bits < n ⊦ sgn(bitsand(lastn(n, fillsgn(n, bits)), false ' + bits1)) = sgn(bitsand(bits, false ' + bits1)), bits = [] |
⊦ # bits ≤ n ∧ bits ≠ [] → fillsgn(n, bits) = mklist(bits.first, n - # bits) + bits
# bits ≤ n ∧ bits ≠ [], # bits1 < n, # bits < n ⊦ sgn(bitsand(lastn(n, mklist(bits.first, n - # bits) + bits), false ' + bits1)) = sgn(bitsand(bits, false ' + bits1)), bits = []
Used simplifier rules: ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < n → ¬ n < m; Used terms: bits, n