14 lines
318 B
Haskell
14 lines
318 B
Haskell
{-# LANGUAGE StrictData #-}
|
|
{- | GameRooms contain information about given positions in the world
|
|
-}
|
|
module Dodge.GameRoom
|
|
where
|
|
import Geometry
|
|
|
|
data GameRoom = GameRoom
|
|
{ _grViewpoints :: [Point2]
|
|
, _grBound :: [Point2]
|
|
, _grDir :: Float -- ^ gives direction of room
|
|
, _grName :: String
|
|
}
|