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