summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--packages/gsl/src/Numeric/GSL/Interpolation.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/gsl/src/Numeric/GSL/Interpolation.hs b/packages/gsl/src/Numeric/GSL/Interpolation.hs
index fb49e40..d060468 100644
--- a/packages/gsl/src/Numeric/GSL/Interpolation.hs
+++ b/packages/gsl/src/Numeric/GSL/Interpolation.hs
@@ -117,7 +117,7 @@ evaluate :: InterpolationMethod -- ^ What method to use to interpolate
117 -> Double -- ^ Point at which to evaluate the function 117 -> Double -- ^ Point at which to evaluate the function
118 -> Double -- ^ Interpolated result 118 -> Double -- ^ Interpolated result
119evaluate mth pts = 119evaluate mth pts =
120 applyCFun "evaluate" "spline_eval" c_spline_eval_deriv 120 applyCFun "evaluate" "spline_eval" c_spline_eval
121 mth (fromList xs) (fromList ys) 121 mth (fromList xs) (fromList ys)
122 where 122 where
123 (xs, ys) = unzip pts 123 (xs, ys) = unzip pts