haskell-snake-1.0.0: src/Game/HSnake/Board.hs

-- Board.hs -- board logic
module Game.HSnake.Board where

import Control.Lens

import Game.HSnake.Basic

data Board = Board {
     _xSize   :: Int,
     _ySize   :: Int
} deriving (Eq, Show)

makeLenses ''Board

initialBoard = Board numRectsX numRectsY