line-mode
push-a
words
sort #(list)
group
    head
m1
last
split
flatten
length
dec
8
logical-or
@6
tails
@8
empty-list
left-cons
cartesian-product
get