Snowfall by peryaudo

import Data.List
t=transpose;l=length
main=interact$unlines.t.x.map(concat.words).t.lines
x a=map(\y->replicate(maximum(map l a)-l y)' '++y)a

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page