Move towards unifying weapon barrels

2023-05-20 15:29:46 +01:00
parent f2183e9954
commit 03611c6b95
6 changed files with 18 additions and 19 deletions
@@ -88,12 +88,9 @@ data GunBarrels
        , _brlNum :: Int
        , _brlInaccuracy :: Float
        }
-    | BarrelList [GunBarrel]
-    | RotBarrel
-        { _brlNum :: Int
-        , _brlInaccuracy :: Float
+    | BarrelList 
+        { _brlList :: [GunBarrel]
        }
-    | SingleBarrel {_brlInaccuracy :: Float}
    --deriving (Eq, Ord, Show, Read) --Generic, Flat)

 data Nozzle = Nozzle