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