push-b
times #(list)
push-b
dec
rrange
enumerate
    smallest
dm1
dup
1
itemize
split
unwords
show-space
cartesian-product
    >
dm1
swap
        show-space
        last
    f2
b2
zipwith