From: Michael Orlitzky Date: Fri, 30 Sep 2011 16:00:56 +0000 (-0400) Subject: Remove inlines (no performance difference). X-Git-Tag: 0.0.1~120 X-Git-Url: http://gitweb.michael.orlitzky.com/?p=spline3.git;a=commitdiff_plain;h=9712b55ab9a0672a5edc95cb4943d9ffca145c29 Remove inlines (no performance difference). --- diff --git a/src/Grid.hs b/src/Grid.hs index f8fb331..6170d36 100644 --- a/src/Grid.hs +++ b/src/Grid.hs @@ -113,13 +113,11 @@ find_containing_cube g p = k = calculate_containing_cube_coordinate g z -{-# INLINE zoom_lookup #-} zoom_lookup :: Values3D -> ScaleFactor -> a -> (R.DIM3 -> Double) zoom_lookup v3d scale_factor _ = zoom_result v3d scale_factor -{-# INLINE zoom_result #-} zoom_result :: Values3D -> ScaleFactor -> R.DIM3 -> Double zoom_result v3d (sfx, sfy, sfz) (R.Z R.:. m R.:. n R.:. o) = f p