diff --git a/GOL/Space.hs b/GOL/Space.hs new file mode 100644 index 0000000..52a7fa7 --- /dev/null +++ b/GOL/Space.hs @@ -0,0 +1,9 @@ +module GOL.Space where + +import Data.Functor.Rep + +class (Representable f, Rep f ~ s) => Space s f where + neighbors :: s -> [s] + +class (Space (Int, Int) f) => DisplayableSpace f where + size :: (Int, Int) \ No newline at end of file diff --git a/conways-game-of-life.cabal b/conways-game-of-life.cabal index 47c6008..af5e877 100644 --- a/conways-game-of-life.cabal +++ b/conways-game-of-life.cabal @@ -7,7 +7,9 @@ build-type: Simple cabal-version: >= 1.8 executable main - build-depends: base, - comonad, - Yampa - main-is: Main.hs \ No newline at end of file + main-is: Main.hs + build-depends: base, + comonad, + Yampa, + adjunctions + default-extensions: MultiParamTypeClasses \ No newline at end of file