Fix haddock docs

This commit is contained in:
hasufell 2014-10-09 03:27:02 +02:00
parent 357c427f0b
commit a5473eaf96
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
2 changed files with 2 additions and 2 deletions

View File

@ -66,7 +66,7 @@ grahamGetCH vs = f . grahamSort $ vs
f xs = xs
-- |Only compute steps of the graham scan algorithm to allow
-- |Compute all steps of the graham scan algorithm to allow
-- visualizing it.
grahamGetCHSteps :: [PT] -> [[PT]]
grahamGetCHSteps vs = reverse . g $ (length . grahamGetCH $ vs)

View File

@ -62,7 +62,7 @@ vp2 a b = (pt2Vec b) - (pt2Vec a)
-- |Checks if 3 points a,b,c build a counterclock wise triangle by
-- connecting a-b-c. This is done by computing thed determinant and
-- connecting a-b-c. This is done by computing the determinant and
-- checking the algebraic sign.
ccw :: PT -> PT -> PT -> Bool
ccw a b c = (bx - ax) *