c%'#'=c c%s=s m@main=getLine>>=putStrLn.zipWith(%)(cycle"##..")>>m