Wow by int-e (alt)

r=zipWith(+)(0:0:0:r)$[mod(7^i)$2^31-1|i<-[0,5..150]]++r;main=putStr[[' '..]!!read(show$r!!n`div`2`mod`2^31`mod`95)|n<-[313..1077]]

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

download

return to the top page