line-mode
right-uncons
inc
catenate #(list+elem)
min
odd
w( "smiley" "frowny" )
get