print this triangle by yuki

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).

To protect the system from spam, please input your favorite sport (hint: I believe its name must start with 'g', case insensitive)

download

return to the top page