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