From 8a0914b82df64d85fef00c99ed6f827d400b48dd Mon Sep 17 00:00:00 2001
From: Michael Orlitzky <michael@orlitzky.com>
Date: Mon, 4 Mar 2019 20:33:54 -0500
Subject: [PATCH] src/Grid.hs: add a type signature to eliminate polymorphism.

---
 src/Grid.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Grid.hs b/src/Grid.hs
index cf5483b..57eaa19 100644
--- a/src/Grid.hs
+++ b/src/Grid.hs
@@ -143,7 +143,7 @@ zoom v3d scale_factor
         where
           (xsize, ysize, zsize) = dims v3d
           transExtent = zoom_shape scale_factor
-          f = zoom_lookup v3d scale_factor
+          f = zoom_lookup v3d scale_factor :: (DIM3 -> Double) -> DIM3 -> Double
 
 
 -- | Check all coefficients of tetrahedron0 belonging to the cube
-- 
2.43.2