main=mapM putStrLn$words$do x<-"000 00A 0A0 0AA A00 A0A A50 AAA 555 55F 5F5 5FF F55 F5F FF5 FFF";[x,x]