2021-02-13 00:06:26 +00:00
|
|
|
{-# LANGUAGE TemplateHaskell #-}
|
|
|
|
|
|
2021-02-11 22:40:00 +00:00
|
|
|
module Player where
|
|
|
|
|
|
2021-02-13 00:06:26 +00:00
|
|
|
import Lens.Micro.TH (makeLenses)
|
|
|
|
|
|
|
|
|
|
data Player = Player
|
2021-02-14 13:32:24 +00:00
|
|
|
{ _pos :: (Int, Int)
|
2021-02-13 00:06:26 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
makeLenses ''Player
|
