( "LOLLIPOP" "OH" )
    show-space
t1
over
tuck
5
take
show-space
3
times #(list)
wrap-stack
dup2
dup
init
tail
left-uncons