line-mode
push-b
1000
>
    space
    left-cons
    show-space
f3
    ( "\xe2\x94\x80" )
    tuck
m2
w( "\xe2\x94" "\x8c\x82\x94\x90\x82\x98" )
right-uncons
cartesian-product
3
chunks
swap
join
3
chunks
transpose
extract-array