Cleanup

src/Dodge/Item/Weapon/BulletGun/Rod.hs

@@ -73,17 +73,17 @@ bangRod = defaultGun
             <> makeSingleClipAt (V3 5 0 3) it
         }
     , _itConsumption = defaultAmmo 
-        { _aoType = basicBullet
-        , _ammoBaseMax = 1
-        , _reloadTime = 20
-        , _reloadType = ActiveClear
+        { _laType = basicBullet
+        , _laMax = 1
+        , _laReloadTime = 20
+        , _laReloadType = ActiveClear
         }
     } 
     & itUse . useAim . aimWeight .~ 8
     & itUse . useAim . aimRange .~ 1
     & itUse . useAim . aimStance .~ OneHand
     & itUse . useAim . aimZoom .~ defaultItZoom {_itZoomFac = 1.5}
-    & itConsumption . aoType . amBulEff .~ expireAndDamage heavyBulDams
+    & itConsumption . laType . amBulEff .~ expireAndDamage heavyBulDams
 baseRodShape :: Shape
 baseRodShape = colorSH orange $ upperPrismPoly 3 $ rectXH 20 2
 baseAMRShape :: Shape
@@ -114,7 +114,7 @@ amr :: Item
 amr = elephantGun
     & itName .~ "ANTIMATERIELRIFLE"
     & itType .~ AMR
-    & itConsumption . ammoBaseMax .~ 15
+    & itConsumption . laMax .~ 15
     & itDimension . dimSPic .~ (\it -> noPic $ baseAMRShape
             <> makeTinClipAt 0 (V3 10 (-2) 0) it
             )