Implement pulse rifle with explodable pulse balls

src/Dodge/Data/Muzzle.hs

@@ -18,7 +18,7 @@ data Muzzle = Muzzle
     }
     deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
-data AmmoExtractPosition = MagBelow Int | CapacitorBelow Int | CapacitorSelf
+data AmmoExtractPosition = MagBelow Int | CapacitorBelow | CapacitorSelf
     deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 data FlareType