Add z levels to shockwaves

src/Dodge/Data/Bullet.hs

@@ -22,7 +22,7 @@ data Bullet = Bullet
     , _buDrag :: Float
     , _buPos :: Point2
     , _buOldPos :: Point2
-    , _buWidth :: Float
+--    , _buWidth :: Float
     }
     deriving (Show, Eq, Ord, Read) --Generic, Flat)
 

src/Dodge/Data/Shockwave.hs

@@ -18,7 +18,7 @@ data Shockwave = Shockwave
     { _swColor :: Color
     , _swDirection :: ShockwaveDirection
     , _swInvulnerableCrs :: [Int]
-    , _swPos :: Point2
+    , _swPos :: Point3
     , _swRad :: Float
     , _swDam :: Int
     , _swPush :: Float