summaryrefslogtreecommitdiff
path: root/packages/special/lib/Numeric/GSL/Special/Log.hs
diff options
context:
space:
mode:
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Log.hs')
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Log.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/packages/special/lib/Numeric/GSL/Special/Log.hs b/packages/special/lib/Numeric/GSL/Special/Log.hs
index a57b67a..7f3f9d6 100644
--- a/packages/special/lib/Numeric/GSL/Special/Log.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Log.hs
@@ -17,6 +17,7 @@ module Numeric.GSL.Special.Log(
17, Numeric.GSL.Special.Log.log 17, Numeric.GSL.Special.Log.log
18, log_abs_e 18, log_abs_e
19, log_abs 19, log_abs
20, complex_log_e
20, log_1plusx_e 21, log_1plusx_e
21, log_1plusx 22, log_1plusx
22, log_1plusx_mx_e 23, log_1plusx_mx_e
@@ -43,8 +44,8 @@ log_abs :: Double -> Double
43log_abs = gsl_sf_log_abs 44log_abs = gsl_sf_log_abs
44foreign import ccall SAFE_CHEAP "gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double 45foreign import ccall SAFE_CHEAP "gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double
45 46
46complex_log_e :: Double -> Double -> Ptr () -> (Double,Double) 47complex_log_e :: Double -> Double -> ((Double,Double),(Double,Double))
47complex_log_e zr zi lnr = createSFR "complex_log_e" $ gsl_sf_complex_log_e zr zi lnr 48complex_log_e zr zi = create2SFR "complex_log_e" $ gsl_sf_complex_log_e zr zi
48foreign import ccall SAFE_CHEAP "gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 49foreign import ccall SAFE_CHEAP "gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
49 50
50log_1plusx_e :: Double -> (Double,Double) 51log_1plusx_e :: Double -> (Double,Double)