summaryrefslogtreecommitdiff
path: root/lib/GSL/Special/Lambert.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/GSL/Special/Lambert.hs')
-rw-r--r--lib/GSL/Special/Lambert.hs10
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
10Wrappers for selected functions described at: 10Wrappers 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)
25import GSL.Special.Internal 25import 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>
28lambert_W0_e :: Double -> (Double,Double) 30lambert_W0_e :: Double -> (Double,Double)
29lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x 31lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x
30foreign import ccall "lambert.h gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr Double -> IO(Int) 32foreign 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>
33lambert_W0 :: Double -> Double 37lambert_W0 :: Double -> Double
34lambert_W0 = gsl_sf_lambert_W0 38lambert_W0 = gsl_sf_lambert_W0
35foreign import ccall "lambert.h gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double 39foreign 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>
38lambert_Wm1_e :: Double -> (Double,Double) 44lambert_Wm1_e :: Double -> (Double,Double)
39lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x 45lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x
40foreign import ccall "lambert.h gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr Double -> IO(Int) 46foreign 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>
43lambert_Wm1 :: Double -> Double 51lambert_Wm1 :: Double -> Double
44lambert_Wm1 = gsl_sf_lambert_Wm1 52lambert_Wm1 = gsl_sf_lambert_Wm1
45foreign import ccall "lambert.h gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double 53foreign import ccall "lambert.h gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double