ALGO: rm redundant brackets

This commit is contained in:
hasufell 2015-01-09 03:24:44 +01:00
parent 521f799c49
commit 825dd9baa9
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020

View File

@ -51,7 +51,7 @@ isVStart :: PT -- ^ previous vertex
-> PT -- ^ next vertex
-> Bool
isVStart prev v next =
(ptCmpY next v == LT) && (ptCmpY prev v == LT) && (cw next v prev)
ptCmpY next v == LT && ptCmpY prev v == LT && cw next v prev
-- |Whether the vertex, given it's next and previous vertex,
@ -61,7 +61,7 @@ isVSplit :: PT -- ^ previous vertex
-> PT -- ^ next vertex
-> Bool
isVSplit prev v next =
(ptCmpY prev v == LT) && (ptCmpY next v == LT) && (cw prev v next)
ptCmpY prev v == LT && ptCmpY next v == LT && cw prev v next
-- |Whether the vertex, given it's next and previous vertex,
@ -71,7 +71,7 @@ isVEnd :: PT -- ^ previous vertex
-> PT -- ^ next vertex
-> Bool
isVEnd prev v next =
(ptCmpY prev v == GT) && (ptCmpY next v == GT) && (cw next v prev)
ptCmpY prev v == GT && ptCmpY next v == GT && cw next v prev
-- |Whether the vertex, given it's next and previous vertex,
@ -81,7 +81,7 @@ isVMerge :: PT -- ^ previous vertex
-> PT -- ^ next vertex
-> Bool
isVMerge prev v next =
(ptCmpY next v == GT) && (ptCmpY prev v == GT) && (cw prev v next)
ptCmpY next v == GT && ptCmpY prev v == GT && cw prev v next
-- |Whether the vertex, given it's next and previous vertex,