X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FValues.hs;h=e21bacf1e906c553e3bda167e9fea3947d4ba8ff;hb=9d123d52885618214e14e9fdefb2f3f43c329ddd;hp=7fc577529f9ccdd2ce0fe1fc85cf14d8744e1e21;hpb=fd3d394c27e3a90de8238b98bd112c4fe3468ee0;p=spline3.git

diff --git a/src/Values.hs b/src/Values.hs
index 7fc5775..e21bacf 100644
--- a/src/Values.hs
+++ b/src/Values.hs
@@ -7,24 +7,20 @@ module Values (
   dims,
   empty3d,
   idx,
-  zoom_shape
-  )
+  zoom_shape )
 where
 
 import Data.Array.Repa (
   Array, U,
-  Z(..),
-  (:.)(..),
+  Z( Z ),
+  (:.)( (:.) ),
   DIM2,
   DIM3,
   extent,
   fromListUnboxed,
-  unsafeIndex,
-  )
+  unsafeIndex )
 
-import System.FilePath ()
-
-import ScaleFactor (ScaleFactor)
+import ScaleFactor ( ScaleFactor )
 
 
 type Values sh = Array U sh Double