summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Dilog.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Dilog.hs')
-rw-r--r--lib/Numeric/GSL/Special/Dilog.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Dilog.hs b/lib/Numeric/GSL/Special/Dilog.hs
index 35bbdcd..23cbf79 100644
--- a/lib/Numeric/GSL/Special/Dilog.hs
+++ b/lib/Numeric/GSL/Special/Dilog.hs
@@ -20,18 +20,23 @@ module Numeric.GSL.Special.Dilog(
20import Foreign(Ptr) 20import Foreign(Ptr)
21import Foreign.C.Types(CInt) 21import Foreign.C.Types(CInt)
22import Numeric.GSL.Special.Internal 22import Numeric.GSL.Special.Internal
23
23dilog_e :: Double -> (Double,Double) 24dilog_e :: Double -> (Double,Double)
24dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x 25dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x
25foreign import ccall "gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr () -> IO CInt 26foreign import ccall "gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr () -> IO CInt
27
26dilog :: Double -> Double 28dilog :: Double -> Double
27dilog = gsl_sf_dilog 29dilog = gsl_sf_dilog
28foreign import ccall "gsl_sf_dilog" gsl_sf_dilog :: Double -> Double 30foreign import ccall "gsl_sf_dilog" gsl_sf_dilog :: Double -> Double
31
29complex_dilog_xy_e :: Double -> Double -> Ptr () -> (Double,Double) 32complex_dilog_xy_e :: Double -> Double -> Ptr () -> (Double,Double)
30complex_dilog_xy_e x y result_re = createSFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y result_re 33complex_dilog_xy_e x y result_re = createSFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y result_re
31foreign import ccall "gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 34foreign import ccall "gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
35
32complex_dilog_e :: Double -> Double -> Ptr () -> (Double,Double) 36complex_dilog_e :: Double -> Double -> Ptr () -> (Double,Double)
33complex_dilog_e r theta result_re = createSFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta result_re 37complex_dilog_e r theta result_re = createSFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta result_re
34foreign import ccall "gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 38foreign import ccall "gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
39
35complex_spence_xy_e :: Double -> Double -> Ptr () -> (Double,Double) 40complex_spence_xy_e :: Double -> Double -> Ptr () -> (Double,Double)
36complex_spence_xy_e x y real_sp = createSFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y real_sp 41complex_spence_xy_e x y real_sp = createSFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y real_sp
37foreign import ccall "gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 42foreign import ccall "gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt