| ¬(# bits ≤ m ∧ bits ≠ []), m ≤ n ⊦ bits = [], lastn(m, fillsgn(n, bits)) = lastn(m, fillsgn(m, bits)) |
m < # bits, m ≤ n ⊦ lastn(m, fillsgn(n, bits)) = lastn(m, bits), bits = []
Used simplifier rules: fill-lastn: ⊦ n < # bits → lastn(n, fillsgn(n, bits)) = lastn(n, bits);% ⊦ # bits = 0 ↔ bits = [];% ⊦ m < n → n ≠ 0; (forward)% ⊦ ¬ m ≤ n ↔ n < m;