8 lines
167 B
Haskell
8 lines
167 B
Haskell
module Tank ( Tank(..)
|
|
) where
|
|
|
|
data Tank = Tank
|
|
{ posx :: !Float
|
|
, posy :: !Float
|
|
, dir :: !Float
|
|
} deriving Show
|