main=putStr$[-256..256]>>=f;f n|t<-mod n 2=" #"!!t:take 63(f$div(3^t*n)2)++"|\n"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page