From 4936023c14a13df39ce8d9b2ec8ba1e4931d6b96 Mon Sep 17 00:00:00 2001 From: hasufell Date: Mon, 13 Oct 2014 02:30:11 +0200 Subject: [PATCH] VEC: fix orientation, it was swapped --- Algebra/Vector.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Algebra/Vector.hs b/Algebra/Vector.hs index 2ffcc3d..3444faf 100644 --- a/Algebra/Vector.hs +++ b/Algebra/Vector.hs @@ -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