init
reverse
2
chunks
sort #(list)
empty-list
swap
m:
    last
    lowercase-alphabet
    index
    2dup
    drop
    length
        new-line
        empty-list
        rot
    f3
    ljust
    "#"
    catenate #(list+list)