Add file

2023-05-10 01:45:29 +01:00
parent cd42e29012
commit f569f3f173
2 changed files with 31 additions and 0 deletions
@@ -0,0 +1,13 @@
+{-# LANGUAGE StrictData #-}
+{-# LANGUAGE TemplateHaskell #-}
+module Dodge.Data.ScreenPos
+    where
+
+import Geometry.Data
+import Control.Lens
+
+data ScreenPos = ScreenPos
+    { _spScreenOff :: Point2
+    , _spPixelOff :: Point2
+    }
+makeLenses ''ScreenPos