ALGO: rm redundant brackets
This commit is contained in:
parent
521f799c49
commit
825dd9baa9
@ -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,
|
||||
|
Loading…
Reference in New Issue
Block a user