summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Differentiation.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Differentiation.hs')
-rw-r--r--lib/Numeric/GSL/Differentiation.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Numeric/GSL/Differentiation.hs b/lib/Numeric/GSL/Differentiation.hs
index e7fea92..09236bd 100644
--- a/lib/Numeric/GSL/Differentiation.hs
+++ b/lib/Numeric/GSL/Differentiation.hs
@@ -35,7 +35,7 @@ derivGen c h f x = unsafePerformIO $ do
35 r <- malloc 35 r <- malloc
36 e <- malloc 36 e <- malloc
37 fp <- mkfun (\x _ -> f x) 37 fp <- mkfun (\x _ -> f x)
38 c_deriv c fp x h r e // check "deriv" [] 38 c_deriv c fp x h r e // check "deriv"
39 vr <- peek r 39 vr <- peek r
40 ve <- peek e 40 ve <- peek e
41 let result = (vr,ve) 41 let result = (vr,ve)