diff --git a/LinearAlgebra/Vector.hs b/LinearAlgebra/Vector.hs index f4ce09a..8a9e0fe 100644 --- a/LinearAlgebra/Vector.hs +++ b/LinearAlgebra/Vector.hs @@ -20,7 +20,7 @@ inRange (xlD, xuD) (ylD, yuD) p (x, y) = unp2 p --- |Get the angle between two vectors in degrees. +-- |Get the angle between two vectors. getAngle :: Vec -> Vec -> Double getAngle a b = acos . flip (/) (vecLength a * vecLength b) .