main=putStr$'0':do(c,i)<-zip":;4759>61=?<3280"[1..];show(i*10^16`div`17)++'\n':do['1'..c];" "
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page