| # bits1 = # bitsand(bits1, true ' + bits), # bits < # bits1 ⊦ bits1 = [], bits2 = [], bits2 + bits1 = [], bitsand(bits1, true ' + bits) = lastn(# bits1, fillsgn(# bits1, bits2 + bitsand(bits1, true ' + bits))) |
⊦ n ≤ # bits → fillsgn(n, bits) = bits
Used simplifier rules: ⊦ n = # bits → lastn(n, bits0 + bits) = bits;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < n ∧ n = n0 → m < n0; (forward)% ⊦ ¬ m + n < m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = n + m; Used terms: bits2 + bitsand(bits1, true ' + bits), # bits1