Move main to allow for new executables

2021-08-11 17:54:48 +02:00
parent b74bb45a4c
commit 4bbe5d0cf1
64 changed files with 521 additions and 345 deletions
@@ -100,7 +100,7 @@ dropLight :: World -> World
 dropLight w = placeLS ls dec pos 0 w
  where --(rot, g) = randomR (-pi,pi) $ _randGen w
    (V2 x y) = _crPos (you w)
-    pos = (V3 x y 0)
+    pos = V3 x y 0
    ls = lightAt pos 0
    dec = onLayer PtLayer $ color white $ circleSolid 8