Fix direction stuttering bug

2021-09-22 19:42:39 +01:00
parent 0295b3dd70
commit 7b6904b51f
10 changed files with 59 additions and 93 deletions
@@ -43,6 +43,8 @@ normalizeV :: Point2 -> Point2
 normalizeV p = (1 / magV p) *.* p

 {- | Angle between two vectors.  Always positive.  -}
+-- TODO fix this: it seems to be unstable when the two vectors are very close to
+-- each other
 angleVV :: Point2 -> Point2 -> Float
 {-# INLINE angleVV #-}
 angleVV a b