diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Lambert.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Lambert.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Lambert.hs b/lib/Numeric/GSL/Special/Lambert.hs index 7bc820c..06af09c 100644 --- a/lib/Numeric/GSL/Special/Lambert.hs +++ b/lib/Numeric/GSL/Special/Lambert.hs | |||
@@ -22,15 +22,19 @@ module Numeric.GSL.Special.Lambert( | |||
22 | import Foreign(Ptr) | 22 | import Foreign(Ptr) |
23 | import Foreign.C.Types(CInt) | 23 | import Foreign.C.Types(CInt) |
24 | import Numeric.GSL.Special.Internal | 24 | import Numeric.GSL.Special.Internal |
25 | |||
25 | lambert_W0_e :: Double -> (Double,Double) | 26 | lambert_W0_e :: Double -> (Double,Double) |
26 | lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x | 27 | lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x |
27 | foreign import ccall "gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr () -> IO CInt | 28 | foreign import ccall "gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr () -> IO CInt |
29 | |||
28 | lambert_W0 :: Double -> Double | 30 | lambert_W0 :: Double -> Double |
29 | lambert_W0 = gsl_sf_lambert_W0 | 31 | lambert_W0 = gsl_sf_lambert_W0 |
30 | foreign import ccall "gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double | 32 | foreign import ccall "gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double |
33 | |||
31 | lambert_Wm1_e :: Double -> (Double,Double) | 34 | lambert_Wm1_e :: Double -> (Double,Double) |
32 | lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x | 35 | lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x |
33 | foreign import ccall "gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr () -> IO CInt | 36 | foreign import ccall "gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr () -> IO CInt |
37 | |||
34 | lambert_Wm1 :: Double -> Double | 38 | lambert_Wm1 :: Double -> Double |
35 | lambert_Wm1 = gsl_sf_lambert_Wm1 | 39 | lambert_Wm1 = gsl_sf_lambert_Wm1 |
36 | foreign import ccall "gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double | 40 | foreign import ccall "gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double |