Clean up some hLint warnings.

[spline3.git] / src / Cube.hs

diff --git a/src/Cube.hs b/src/Cube.hs
index 6263d2e32a331ffe971b61ba78eed466fd71c04d..3f1669b619a5cbbb0ee262bd6b5f63b4c4a24355 100644 (file)
--- a/src/Cube.hs
+++ b/src/Cube.hs
@@ -283,7 +283,7 @@ tetrahedron8 c =
       v1' = center (back_face c)
       v2' = Face.v0 (back_face c)
       v3' = Face.v1 (back_face c)
-      fv' = rotate cwy $ rotate cwy $ (Tetrahedron.fv (tetrahedron0 c))
+      fv' = rotate cwy $ rotate cwy $ Tetrahedron.fv (tetrahedron0 c)
 
 tetrahedron9 :: Cube -> Tetrahedron
 tetrahedron9 c =