diff options
| author | Matthew Peddie <mpeddie@gmail.com> | 2015-07-22 22:48:41 +1000 |
|---|---|---|
| committer | Matthew Peddie <mpeddie@gmail.com> | 2015-07-22 22:48:41 +1000 |
| commit | a1901862eeff4d3df006acbe9ce0f9584986dabd (patch) | |
| tree | 3977446a7c07dd98b00e41cbc71596b2b7700fa5 /packages/gsl | |
| parent | f4de670a45b193edb45c4689310271f10f52b205 (diff) | |
Fix copy-paste error in interpolation module
Diffstat (limited to 'packages/gsl')
| -rw-r--r-- | packages/gsl/src/Numeric/GSL/Interpolation.hs | 2 |
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 |
| 119 | evaluate mth pts = | 119 | evaluate 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 |