diff --git a/Algorithms/PolygonTriangulation.hs b/Algorithms/PolygonTriangulation.hs
index a54aae1..6326308 100644
--- a/Algorithms/PolygonTriangulation.hs
+++ b/Algorithms/PolygonTriangulation.hs
@@ -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,