{-# LANGUAGE TemplateHaskell #-} {-# LANGUAGE StrictData #-} module Dodge.Data.RadarSweep where import Dodge.Data.Object import Geometry.Data import Control.Lens data RadarSweep = RadarSweep { _rsPos :: Point2 , _rsRad :: Float , _rsObject :: Object , _rsTimer :: Int } makeLenses ''RadarSweep