summaryrefslogtreecommitdiff
path: root/packages/gsl
diff options
context:
space:
mode:
authorMatthew Peddie <mpeddie@gmail.com>2015-07-22 22:48:41 +1000
committerMatthew Peddie <mpeddie@gmail.com>2015-07-22 22:48:41 +1000
commita1901862eeff4d3df006acbe9ce0f9584986dabd (patch)
tree3977446a7c07dd98b00e41cbc71596b2b7700fa5 /packages/gsl
parentf4de670a45b193edb45c4689310271f10f52b205 (diff)
Fix copy-paste error in interpolation module
Diffstat (limited to 'packages/gsl')
-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