Triangular Text by notogawa

main=interact(1#)
n#s|n<5^5=take n s++'\n':(n+1)#drop n[x|x<-s,' '<x]

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

download

return to the top page