n :: IO ()
main = animate (InWindow "Expandiendo un circulo" (1800,820) (90,90))
               green animacion

a
main :: IO ()
main = animate (InWindow "Expandiendo un circulo" (1800,820) (90,90))
               green animacion
main = animate (InWindow "Expandiendo un circulo" (1800,820) (90,90))
               green animacion