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