main=interact(%1) l%x=take x l++min('\n':drop x(words l>>=id)%(x+1))l
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page