Add electrical bullets

2022-03-22 21:45:08 +00:00
parent bda65968b0
commit f030d8264f
10 changed files with 202 additions and 57 deletions
@@ -161,3 +161,7 @@ xV2 (V2 x _) = x
 yV2 :: Point2 -> Float
 {-# INLINE yV2 #-}
 yV2 (V2 _ y) = y
+
+xyzV4 :: V4 a -> V3 a
+{-# INLINE xyzV4 #-}
+xyzV4 (V4 x y z _) = V3 x y z