main=mapM(\n->putStrLn["05AF"!!mod(n#c)4|c<-[4,4,2,2,1,1]])[0..15] 6#2=1 n#x=div n x*2+div n 8
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page