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