stylish haskell

2 files changed, 11 insertions, 11 deletions

diff --git a/GenSCAD.hs b/GenSCAD.hs
index 548792f..bbc1299 100644
--- a/GenSCAD.hs
+++ b/GenSCAD.hs
@@ -11,11 +11,11 @@ module GenSCAD
 , colorcubeat
 ) where
 
-import Linear.V3
-import Control.Lens
-import Data.List
-import System.IO.Temp
-import System.Process
+import           Control.Lens
+import           Data.List
+import           Linear.V3
+import           System.IO.Temp
+import           System.Process
 
 
 v3tolist :: V3 a -> [a]
@@ -45,7 +45,7 @@ colorcubeat rgb d pos = color rgb $ translate pos $ cube d
 
 --place [x] = "ERROR"
 place :: [String] -> String
-place [d, p] = cubeat d p
+place [d, p]    = cubeat d p
 place [r, d, p] = colorcubeat r d p
 
 --place[o] = scad (fst o) (snd o)
diff --git a/shelves.hs b/shelves.hs
index e42fe7d..feeabfa 100644
--- a/shelves.hs
+++ b/shelves.hs
@@ -1,7 +1,7 @@
-import Linear.V3
-import Control.Lens
-import Data.List
-import GenSCAD (genscad)
+import           Control.Lens
+import           Data.List
+import           GenSCAD      (genscad)
+import           Linear.V3
 
 shelf_thickness :: Double
 shelf_thickness = 0.5
@@ -52,7 +52,7 @@ scadshelf :: String
 scadshelf = genscad $ shelves ++ sides
 
 --gen_shelf :: [Fractional] -> Fractional -> Fractional -> [Char]
---gen_shelf shelf_heights depth length = 
+--gen_shelf shelf_heights depth length =