| # bits ≤ m ∧ bits ≠ [], m ≤ n ⊦ bits = [], lastn(m, fillsgn(n, bits)) = lastn(m, mklist(bits.first, m - # bits) + bits) |
# bits ≤ m, m ≤ n, # bits ≤ n ⊦ lastn(m, fillsgn(n, bits)) = lastn(m, mklist(bits.first, m - # bits) + bits), bits = []
Used simplifier rules: ⊦ n ≤ n0 ∧ n0 ≤ n1 → n ≤ n1; (forward)