16 lines
636 B
Haskell
16 lines
636 B
Haskell
module Types.StateData where
|
|
|
|
import Data.Matrix
|
|
|
|
import Types.ReachPoint
|
|
import Types.Map
|
|
import Types.ImgId
|
|
|
|
data StateData
|
|
= None
|
|
| MenuData
|
|
{ mapMat :: Matrix TileState
|
|
, initCoords :: (Int, Int)
|
|
, imgMat :: Matrix (Maybe ImgId)
|
|
, reachPoints :: [ReachPoint]
|
|
}
|