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