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