main=mapM putStrLn[tail$s>>=f.show.(y*)|y<-s] f n=([length n..3]>>" ")++n s=[1..12]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page