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