Cleanup

src/Geometry/Vector.hs

@@ -173,12 +173,6 @@ magV :: Point2 -> Float
 {-# INLINE magV #-}
 magV (V2 x y) = sqrt $ x ^ (2 :: Int) + y ^ (2 :: Int)
 
-{- | Magnitude of the cross product of two vectors.
-Identical to detV.
--}
-crossV :: Point2 -> Point2 -> Float
-crossV (V2 ax ay) (V2 bx by) = ax * by - ay * bx
-
 -- | TO CHECK Orthographic projection of one vector onto another.
 projV :: Point2 -> Point2 -> Point2
 projV fromv onv