]> gitweb.michael.orlitzky.com - spline3.git/blobdiff - src/Misc.hs
Fix some more hLint warnings.
[spline3.git] / src / Misc.hs
index 6b5a84d20af8d79ea3eac277b5032eaf9123a8c5..090642a223d6e2f2493441445dcd1dfba8e5e969 100644 (file)
@@ -46,7 +46,7 @@ transpose_xz m =
                       | z <- [0..zsize]]
     where
       zsize = (length m) - 1
-      ysize = (length $ head m)- 1
+      ysize = length (head m) - 1
       xsize = (length $ head $ head m) - 1
 
 -- | Takes a list, and returns True if its elements are pairwise