Add extra warning cries to chaseCrits

src/Dodge/Item/Weapon/Bullet.hs

@@ -1,6 +1,6 @@
 module Dodge.Item.Weapon.Bullet (
-    basicBullet,
-    hvBullet,
+    basicBulletAmmo,
+    hvBulletAmmo,
     defaultBullet,
 ) where
 
@@ -8,8 +8,8 @@ import Dodge.Data.Item.Use.Consumption.Ammo
 import Control.Lens
 import Geometry.Data
 
-basicBullet :: AmmoType
-basicBullet =
+basicBulletAmmo :: AmmoType
+basicBulletAmmo =
     BulletAmmo
         { _amString = "BASIC"
         , _amBullet = defaultBullet
@@ -37,8 +37,8 @@ basicBulDams =
     [ Damage PIERCING 100 0 0 0 $ PushBackDamage 2
     ]
 
-hvBullet :: AmmoType
-hvBullet =
+hvBulletAmmo :: AmmoType
+hvBulletAmmo =
     BulletAmmo
         { _amString = "HVBULLET"
         , _amBullet =