X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FGrid.hs;h=d9fa975eedc7498989d601394b7e686c72ff0d41;hb=b2e1c440b9b1bb99ae564d6600230bbd1f7d204c;hp=435f0952f10c20dfb7445830a782de52de304883;hpb=3d197ab1a23d654d60617db6559daed195f1e016;p=spline3.git

diff --git a/src/Grid.hs b/src/Grid.hs
index 435f095..d9fa975 100644
--- a/src/Grid.hs
+++ b/src/Grid.hs
@@ -60,7 +60,7 @@ cubes g
                    let delta = h g,
                    let tet_vol = (1/24)*(delta^(3::Int)),
                    let cube_ijk =
-                           Cube delta i j k (make_values fvs i j k) tet_vol]
+                         Cube delta i j k (make_values fvs i j k) tet_vol]
      where
        xmax = xsize - 1
        ymax = ysize - 1