summaryrefslogtreecommitdiff
path: root/lib/GSL/Special/Zeta.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/GSL/Special/Zeta.hs')
-rw-r--r--lib/GSL/Special/Zeta.hs30
1 files changed, 29 insertions, 1 deletions
diff --git a/lib/GSL/Special/Zeta.hs b/lib/GSL/Special/Zeta.hs
index 6eff537..01cfdac 100644
--- a/lib/GSL/Special/Zeta.hs
+++ b/lib/GSL/Special/Zeta.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/Zeta-Functions.html> 12<http://www.google.com/search?q=gsl_sf_zeta.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13 13
14-} 14-}
15------------------------------------------------------------ 15------------------------------------------------------------
@@ -35,71 +35,99 @@ import Foreign(Ptr)
35import GSL.Special.Internal 35import GSL.Special.Internal
36 36
37-- | wrapper for int gsl_sf_zeta_int_e(int n,gsl_sf_result* result); 37-- | wrapper for int gsl_sf_zeta_int_e(int n,gsl_sf_result* result);
38--
39-- <http://www.google.com/search?q=gsl_sf_zeta_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
38zeta_int_e :: Int -> (Double,Double) 40zeta_int_e :: Int -> (Double,Double)
39zeta_int_e n = createSFR "zeta_int_e" $ gsl_sf_zeta_int_e n 41zeta_int_e n = createSFR "zeta_int_e" $ gsl_sf_zeta_int_e n
40foreign import ccall "zeta.h gsl_sf_zeta_int_e" gsl_sf_zeta_int_e :: Int -> Ptr Double -> IO(Int) 42foreign import ccall "zeta.h gsl_sf_zeta_int_e" gsl_sf_zeta_int_e :: Int -> Ptr Double -> IO(Int)
41 43
42-- | wrapper for double gsl_sf_zeta_int(int n); 44-- | wrapper for double gsl_sf_zeta_int(int n);
45--
46-- <http://www.google.com/search?q=gsl_sf_zeta_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
43zeta_int :: Int -> Double 47zeta_int :: Int -> Double
44zeta_int = gsl_sf_zeta_int 48zeta_int = gsl_sf_zeta_int
45foreign import ccall "zeta.h gsl_sf_zeta_int" gsl_sf_zeta_int :: Int -> Double 49foreign import ccall "zeta.h gsl_sf_zeta_int" gsl_sf_zeta_int :: Int -> Double
46 50
47-- | wrapper for int gsl_sf_zeta_e(double s,gsl_sf_result* result); 51-- | wrapper for int gsl_sf_zeta_e(double s,gsl_sf_result* result);
52--
53-- <http://www.google.com/search?q=gsl_sf_zeta_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
48zeta_e :: Double -> (Double,Double) 54zeta_e :: Double -> (Double,Double)
49zeta_e s = createSFR "zeta_e" $ gsl_sf_zeta_e s 55zeta_e s = createSFR "zeta_e" $ gsl_sf_zeta_e s
50foreign import ccall "zeta.h gsl_sf_zeta_e" gsl_sf_zeta_e :: Double -> Ptr Double -> IO(Int) 56foreign import ccall "zeta.h gsl_sf_zeta_e" gsl_sf_zeta_e :: Double -> Ptr Double -> IO(Int)
51 57
52-- | wrapper for double gsl_sf_zeta(double s); 58-- | wrapper for double gsl_sf_zeta(double s);
59--
60-- <http://www.google.com/search?q=gsl_sf_zeta&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
53zeta :: Double -> Double 61zeta :: Double -> Double
54zeta = gsl_sf_zeta 62zeta = gsl_sf_zeta
55foreign import ccall "zeta.h gsl_sf_zeta" gsl_sf_zeta :: Double -> Double 63foreign import ccall "zeta.h gsl_sf_zeta" gsl_sf_zeta :: Double -> Double
56 64
57-- | wrapper for int gsl_sf_zetam1_e(double s,gsl_sf_result* result); 65-- | wrapper for int gsl_sf_zetam1_e(double s,gsl_sf_result* result);
66--
67-- <http://www.google.com/search?q=gsl_sf_zetam1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
58zetam1_e :: Double -> (Double,Double) 68zetam1_e :: Double -> (Double,Double)
59zetam1_e s = createSFR "zetam1_e" $ gsl_sf_zetam1_e s 69zetam1_e s = createSFR "zetam1_e" $ gsl_sf_zetam1_e s
60foreign import ccall "zeta.h gsl_sf_zetam1_e" gsl_sf_zetam1_e :: Double -> Ptr Double -> IO(Int) 70foreign import ccall "zeta.h gsl_sf_zetam1_e" gsl_sf_zetam1_e :: Double -> Ptr Double -> IO(Int)
61 71
62-- | wrapper for double gsl_sf_zetam1(double s); 72-- | wrapper for double gsl_sf_zetam1(double s);
73--
74-- <http://www.google.com/search?q=gsl_sf_zetam1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
63zetam1 :: Double -> Double 75zetam1 :: Double -> Double
64zetam1 = gsl_sf_zetam1 76zetam1 = gsl_sf_zetam1
65foreign import ccall "zeta.h gsl_sf_zetam1" gsl_sf_zetam1 :: Double -> Double 77foreign import ccall "zeta.h gsl_sf_zetam1" gsl_sf_zetam1 :: Double -> Double
66 78
67-- | wrapper for int gsl_sf_zetam1_int_e(int s,gsl_sf_result* result); 79-- | wrapper for int gsl_sf_zetam1_int_e(int s,gsl_sf_result* result);
80--
81-- <http://www.google.com/search?q=gsl_sf_zetam1_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
68zetam1_int_e :: Int -> (Double,Double) 82zetam1_int_e :: Int -> (Double,Double)
69zetam1_int_e s = createSFR "zetam1_int_e" $ gsl_sf_zetam1_int_e s 83zetam1_int_e s = createSFR "zetam1_int_e" $ gsl_sf_zetam1_int_e s
70foreign import ccall "zeta.h gsl_sf_zetam1_int_e" gsl_sf_zetam1_int_e :: Int -> Ptr Double -> IO(Int) 84foreign import ccall "zeta.h gsl_sf_zetam1_int_e" gsl_sf_zetam1_int_e :: Int -> Ptr Double -> IO(Int)
71 85
72-- | wrapper for double gsl_sf_zetam1_int(int s); 86-- | wrapper for double gsl_sf_zetam1_int(int s);
87--
88-- <http://www.google.com/search?q=gsl_sf_zetam1_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
73zetam1_int :: Int -> Double 89zetam1_int :: Int -> Double
74zetam1_int = gsl_sf_zetam1_int 90zetam1_int = gsl_sf_zetam1_int
75foreign import ccall "zeta.h gsl_sf_zetam1_int" gsl_sf_zetam1_int :: Int -> Double 91foreign import ccall "zeta.h gsl_sf_zetam1_int" gsl_sf_zetam1_int :: Int -> Double
76 92
77-- | wrapper for int gsl_sf_hzeta_e(double s,double q,gsl_sf_result* result); 93-- | wrapper for int gsl_sf_hzeta_e(double s,double q,gsl_sf_result* result);
94--
95-- <http://www.google.com/search?q=gsl_sf_hzeta_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
78hzeta_e :: Double -> Double -> (Double,Double) 96hzeta_e :: Double -> Double -> (Double,Double)
79hzeta_e s q = createSFR "hzeta_e" $ gsl_sf_hzeta_e s q 97hzeta_e s q = createSFR "hzeta_e" $ gsl_sf_hzeta_e s q
80foreign import ccall "zeta.h gsl_sf_hzeta_e" gsl_sf_hzeta_e :: Double -> Double -> Ptr Double -> IO(Int) 98foreign import ccall "zeta.h gsl_sf_hzeta_e" gsl_sf_hzeta_e :: Double -> Double -> Ptr Double -> IO(Int)
81 99
82-- | wrapper for double gsl_sf_hzeta(double s,double q); 100-- | wrapper for double gsl_sf_hzeta(double s,double q);
101--
102-- <http://www.google.com/search?q=gsl_sf_hzeta&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
83hzeta :: Double -> Double -> Double 103hzeta :: Double -> Double -> Double
84hzeta = gsl_sf_hzeta 104hzeta = gsl_sf_hzeta
85foreign import ccall "zeta.h gsl_sf_hzeta" gsl_sf_hzeta :: Double -> Double -> Double 105foreign import ccall "zeta.h gsl_sf_hzeta" gsl_sf_hzeta :: Double -> Double -> Double
86 106
87-- | wrapper for int gsl_sf_eta_int_e(int n,gsl_sf_result* result); 107-- | wrapper for int gsl_sf_eta_int_e(int n,gsl_sf_result* result);
108--
109-- <http://www.google.com/search?q=gsl_sf_eta_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
88eta_int_e :: Int -> (Double,Double) 110eta_int_e :: Int -> (Double,Double)
89eta_int_e n = createSFR "eta_int_e" $ gsl_sf_eta_int_e n 111eta_int_e n = createSFR "eta_int_e" $ gsl_sf_eta_int_e n
90foreign import ccall "zeta.h gsl_sf_eta_int_e" gsl_sf_eta_int_e :: Int -> Ptr Double -> IO(Int) 112foreign import ccall "zeta.h gsl_sf_eta_int_e" gsl_sf_eta_int_e :: Int -> Ptr Double -> IO(Int)
91 113
92-- | wrapper for double gsl_sf_eta_int(int n); 114-- | wrapper for double gsl_sf_eta_int(int n);
115--
116-- <http://www.google.com/search?q=gsl_sf_eta_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
93eta_int :: Int -> Double 117eta_int :: Int -> Double
94eta_int = gsl_sf_eta_int 118eta_int = gsl_sf_eta_int
95foreign import ccall "zeta.h gsl_sf_eta_int" gsl_sf_eta_int :: Int -> Double 119foreign import ccall "zeta.h gsl_sf_eta_int" gsl_sf_eta_int :: Int -> Double
96 120
97-- | wrapper for int gsl_sf_eta_e(double s,gsl_sf_result* result); 121-- | wrapper for int gsl_sf_eta_e(double s,gsl_sf_result* result);
122--
123-- <http://www.google.com/search?q=gsl_sf_eta_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
98eta_e :: Double -> (Double,Double) 124eta_e :: Double -> (Double,Double)
99eta_e s = createSFR "eta_e" $ gsl_sf_eta_e s 125eta_e s = createSFR "eta_e" $ gsl_sf_eta_e s
100foreign import ccall "zeta.h gsl_sf_eta_e" gsl_sf_eta_e :: Double -> Ptr Double -> IO(Int) 126foreign import ccall "zeta.h gsl_sf_eta_e" gsl_sf_eta_e :: Double -> Ptr Double -> IO(Int)
101 127
102-- | wrapper for double gsl_sf_eta(double s); 128-- | wrapper for double gsl_sf_eta(double s);
129--
130-- <http://www.google.com/search?q=gsl_sf_eta&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
103eta :: Double -> Double 131eta :: Double -> Double
104eta = gsl_sf_eta 132eta = gsl_sf_eta
105foreign import ccall "zeta.h gsl_sf_eta" gsl_sf_eta :: Double -> Double 133foreign import ccall "zeta.h gsl_sf_eta" gsl_sf_eta :: Double -> Double