i%n=g$i`divMod`n where g(d,m)|d<1=c|0<1=d%n++c where c|m>9=[toEnum$m+87]|0<1=show m main=mapM putStrLn[unwords[i%n|n<-[2..i]]|i<-[2..63]]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page