| # bits ≤ n ∧ bits ≠ [], # bits ≤ m, m ≤ n, # bits ≤ n ⊦ lastn(m, mklist(bits.first, n - # bits) + bits) = lastn(m, mklist(bits.first, m - # bits) + bits), bits = [] |
# bits ≤ n, m ≤ n, # bits ≤ m ⊦ bits = [], lastn(m, mklist(bits.first, n - # bits) + bits) = lastn(m, mklist(bits.first, m - # bits) + bits)