diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Dilog.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Dilog.hs | 5 |
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( | |||
20 | import Foreign(Ptr) | 20 | import Foreign(Ptr) |
21 | import Foreign.C.Types(CInt) | 21 | import Foreign.C.Types(CInt) |
22 | import Numeric.GSL.Special.Internal | 22 | import Numeric.GSL.Special.Internal |
23 | |||
23 | dilog_e :: Double -> (Double,Double) | 24 | dilog_e :: Double -> (Double,Double) |
24 | dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x | 25 | dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x |
25 | foreign import ccall "gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr () -> IO CInt | 26 | foreign import ccall "gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr () -> IO CInt |
27 | |||
26 | dilog :: Double -> Double | 28 | dilog :: Double -> Double |
27 | dilog = gsl_sf_dilog | 29 | dilog = gsl_sf_dilog |
28 | foreign import ccall "gsl_sf_dilog" gsl_sf_dilog :: Double -> Double | 30 | foreign import ccall "gsl_sf_dilog" gsl_sf_dilog :: Double -> Double |
31 | |||
29 | complex_dilog_xy_e :: Double -> Double -> Ptr () -> (Double,Double) | 32 | complex_dilog_xy_e :: Double -> Double -> Ptr () -> (Double,Double) |
30 | complex_dilog_xy_e x y result_re = createSFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y result_re | 33 | complex_dilog_xy_e x y result_re = createSFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y result_re |
31 | foreign import ccall "gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt | 34 | foreign import ccall "gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt |
35 | |||
32 | complex_dilog_e :: Double -> Double -> Ptr () -> (Double,Double) | 36 | complex_dilog_e :: Double -> Double -> Ptr () -> (Double,Double) |
33 | complex_dilog_e r theta result_re = createSFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta result_re | 37 | complex_dilog_e r theta result_re = createSFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta result_re |
34 | foreign import ccall "gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt | 38 | foreign import ccall "gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt |
39 | |||
35 | complex_spence_xy_e :: Double -> Double -> Ptr () -> (Double,Double) | 40 | complex_spence_xy_e :: Double -> Double -> Ptr () -> (Double,Double) |
36 | complex_spence_xy_e x y real_sp = createSFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y real_sp | 41 | complex_spence_xy_e x y real_sp = createSFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y real_sp |
37 | foreign import ccall "gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt | 42 | foreign import ccall "gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt |