]> gitweb.michael.orlitzky.com - spline3.git/blobdiff - src/Values.hs
Increase theta by an order of magnitude, fixing one particularly bad case.
[spline3.git] / src / Values.hs
index 61e3a11d3c2cd274afb5963bd5ba4091c8d4df86..3833135c720b7c0abe2e9c8c54e7334b1124383e 100644 (file)
@@ -1,4 +1,4 @@
-{-# LANGUAGE TypeSynonymInstances #-}
+{-# LANGUAGE FlexibleInstances #-}
 
 module Values
 where
@@ -79,7 +79,7 @@ idx v3d i j k =
     index v3d shape
     where
       shape :: DIM3
-      shape = (Z :. k :. j :. i)
+      shape = (Z :. i :. j :. k)
 
 
 zoom_shape :: Int -> DIM3 -> DIM3