{-# LANGUAGE StrictData #-} {-# LANGUAGE TemplateHaskell #-} module Dodge.Data.ScreenPos where import Geometry.Data import Control.Lens data ScreenPos = ScreenPos { _spScreenOff :: Point2 , _spPixelOff :: Point2 } makeLenses ''ScreenPos