Cleanup targeting

2023-01-05 11:01:12 +00:00
parent c48a553967
commit 0302685053
24 changed files with 66 additions and 95 deletions
@@ -13,7 +13,7 @@ import Geometry.Data

 data LaserType
    = DamageLaser {_laserTypeDamage :: Int}
-    | TargetLaser
+    | TargetingLaser
    deriving (Eq, Ord, Show, Read) --Generic, Flat)

 data LaserStart = LaserStart