summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Hyperg.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Hyperg.hs')
-rw-r--r--lib/Numeric/GSL/Special/Hyperg.hs197
1 files changed, 197 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Hyperg.hs b/lib/Numeric/GSL/Special/Hyperg.hs
new file mode 100644
index 0000000..28bf984
--- /dev/null
+++ b/lib/Numeric/GSL/Special/Hyperg.hs
@@ -0,0 +1,197 @@
1------------------------------------------------------------
2{- |
3Module : Numeric.GSL.Special.Hyperg
4Copyright : (c) Alberto Ruiz 2006
5License : GPL-style
6Maintainer : Alberto Ruiz (aruiz at um dot es)
7Stability : provisional
8Portability : uses ffi
9
10Wrappers for selected functions described at:
11
12<http://www.google.com/search?q=gsl_sf_hyperg.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13
14-}
15------------------------------------------------------------
16
17module Numeric.GSL.Special.Hyperg(
18 hyperg_0F1_e
19, hyperg_0F1
20, hyperg_1F1_int_e
21, hyperg_1F1_int
22, hyperg_1F1_e
23, hyperg_1F1
24, hyperg_U_int_e
25, hyperg_U_int
26, hyperg_U_int_e10_e
27, hyperg_U_e
28, hyperg_U
29, hyperg_U_e10_e
30, hyperg_2F1_e
31, hyperg_2F1
32, hyperg_2F1_conj_e
33, hyperg_2F1_conj
34, hyperg_2F1_renorm_e
35, hyperg_2F1_renorm
36, hyperg_2F1_conj_renorm_e
37, hyperg_2F1_conj_renorm
38, hyperg_2F0_e
39, hyperg_2F0
40) where
41
42import Foreign(Ptr)
43import Numeric.GSL.Special.Internal
44
45-- | wrapper for int gsl_sf_hyperg_0F1_e(double c,double x,gsl_sf_result* result);
46--
47-- <http://www.google.com/search?q=gsl_sf_hyperg_0F1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
48hyperg_0F1_e :: Double -> Double -> (Double,Double)
49hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x
50foreign import ccall "hyperg.h gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr Double -> IO(Int)
51
52-- | wrapper for double gsl_sf_hyperg_0F1(double c,double x);
53--
54-- <http://www.google.com/search?q=gsl_sf_hyperg_0F1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
55hyperg_0F1 :: Double -> Double -> Double
56hyperg_0F1 = gsl_sf_hyperg_0F1
57foreign import ccall "hyperg.h gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double
58
59-- | wrapper for int gsl_sf_hyperg_1F1_int_e(int m,int n,double x,gsl_sf_result* result);
60--
61-- <http://www.google.com/search?q=gsl_sf_hyperg_1F1_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
62hyperg_1F1_int_e :: Int -> Int -> Double -> (Double,Double)
63hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x
64foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: Int -> Int -> Double -> Ptr Double -> IO(Int)
65
66-- | wrapper for double gsl_sf_hyperg_1F1_int(int m,int n,double x);
67--
68-- <http://www.google.com/search?q=gsl_sf_hyperg_1F1_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
69hyperg_1F1_int :: Int -> Int -> Double -> Double
70hyperg_1F1_int = gsl_sf_hyperg_1F1_int
71foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: Int -> Int -> Double -> Double
72
73-- | wrapper for int gsl_sf_hyperg_1F1_e(double a,double b,double x,gsl_sf_result* result);
74--
75-- <http://www.google.com/search?q=gsl_sf_hyperg_1F1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
76hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double)
77hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x
78foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr Double -> IO(Int)
79
80-- | wrapper for double gsl_sf_hyperg_1F1(double a,double b,double x);
81--
82-- <http://www.google.com/search?q=gsl_sf_hyperg_1F1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
83hyperg_1F1 :: Double -> Double -> Double -> Double
84hyperg_1F1 = gsl_sf_hyperg_1F1
85foreign import ccall "hyperg.h gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double
86
87-- | wrapper for int gsl_sf_hyperg_U_int_e(int m,int n,double x,gsl_sf_result* result);
88--
89-- <http://www.google.com/search?q=gsl_sf_hyperg_U_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
90hyperg_U_int_e :: Int -> Int -> Double -> (Double,Double)
91hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x
92foreign import ccall "hyperg.h gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: Int -> Int -> Double -> Ptr Double -> IO(Int)
93
94-- | wrapper for double gsl_sf_hyperg_U_int(int m,int n,double x);
95--
96-- <http://www.google.com/search?q=gsl_sf_hyperg_U_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
97hyperg_U_int :: Int -> Int -> Double -> Double
98hyperg_U_int = gsl_sf_hyperg_U_int
99foreign import ccall "hyperg.h gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: Int -> Int -> Double -> Double
100
101-- | wrapper for int gsl_sf_hyperg_U_int_e10_e(int m,int n,double x,gsl_sf_result_e10* result);
102--
103-- <http://www.google.com/search?q=gsl_sf_hyperg_U_int_e10_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
104hyperg_U_int_e10_e :: Int -> Int -> Double -> (Double,Int,Double)
105hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x
106foreign import ccall "hyperg.h gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: Int -> Int -> Double -> Ptr () -> IO(Int)
107
108-- | wrapper for int gsl_sf_hyperg_U_e(double a,double b,double x,gsl_sf_result* result);
109--
110-- <http://www.google.com/search?q=gsl_sf_hyperg_U_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
111hyperg_U_e :: Double -> Double -> Double -> (Double,Double)
112hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x
113foreign import ccall "hyperg.h gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr Double -> IO(Int)
114
115-- | wrapper for double gsl_sf_hyperg_U(double a,double b,double x);
116--
117-- <http://www.google.com/search?q=gsl_sf_hyperg_U&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
118hyperg_U :: Double -> Double -> Double -> Double
119hyperg_U = gsl_sf_hyperg_U
120foreign import ccall "hyperg.h gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double
121
122-- | wrapper for int gsl_sf_hyperg_U_e10_e(double a,double b,double x,gsl_sf_result_e10* result);
123--
124-- <http://www.google.com/search?q=gsl_sf_hyperg_U_e10_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
125hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double)
126hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x
127foreign import ccall "hyperg.h gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO(Int)
128
129-- | wrapper for int gsl_sf_hyperg_2F1_e(double a,double b,double c,double x,gsl_sf_result* result);
130--
131-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
132hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double)
133hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x
134foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int)
135
136-- | wrapper for double gsl_sf_hyperg_2F1(double a,double b,double c,double x);
137--
138-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
139hyperg_2F1 :: Double -> Double -> Double -> Double -> Double
140hyperg_2F1 = gsl_sf_hyperg_2F1
141foreign import ccall "hyperg.h gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double
142
143-- | wrapper for int gsl_sf_hyperg_2F1_conj_e(double aR,double aI,double c,double x,gsl_sf_result* result);
144--
145-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1_conj_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
146hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double)
147hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x
148foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int)
149
150-- | wrapper for double gsl_sf_hyperg_2F1_conj(double aR,double aI,double c,double x);
151--
152-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1_conj&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
153hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double
154hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj
155foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double
156
157-- | wrapper for int gsl_sf_hyperg_2F1_renorm_e(double a,double b,double c,double x,gsl_sf_result* result);
158--
159-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1_renorm_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
160hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double)
161hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x
162foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int)
163
164-- | wrapper for double gsl_sf_hyperg_2F1_renorm(double a,double b,double c,double x);
165--
166-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1_renorm&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
167hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double
168hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm
169foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double
170
171-- | wrapper for int gsl_sf_hyperg_2F1_conj_renorm_e(double aR,double aI,double c,double x,gsl_sf_result* result);
172--
173-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1_conj_renorm_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
174hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double)
175hyperg_2F1_conj_renorm_e aR aI c x = createSFR "hyperg_2F1_conj_renorm_e" $ gsl_sf_hyperg_2F1_conj_renorm_e aR aI c x
176foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj_renorm_e" gsl_sf_hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int)
177
178-- | wrapper for double gsl_sf_hyperg_2F1_conj_renorm(double aR,double aI,double c,double x);
179--
180-- <http://www.google.com/search?q=gsl_sf_hyperg_2F1_conj_renorm&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
181hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double
182hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm
183foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double
184
185-- | wrapper for int gsl_sf_hyperg_2F0_e(double a,double b,double x,gsl_sf_result* result);
186--
187-- <http://www.google.com/search?q=gsl_sf_hyperg_2F0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
188hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double)
189hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x
190foreign import ccall "hyperg.h gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr Double -> IO(Int)
191
192-- | wrapper for double gsl_sf_hyperg_2F0(double a,double b,double x);
193--
194-- <http://www.google.com/search?q=gsl_sf_hyperg_2F0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
195hyperg_2F0 :: Double -> Double -> Double -> Double
196hyperg_2F0 = gsl_sf_hyperg_2F0
197foreign import ccall "hyperg.h gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double
generated by cgit v1.2.3 (git 2.39.1) at 2024-09-18 05:14:13 +0000