Cleanup

2022-06-18 00:18:18 +01:00
parent a7c03671d3
commit 6a095d3de6
12 changed files with 49 additions and 36 deletions
@@ -48,7 +48,7 @@ halfWidth w = _windowX w / 2
 halfHeight w = _windowY w / 2
 -- | A box of the size of the screen in screen centered coordinates
 screenBox :: Configuration -> [Point2]
-screenBox w = reverse $ rectNSWE hh (-hh) (-hw) hw
+screenBox w = rectNSWE hh (-hh) (-hw) hw
  where
    hw = halfWidth w
    hh = halfHeight w