diff options
Diffstat (limited to 'lib/GSL/Special/Lambert.hs')
-rw-r--r-- | lib/GSL/Special/Lambert.hs | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lib/GSL/Special/Lambert.hs b/lib/GSL/Special/Lambert.hs index ded7fa0..5e8fed9 100644 --- a/lib/GSL/Special/Lambert.hs +++ b/lib/GSL/Special/Lambert.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Lambert-W-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_lambert.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -25,21 +25,29 @@ import Foreign(Ptr) | |||
25 | import GSL.Special.Internal | 25 | import GSL.Special.Internal |
26 | 26 | ||
27 | -- | wrapper for int gsl_sf_lambert_W0_e(double x,gsl_sf_result* result); | 27 | -- | wrapper for int gsl_sf_lambert_W0_e(double x,gsl_sf_result* result); |
28 | -- | ||
29 | -- <http://www.google.com/search?q=gsl_sf_lambert_W0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
28 | lambert_W0_e :: Double -> (Double,Double) | 30 | lambert_W0_e :: Double -> (Double,Double) |
29 | lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x | 31 | lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x |
30 | foreign import ccall "lambert.h gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr Double -> IO(Int) | 32 | foreign import ccall "lambert.h gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr Double -> IO(Int) |
31 | 33 | ||
32 | -- | wrapper for double gsl_sf_lambert_W0(double x); | 34 | -- | wrapper for double gsl_sf_lambert_W0(double x); |
35 | -- | ||
36 | -- <http://www.google.com/search?q=gsl_sf_lambert_W0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
33 | lambert_W0 :: Double -> Double | 37 | lambert_W0 :: Double -> Double |
34 | lambert_W0 = gsl_sf_lambert_W0 | 38 | lambert_W0 = gsl_sf_lambert_W0 |
35 | foreign import ccall "lambert.h gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double | 39 | foreign import ccall "lambert.h gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double |
36 | 40 | ||
37 | -- | wrapper for int gsl_sf_lambert_Wm1_e(double x,gsl_sf_result* result); | 41 | -- | wrapper for int gsl_sf_lambert_Wm1_e(double x,gsl_sf_result* result); |
42 | -- | ||
43 | -- <http://www.google.com/search?q=gsl_sf_lambert_Wm1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
38 | lambert_Wm1_e :: Double -> (Double,Double) | 44 | lambert_Wm1_e :: Double -> (Double,Double) |
39 | lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x | 45 | lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x |
40 | foreign import ccall "lambert.h gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr Double -> IO(Int) | 46 | foreign import ccall "lambert.h gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr Double -> IO(Int) |
41 | 47 | ||
42 | -- | wrapper for double gsl_sf_lambert_Wm1(double x); | 48 | -- | wrapper for double gsl_sf_lambert_Wm1(double x); |
49 | -- | ||
50 | -- <http://www.google.com/search?q=gsl_sf_lambert_Wm1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
43 | lambert_Wm1 :: Double -> Double | 51 | lambert_Wm1 :: Double -> Double |
44 | lambert_Wm1 = gsl_sf_lambert_Wm1 | 52 | lambert_Wm1 = gsl_sf_lambert_Wm1 |
45 | foreign import ccall "lambert.h gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double | 53 | foreign import ccall "lambert.h gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double |