a="Quack, quack, quack, quack"
main=mapM putStrLn[a,a,a,"",a,a,a,"",a,a]