Improve overall style and indenting

Parser/Meshparser.hs

@@ -12,16 +12,18 @@ import Parser.Core
 -- an array of float tuples.
 meshToArr :: String   -- ^ the string to convert
           -> [PT]     -- ^ the resulting vertice table
-meshToArr xs = fmap (p2)                       .
-                 fmap (\(Just (x, _)) -> x)    .
-                 filter (/= Nothing)           .
-                 fmap (runParser parseVertice) .
-                 lines                         $
-                 xs
+meshToArr xs =
+  fmap (p2)                       .
+    fmap (\(Just (x, _)) -> x)    .
+    filter (/= Nothing)           .
+    fmap (runParser parseVertice) .
+    lines                         $
+    xs
 
 
 -- | Creates a Parser that accepts a single vertice, such as 'v 1.0 2.0'.
 parseVertice :: Parser (Double, Double)
-parseVertice = (,)                                 <$>
-                 (char 'v' *> spaces *> posDouble) <*>
-                 (spaces *> posDouble)
+parseVertice =
+  (,)                                 <$>
+    (char 'v' *> spaces *> posDouble) <*>
+    (spaces *> posDouble)