summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Log.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Log.hs')
-rw-r--r--lib/Numeric/GSL/Special/Log.hs33
1 files changed, 26 insertions, 7 deletions
diff --git a/lib/Numeric/GSL/Special/Log.hs b/lib/Numeric/GSL/Special/Log.hs
index e9c345b..fabbe76 100644
--- a/lib/Numeric/GSL/Special/Log.hs
+++ b/lib/Numeric/GSL/Special/Log.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/Logarithm-and-Related-Functions.html> 12<http://www.google.com/search?q=gsl_sf_log.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13 13
14-} 14-}
15------------------------------------------------------------ 15------------------------------------------------------------
@@ -26,49 +26,68 @@ module Numeric.GSL.Special.Log(
26) where 26) where
27 27
28import Foreign(Ptr) 28import Foreign(Ptr)
29import Foreign.C.Types(CInt)
29import Numeric.GSL.Special.Internal 30import Numeric.GSL.Special.Internal
30 31
31-- | wrapper for int gsl_sf_log_e(double x,gsl_sf_result* result); 32-- | wrapper for int gsl_sf_log_e(double x,gsl_sf_result* result);
33--
34-- <http://www.google.com/search?q=gsl_sf_log_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
32log_e :: Double -> (Double,Double) 35log_e :: Double -> (Double,Double)
33log_e x = createSFR "log_e" $ gsl_sf_log_e x 36log_e x = createSFR "log_e" $ gsl_sf_log_e x
34foreign import ccall "log.h gsl_sf_log_e" gsl_sf_log_e :: Double -> Ptr Double -> IO(Int) 37foreign import ccall "log.h gsl_sf_log_e" gsl_sf_log_e :: Double -> Ptr () -> IO CInt
35 38
36-- | wrapper for double gsl_sf_log(double x); 39-- | wrapper for double gsl_sf_log(double x);
40--
41-- <http://www.google.com/search?q=gsl_sf_log&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
37log :: Double -> Double 42log :: Double -> Double
38log = gsl_sf_log 43log = gsl_sf_log
39foreign import ccall "log.h gsl_sf_log" gsl_sf_log :: Double -> Double 44foreign import ccall "log.h gsl_sf_log" gsl_sf_log :: Double -> Double
40 45
41-- | wrapper for int gsl_sf_log_abs_e(double x,gsl_sf_result* result); 46-- | wrapper for int gsl_sf_log_abs_e(double x,gsl_sf_result* result);
47--
48-- <http://www.google.com/search?q=gsl_sf_log_abs_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
42log_abs_e :: Double -> (Double,Double) 49log_abs_e :: Double -> (Double,Double)
43log_abs_e x = createSFR "log_abs_e" $ gsl_sf_log_abs_e x 50log_abs_e x = createSFR "log_abs_e" $ gsl_sf_log_abs_e x
44foreign import ccall "log.h gsl_sf_log_abs_e" gsl_sf_log_abs_e :: Double -> Ptr Double -> IO(Int) 51foreign import ccall "log.h gsl_sf_log_abs_e" gsl_sf_log_abs_e :: Double -> Ptr () -> IO CInt
45 52
46-- | wrapper for double gsl_sf_log_abs(double x); 53-- | wrapper for double gsl_sf_log_abs(double x);
54--
55-- <http://www.google.com/search?q=gsl_sf_log_abs&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
47log_abs :: Double -> Double 56log_abs :: Double -> Double
48log_abs = gsl_sf_log_abs 57log_abs = gsl_sf_log_abs
49foreign import ccall "log.h gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double 58foreign import ccall "log.h gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double
50 59
51-- | wrapper for int gsl_sf_complex_log_e(double zr,double zi,gsl_sf_result* lnr,gsl_sf_result* theta); 60-- | wrapper for int gsl_sf_complex_log_e(double zr,double zi,gsl_sf_result* lnr,gsl_sf_result* theta);
52complex_log_e :: Double -> Double -> Ptr Double -> (Double,Double) 61--
62-- <http://www.google.com/search?q=gsl_sf_complex_log_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
63complex_log_e :: Double -> Double -> Ptr () -> (Double,Double)
53complex_log_e zr zi lnr = createSFR "complex_log_e" $ gsl_sf_complex_log_e zr zi lnr 64complex_log_e zr zi lnr = createSFR "complex_log_e" $ gsl_sf_complex_log_e zr zi lnr
54foreign import ccall "log.h gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) 65foreign import ccall "log.h gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
55 66
56-- | wrapper for int gsl_sf_log_1plusx_e(double x,gsl_sf_result* result); 67-- | wrapper for int gsl_sf_log_1plusx_e(double x,gsl_sf_result* result);
68--
69-- <http://www.google.com/search?q=gsl_sf_log_1plusx_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
57log_1plusx_e :: Double -> (Double,Double) 70log_1plusx_e :: Double -> (Double,Double)
58log_1plusx_e x = createSFR "log_1plusx_e" $ gsl_sf_log_1plusx_e x 71log_1plusx_e x = createSFR "log_1plusx_e" $ gsl_sf_log_1plusx_e x
59foreign import ccall "log.h gsl_sf_log_1plusx_e" gsl_sf_log_1plusx_e :: Double -> Ptr Double -> IO(Int) 72foreign import ccall "log.h gsl_sf_log_1plusx_e" gsl_sf_log_1plusx_e :: Double -> Ptr () -> IO CInt
60 73
61-- | wrapper for double gsl_sf_log_1plusx(double x); 74-- | wrapper for double gsl_sf_log_1plusx(double x);
75--
76-- <http://www.google.com/search?q=gsl_sf_log_1plusx&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
62log_1plusx :: Double -> Double 77log_1plusx :: Double -> Double
63log_1plusx = gsl_sf_log_1plusx 78log_1plusx = gsl_sf_log_1plusx
64foreign import ccall "log.h gsl_sf_log_1plusx" gsl_sf_log_1plusx :: Double -> Double 79foreign import ccall "log.h gsl_sf_log_1plusx" gsl_sf_log_1plusx :: Double -> Double
65 80
66-- | wrapper for int gsl_sf_log_1plusx_mx_e(double x,gsl_sf_result* result); 81-- | wrapper for int gsl_sf_log_1plusx_mx_e(double x,gsl_sf_result* result);
82--
83-- <http://www.google.com/search?q=gsl_sf_log_1plusx_mx_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
67log_1plusx_mx_e :: Double -> (Double,Double) 84log_1plusx_mx_e :: Double -> (Double,Double)
68log_1plusx_mx_e x = createSFR "log_1plusx_mx_e" $ gsl_sf_log_1plusx_mx_e x 85log_1plusx_mx_e x = createSFR "log_1plusx_mx_e" $ gsl_sf_log_1plusx_mx_e x
69foreign import ccall "log.h gsl_sf_log_1plusx_mx_e" gsl_sf_log_1plusx_mx_e :: Double -> Ptr Double -> IO(Int) 86foreign import ccall "log.h gsl_sf_log_1plusx_mx_e" gsl_sf_log_1plusx_mx_e :: Double -> Ptr () -> IO CInt
70 87
71-- | wrapper for double gsl_sf_log_1plusx_mx(double x); 88-- | wrapper for double gsl_sf_log_1plusx_mx(double x);
89--
90-- <http://www.google.com/search?q=gsl_sf_log_1plusx_mx&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
72log_1plusx_mx :: Double -> Double 91log_1plusx_mx :: Double -> Double
73log_1plusx_mx = gsl_sf_log_1plusx_mx 92log_1plusx_mx = gsl_sf_log_1plusx_mx
74foreign import ccall "log.h gsl_sf_log_1plusx_mx" gsl_sf_log_1plusx_mx :: Double -> Double 93foreign import ccall "log.h gsl_sf_log_1plusx_mx" gsl_sf_log_1plusx_mx :: Double -> Double