| ⊦ (# bits0)-1 ≤ n ∧ ¬ bits0.first ∧ n ≠ 0 ∧ bits ≠ [] ∧ bits0 ≠ [] → sgn(bitsand(lastn(n, fillsgn(n, bits)), bits0)) = sgn(bitsand(bits, bits0)) |
# bits0 ≤ n + 1 ⊦ sgn(bitsand(lastn(n, fillsgn(n, bits)), bits0)) = sgn(bitsand(bits, bits0)), bits0 = [], bits = [], n = 0, bits0.first
Used simplifier rules: n0 ≤ n ⊦ n - n0 ≤ m ↔ n ≤ m + n0;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < 1 ↔ m = 0;% ⊦ # bits = 0 ↔ bits = [];% ⊦ n -1 = n - 1;