Cleanup, fix damage code terminal bug

2025-08-20 15:59:22 +01:00
parent 9daa27ee8b
commit 4bf9ce59d5
12 changed files with 153 additions and 177 deletions
@@ -12,12 +12,7 @@ import Dodge.LevelGen.PlacementHelper
 import Dodge.LightSource
 import Geometry

-damageSensor ::
-    SensorType ->
-    Float ->
-    Maybe Int ->
-    PlacementSpot ->
-    Placement
+damageSensor :: SensorType -> Float -> Maybe Int -> PlacementSpot -> Placement
 damageSensor dt wdth mtrid ps = pContID ps (PutLS $ lsPosCol (V3 0 0 30) 0.1) $
    \lsid -> psPtJpl ps
        . PutUsingGenParams