VEC: fix orientation, it was swapped

This commit is contained in:
hasufell 2014-10-13 02:30:11 +02:00
parent f82c948055
commit 4936023c14
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
1 changed files with 2 additions and 2 deletions

View File

@ -77,8 +77,8 @@ det a b c =
-- * collinear
getOrient :: PT -> PT -> PT -> Alignment
getOrient a b c = case compare (det a b c) 0 of
GT -> CW
LT -> CCW
LT -> CW
GT -> CCW
EQ -> CL