summaryrefslogtreecommitdiff
path: root/lib/GSL/Special/Psi.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/GSL/Special/Psi.hs')
-rw-r--r--lib/GSL/Special/Psi.hs26
1 files changed, 25 insertions, 1 deletions
diff --git a/lib/GSL/Special/Psi.hs b/lib/GSL/Special/Psi.hs
index 31f4f8c..bee934b 100644
--- a/lib/GSL/Special/Psi.hs
+++ b/lib/GSL/Special/Psi.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/Psi-_0028Digamma_0029-Function.html> 12<http://www.google.com/search?q=gsl_sf_psi.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13 13
14-} 14-}
15------------------------------------------------------------ 15------------------------------------------------------------
@@ -33,61 +33,85 @@ import Foreign(Ptr)
33import GSL.Special.Internal 33import GSL.Special.Internal
34 34
35-- | wrapper for int gsl_sf_psi_int_e(int n,gsl_sf_result* result); 35-- | wrapper for int gsl_sf_psi_int_e(int n,gsl_sf_result* result);
36--
37-- <http://www.google.com/search?q=gsl_sf_psi_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
36psi_int_e :: Int -> (Double,Double) 38psi_int_e :: Int -> (Double,Double)
37psi_int_e n = createSFR "psi_int_e" $ gsl_sf_psi_int_e n 39psi_int_e n = createSFR "psi_int_e" $ gsl_sf_psi_int_e n
38foreign import ccall "psi.h gsl_sf_psi_int_e" gsl_sf_psi_int_e :: Int -> Ptr Double -> IO(Int) 40foreign import ccall "psi.h gsl_sf_psi_int_e" gsl_sf_psi_int_e :: Int -> Ptr Double -> IO(Int)
39 41
40-- | wrapper for double gsl_sf_psi_int(int n); 42-- | wrapper for double gsl_sf_psi_int(int n);
43--
44-- <http://www.google.com/search?q=gsl_sf_psi_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
41psi_int :: Int -> Double 45psi_int :: Int -> Double
42psi_int = gsl_sf_psi_int 46psi_int = gsl_sf_psi_int
43foreign import ccall "psi.h gsl_sf_psi_int" gsl_sf_psi_int :: Int -> Double 47foreign import ccall "psi.h gsl_sf_psi_int" gsl_sf_psi_int :: Int -> Double
44 48
45-- | wrapper for int gsl_sf_psi_e(double x,gsl_sf_result* result); 49-- | wrapper for int gsl_sf_psi_e(double x,gsl_sf_result* result);
50--
51-- <http://www.google.com/search?q=gsl_sf_psi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
46psi_e :: Double -> (Double,Double) 52psi_e :: Double -> (Double,Double)
47psi_e x = createSFR "psi_e" $ gsl_sf_psi_e x 53psi_e x = createSFR "psi_e" $ gsl_sf_psi_e x
48foreign import ccall "psi.h gsl_sf_psi_e" gsl_sf_psi_e :: Double -> Ptr Double -> IO(Int) 54foreign import ccall "psi.h gsl_sf_psi_e" gsl_sf_psi_e :: Double -> Ptr Double -> IO(Int)
49 55
50-- | wrapper for double gsl_sf_psi(double x); 56-- | wrapper for double gsl_sf_psi(double x);
57--
58-- <http://www.google.com/search?q=gsl_sf_psi&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
51psi :: Double -> Double 59psi :: Double -> Double
52psi = gsl_sf_psi 60psi = gsl_sf_psi
53foreign import ccall "psi.h gsl_sf_psi" gsl_sf_psi :: Double -> Double 61foreign import ccall "psi.h gsl_sf_psi" gsl_sf_psi :: Double -> Double
54 62
55-- | wrapper for int gsl_sf_psi_1piy_e(double y,gsl_sf_result* result); 63-- | wrapper for int gsl_sf_psi_1piy_e(double y,gsl_sf_result* result);
64--
65-- <http://www.google.com/search?q=gsl_sf_psi_1piy_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
56psi_1piy_e :: Double -> (Double,Double) 66psi_1piy_e :: Double -> (Double,Double)
57psi_1piy_e y = createSFR "psi_1piy_e" $ gsl_sf_psi_1piy_e y 67psi_1piy_e y = createSFR "psi_1piy_e" $ gsl_sf_psi_1piy_e y
58foreign import ccall "psi.h gsl_sf_psi_1piy_e" gsl_sf_psi_1piy_e :: Double -> Ptr Double -> IO(Int) 68foreign import ccall "psi.h gsl_sf_psi_1piy_e" gsl_sf_psi_1piy_e :: Double -> Ptr Double -> IO(Int)
59 69
60-- | wrapper for double gsl_sf_psi_1piy(double y); 70-- | wrapper for double gsl_sf_psi_1piy(double y);
71--
72-- <http://www.google.com/search?q=gsl_sf_psi_1piy&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
61psi_1piy :: Double -> Double 73psi_1piy :: Double -> Double
62psi_1piy = gsl_sf_psi_1piy 74psi_1piy = gsl_sf_psi_1piy
63foreign import ccall "psi.h gsl_sf_psi_1piy" gsl_sf_psi_1piy :: Double -> Double 75foreign import ccall "psi.h gsl_sf_psi_1piy" gsl_sf_psi_1piy :: Double -> Double
64 76
65-- | wrapper for int gsl_sf_psi_1_int_e(int n,gsl_sf_result* result); 77-- | wrapper for int gsl_sf_psi_1_int_e(int n,gsl_sf_result* result);
78--
79-- <http://www.google.com/search?q=gsl_sf_psi_1_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
66psi_1_int_e :: Int -> (Double,Double) 80psi_1_int_e :: Int -> (Double,Double)
67psi_1_int_e n = createSFR "psi_1_int_e" $ gsl_sf_psi_1_int_e n 81psi_1_int_e n = createSFR "psi_1_int_e" $ gsl_sf_psi_1_int_e n
68foreign import ccall "psi.h gsl_sf_psi_1_int_e" gsl_sf_psi_1_int_e :: Int -> Ptr Double -> IO(Int) 82foreign import ccall "psi.h gsl_sf_psi_1_int_e" gsl_sf_psi_1_int_e :: Int -> Ptr Double -> IO(Int)
69 83
70-- | wrapper for double gsl_sf_psi_1_int(int n); 84-- | wrapper for double gsl_sf_psi_1_int(int n);
85--
86-- <http://www.google.com/search?q=gsl_sf_psi_1_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
71psi_1_int :: Int -> Double 87psi_1_int :: Int -> Double
72psi_1_int = gsl_sf_psi_1_int 88psi_1_int = gsl_sf_psi_1_int
73foreign import ccall "psi.h gsl_sf_psi_1_int" gsl_sf_psi_1_int :: Int -> Double 89foreign import ccall "psi.h gsl_sf_psi_1_int" gsl_sf_psi_1_int :: Int -> Double
74 90
75-- | wrapper for int gsl_sf_psi_1_e(double x,gsl_sf_result* result); 91-- | wrapper for int gsl_sf_psi_1_e(double x,gsl_sf_result* result);
92--
93-- <http://www.google.com/search?q=gsl_sf_psi_1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
76psi_1_e :: Double -> (Double,Double) 94psi_1_e :: Double -> (Double,Double)
77psi_1_e x = createSFR "psi_1_e" $ gsl_sf_psi_1_e x 95psi_1_e x = createSFR "psi_1_e" $ gsl_sf_psi_1_e x
78foreign import ccall "psi.h gsl_sf_psi_1_e" gsl_sf_psi_1_e :: Double -> Ptr Double -> IO(Int) 96foreign import ccall "psi.h gsl_sf_psi_1_e" gsl_sf_psi_1_e :: Double -> Ptr Double -> IO(Int)
79 97
80-- | wrapper for double gsl_sf_psi_1(double x); 98-- | wrapper for double gsl_sf_psi_1(double x);
99--
100-- <http://www.google.com/search?q=gsl_sf_psi_1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
81psi_1 :: Double -> Double 101psi_1 :: Double -> Double
82psi_1 = gsl_sf_psi_1 102psi_1 = gsl_sf_psi_1
83foreign import ccall "psi.h gsl_sf_psi_1" gsl_sf_psi_1 :: Double -> Double 103foreign import ccall "psi.h gsl_sf_psi_1" gsl_sf_psi_1 :: Double -> Double
84 104
85-- | wrapper for int gsl_sf_psi_n_e(int n,double x,gsl_sf_result* result); 105-- | wrapper for int gsl_sf_psi_n_e(int n,double x,gsl_sf_result* result);
106--
107-- <http://www.google.com/search?q=gsl_sf_psi_n_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
86psi_n_e :: Int -> Double -> (Double,Double) 108psi_n_e :: Int -> Double -> (Double,Double)
87psi_n_e n x = createSFR "psi_n_e" $ gsl_sf_psi_n_e n x 109psi_n_e n x = createSFR "psi_n_e" $ gsl_sf_psi_n_e n x
88foreign import ccall "psi.h gsl_sf_psi_n_e" gsl_sf_psi_n_e :: Int -> Double -> Ptr Double -> IO(Int) 110foreign import ccall "psi.h gsl_sf_psi_n_e" gsl_sf_psi_n_e :: Int -> Double -> Ptr Double -> IO(Int)
89 111
90-- | wrapper for double gsl_sf_psi_n(int n,double x); 112-- | wrapper for double gsl_sf_psi_n(int n,double x);
113--
114-- <http://www.google.com/search?q=gsl_sf_psi_n&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
91psi_n :: Int -> Double -> Double 115psi_n :: Int -> Double -> Double
92psi_n = gsl_sf_psi_n 116psi_n = gsl_sf_psi_n
93foreign import ccall "psi.h gsl_sf_psi_n" gsl_sf_psi_n :: Int -> Double -> Double 117foreign import ccall "psi.h gsl_sf_psi_n" gsl_sf_psi_n :: Int -> Double -> Double