diff --git a/Main.hs b/Main.hs index e2edeed..b13cd4c 100644 --- a/Main.hs +++ b/Main.hs @@ -7,7 +7,12 @@ import Graphics.Gloss import Graphics.GlossUtils (playYampa) space :: ToroidalSpace Bool -space = tabulate (\(x,y) -> (x + y `mod` 5) * 10 + x - y > 30) +space = tabulate (\(x, y) -> (x + y `mod` 5) * 10 + x - y > 30) main :: IO () -main = playYampa (InWindow "a" (200, 200) (10, 10)) black 30 (run space) \ No newline at end of file +main = + playYampa + (InWindow "Conway's Game of Life" (200, 200) (10, 10)) + black + 30 + (run space) \ No newline at end of file diff --git a/conways-game-of-life.cabal b/conways-game-of-life.cabal index d15a9fb..3cc53a9 100644 --- a/conways-game-of-life.cabal +++ b/conways-game-of-life.cabal @@ -6,6 +6,16 @@ license: MIT build-type: Simple cabal-version: >= 1.8 +library + build-depends: base, + vector, + comonad, + distributive, + adjunctions + exposed-modules: GOL.Rule, + GOL.Space, + GOL.Engine + executable gol main-is: Main.hs other-modules: GOL.Rule,