Read Diagonally by henkma

main=interact$(0%).lines
x%(a:b)|length a>x=a!!x:(x+1)%b
_%[]=""
_%l=0%l

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

download

return to the top page