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