main=interact$unlines.g 15.map(g 10).i(drop 10).map(\n->"# "!!(0^mod n 2)).i(`div`2).f i=iterate g=(reverse.).take f s|s>" #"=537399949|s>" #"=0x800010040d4b440|1>0=0x100202ff2000053bfcffbfe