diff options
Diffstat (limited to 'lib/GSL')
-rw-r--r-- | lib/GSL/Special/Bessel.hs | 207 | ||||
-rw-r--r-- | lib/GSL/Special/Clausen.hs | 6 | ||||
-rw-r--r-- | lib/GSL/Special/Coulomb.hs | 24 | ||||
-rw-r--r-- | lib/GSL/Special/Dawson.hs | 6 | ||||
-rw-r--r-- | lib/GSL/Special/Debye.hs | 18 | ||||
-rw-r--r-- | lib/GSL/Special/Dilog.hs | 12 | ||||
-rw-r--r-- | lib/GSL/Special/Elementary.hs | 8 | ||||
-rw-r--r-- | lib/GSL/Special/Ellint.hs | 42 | ||||
-rw-r--r-- | lib/GSL/Special/Erf.hs | 26 | ||||
-rw-r--r-- | lib/GSL/Special/Expint.hs | 50 | ||||
-rw-r--r-- | lib/GSL/Special/Fermi_dirac.hs | 38 | ||||
-rw-r--r-- | lib/GSL/Special/Gamma.hs | 89 | ||||
-rw-r--r-- | lib/GSL/Special/Gegenbauer.hs | 20 | ||||
-rw-r--r-- | lib/GSL/Special/Hyperg.hs | 46 | ||||
-rw-r--r-- | lib/GSL/Special/Internal.hs | 3 | ||||
-rw-r--r-- | lib/GSL/Special/Laguerre.hs | 18 | ||||
-rw-r--r-- | lib/GSL/Special/Lambert.hs | 10 | ||||
-rw-r--r-- | lib/GSL/Special/Pow_int.hs | 6 | ||||
-rw-r--r-- | lib/GSL/Special/Psi.hs | 26 | ||||
-rw-r--r-- | lib/GSL/Special/Synchrotron.hs | 10 | ||||
-rw-r--r-- | lib/GSL/Special/Zeta.hs | 30 | ||||
-rw-r--r-- | lib/GSL/Special/auto.hs | 22 | ||||
-rw-r--r-- | lib/GSL/Special/autoall.sh | 41 | ||||
-rw-r--r-- | lib/GSL/Special/bessel.h | 1 | ||||
-rw-r--r-- | lib/GSL/Special/manual.txt | 12 |
25 files changed, 734 insertions, 37 deletions
diff --git a/lib/GSL/Special/Bessel.hs b/lib/GSL/Special/Bessel.hs index e0e2ab5..4a96926 100644 --- a/lib/GSL/Special/Bessel.hs +++ b/lib/GSL/Special/Bessel.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Bessel-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_bessel.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -109,496 +109,701 @@ import Foreign(Ptr) | |||
109 | import GSL.Special.Internal | 109 | import GSL.Special.Internal |
110 | 110 | ||
111 | -- | wrapper for int gsl_sf_bessel_J0_e(double x,gsl_sf_result* result); | 111 | -- | wrapper for int gsl_sf_bessel_J0_e(double x,gsl_sf_result* result); |
112 | -- | ||
113 | -- <http://www.google.com/search?q=gsl_sf_bessel_J0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
112 | bessel_J0_e :: Double -> (Double,Double) | 114 | bessel_J0_e :: Double -> (Double,Double) |
113 | bessel_J0_e x = createSFR "bessel_J0_e" $ gsl_sf_bessel_J0_e x | 115 | bessel_J0_e x = createSFR "bessel_J0_e" $ gsl_sf_bessel_J0_e x |
114 | foreign import ccall "bessel.h gsl_sf_bessel_J0_e" gsl_sf_bessel_J0_e :: Double -> Ptr Double -> IO(Int) | 116 | foreign import ccall "bessel.h gsl_sf_bessel_J0_e" gsl_sf_bessel_J0_e :: Double -> Ptr Double -> IO(Int) |
115 | 117 | ||
116 | -- | wrapper for double gsl_sf_bessel_J0(double x); | 118 | -- | wrapper for double gsl_sf_bessel_J0(double x); |
119 | -- | ||
120 | -- <http://www.google.com/search?q=gsl_sf_bessel_J0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
117 | bessel_J0 :: Double -> Double | 121 | bessel_J0 :: Double -> Double |
118 | bessel_J0 = gsl_sf_bessel_J0 | 122 | bessel_J0 = gsl_sf_bessel_J0 |
119 | foreign import ccall "bessel.h gsl_sf_bessel_J0" gsl_sf_bessel_J0 :: Double -> Double | 123 | foreign import ccall "bessel.h gsl_sf_bessel_J0" gsl_sf_bessel_J0 :: Double -> Double |
120 | 124 | ||
121 | -- | wrapper for int gsl_sf_bessel_J1_e(double x,gsl_sf_result* result); | 125 | -- | wrapper for int gsl_sf_bessel_J1_e(double x,gsl_sf_result* result); |
126 | -- | ||
127 | -- <http://www.google.com/search?q=gsl_sf_bessel_J1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
122 | bessel_J1_e :: Double -> (Double,Double) | 128 | bessel_J1_e :: Double -> (Double,Double) |
123 | bessel_J1_e x = createSFR "bessel_J1_e" $ gsl_sf_bessel_J1_e x | 129 | bessel_J1_e x = createSFR "bessel_J1_e" $ gsl_sf_bessel_J1_e x |
124 | foreign import ccall "bessel.h gsl_sf_bessel_J1_e" gsl_sf_bessel_J1_e :: Double -> Ptr Double -> IO(Int) | 130 | foreign import ccall "bessel.h gsl_sf_bessel_J1_e" gsl_sf_bessel_J1_e :: Double -> Ptr Double -> IO(Int) |
125 | 131 | ||
126 | -- | wrapper for double gsl_sf_bessel_J1(double x); | 132 | -- | wrapper for double gsl_sf_bessel_J1(double x); |
133 | -- | ||
134 | -- <http://www.google.com/search?q=gsl_sf_bessel_J1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
127 | bessel_J1 :: Double -> Double | 135 | bessel_J1 :: Double -> Double |
128 | bessel_J1 = gsl_sf_bessel_J1 | 136 | bessel_J1 = gsl_sf_bessel_J1 |
129 | foreign import ccall "bessel.h gsl_sf_bessel_J1" gsl_sf_bessel_J1 :: Double -> Double | 137 | foreign import ccall "bessel.h gsl_sf_bessel_J1" gsl_sf_bessel_J1 :: Double -> Double |
130 | 138 | ||
131 | -- | wrapper for int gsl_sf_bessel_Jn_e(int n,double x,gsl_sf_result* result); | 139 | -- | wrapper for int gsl_sf_bessel_Jn_e(int n,double x,gsl_sf_result* result); |
140 | -- | ||
141 | -- <http://www.google.com/search?q=gsl_sf_bessel_Jn_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
132 | bessel_Jn_e :: Int -> Double -> (Double,Double) | 142 | bessel_Jn_e :: Int -> Double -> (Double,Double) |
133 | bessel_Jn_e n x = createSFR "bessel_Jn_e" $ gsl_sf_bessel_Jn_e n x | 143 | bessel_Jn_e n x = createSFR "bessel_Jn_e" $ gsl_sf_bessel_Jn_e n x |
134 | foreign import ccall "bessel.h gsl_sf_bessel_Jn_e" gsl_sf_bessel_Jn_e :: Int -> Double -> Ptr Double -> IO(Int) | 144 | foreign import ccall "bessel.h gsl_sf_bessel_Jn_e" gsl_sf_bessel_Jn_e :: Int -> Double -> Ptr Double -> IO(Int) |
135 | 145 | ||
136 | -- | wrapper for double gsl_sf_bessel_Jn(int n,double x); | 146 | -- | wrapper for double gsl_sf_bessel_Jn(int n,double x); |
147 | -- | ||
148 | -- <http://www.google.com/search?q=gsl_sf_bessel_Jn&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
137 | bessel_Jn :: Int -> Double -> Double | 149 | bessel_Jn :: Int -> Double -> Double |
138 | bessel_Jn = gsl_sf_bessel_Jn | 150 | bessel_Jn = gsl_sf_bessel_Jn |
139 | foreign import ccall "bessel.h gsl_sf_bessel_Jn" gsl_sf_bessel_Jn :: Int -> Double -> Double | 151 | foreign import ccall "bessel.h gsl_sf_bessel_Jn" gsl_sf_bessel_Jn :: Int -> Double -> Double |
140 | 152 | ||
141 | -- | wrapper for int gsl_sf_bessel_Jn_array(int nmin,int nmax,double x,double* result_array); | 153 | -- | wrapper for int gsl_sf_bessel_Jn_array(int nmin,int nmax,double x,double* result_array); |
154 | -- | ||
155 | -- <http://www.google.com/search?q=gsl_sf_bessel_Jn_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
142 | bessel_Jn_array :: Int -> Int -> Double -> Ptr Double -> Int | 156 | bessel_Jn_array :: Int -> Int -> Double -> Ptr Double -> Int |
143 | bessel_Jn_array = gsl_sf_bessel_Jn_array | 157 | bessel_Jn_array = gsl_sf_bessel_Jn_array |
144 | foreign import ccall "bessel.h gsl_sf_bessel_Jn_array" gsl_sf_bessel_Jn_array :: Int -> Int -> Double -> Ptr Double -> Int | 158 | foreign import ccall "bessel.h gsl_sf_bessel_Jn_array" gsl_sf_bessel_Jn_array :: Int -> Int -> Double -> Ptr Double -> Int |
145 | 159 | ||
146 | -- | wrapper for int gsl_sf_bessel_Y0_e(double x,gsl_sf_result* result); | 160 | -- | wrapper for int gsl_sf_bessel_Y0_e(double x,gsl_sf_result* result); |
161 | -- | ||
162 | -- <http://www.google.com/search?q=gsl_sf_bessel_Y0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
147 | bessel_Y0_e :: Double -> (Double,Double) | 163 | bessel_Y0_e :: Double -> (Double,Double) |
148 | bessel_Y0_e x = createSFR "bessel_Y0_e" $ gsl_sf_bessel_Y0_e x | 164 | bessel_Y0_e x = createSFR "bessel_Y0_e" $ gsl_sf_bessel_Y0_e x |
149 | foreign import ccall "bessel.h gsl_sf_bessel_Y0_e" gsl_sf_bessel_Y0_e :: Double -> Ptr Double -> IO(Int) | 165 | foreign import ccall "bessel.h gsl_sf_bessel_Y0_e" gsl_sf_bessel_Y0_e :: Double -> Ptr Double -> IO(Int) |
150 | 166 | ||
151 | -- | wrapper for double gsl_sf_bessel_Y0(double x); | 167 | -- | wrapper for double gsl_sf_bessel_Y0(double x); |
168 | -- | ||
169 | -- <http://www.google.com/search?q=gsl_sf_bessel_Y0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
152 | bessel_Y0 :: Double -> Double | 170 | bessel_Y0 :: Double -> Double |
153 | bessel_Y0 = gsl_sf_bessel_Y0 | 171 | bessel_Y0 = gsl_sf_bessel_Y0 |
154 | foreign import ccall "bessel.h gsl_sf_bessel_Y0" gsl_sf_bessel_Y0 :: Double -> Double | 172 | foreign import ccall "bessel.h gsl_sf_bessel_Y0" gsl_sf_bessel_Y0 :: Double -> Double |
155 | 173 | ||
156 | -- | wrapper for int gsl_sf_bessel_Y1_e(double x,gsl_sf_result* result); | 174 | -- | wrapper for int gsl_sf_bessel_Y1_e(double x,gsl_sf_result* result); |
175 | -- | ||
176 | -- <http://www.google.com/search?q=gsl_sf_bessel_Y1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
157 | bessel_Y1_e :: Double -> (Double,Double) | 177 | bessel_Y1_e :: Double -> (Double,Double) |
158 | bessel_Y1_e x = createSFR "bessel_Y1_e" $ gsl_sf_bessel_Y1_e x | 178 | bessel_Y1_e x = createSFR "bessel_Y1_e" $ gsl_sf_bessel_Y1_e x |
159 | foreign import ccall "bessel.h gsl_sf_bessel_Y1_e" gsl_sf_bessel_Y1_e :: Double -> Ptr Double -> IO(Int) | 179 | foreign import ccall "bessel.h gsl_sf_bessel_Y1_e" gsl_sf_bessel_Y1_e :: Double -> Ptr Double -> IO(Int) |
160 | 180 | ||
161 | -- | wrapper for double gsl_sf_bessel_Y1(double x); | 181 | -- | wrapper for double gsl_sf_bessel_Y1(double x); |
182 | -- | ||
183 | -- <http://www.google.com/search?q=gsl_sf_bessel_Y1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
162 | bessel_Y1 :: Double -> Double | 184 | bessel_Y1 :: Double -> Double |
163 | bessel_Y1 = gsl_sf_bessel_Y1 | 185 | bessel_Y1 = gsl_sf_bessel_Y1 |
164 | foreign import ccall "bessel.h gsl_sf_bessel_Y1" gsl_sf_bessel_Y1 :: Double -> Double | 186 | foreign import ccall "bessel.h gsl_sf_bessel_Y1" gsl_sf_bessel_Y1 :: Double -> Double |
165 | 187 | ||
166 | -- | wrapper for int gsl_sf_bessel_Yn_e(int n,double x,gsl_sf_result* result); | 188 | -- | wrapper for int gsl_sf_bessel_Yn_e(int n,double x,gsl_sf_result* result); |
189 | -- | ||
190 | -- <http://www.google.com/search?q=gsl_sf_bessel_Yn_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
167 | bessel_Yn_e :: Int -> Double -> (Double,Double) | 191 | bessel_Yn_e :: Int -> Double -> (Double,Double) |
168 | bessel_Yn_e n x = createSFR "bessel_Yn_e" $ gsl_sf_bessel_Yn_e n x | 192 | bessel_Yn_e n x = createSFR "bessel_Yn_e" $ gsl_sf_bessel_Yn_e n x |
169 | foreign import ccall "bessel.h gsl_sf_bessel_Yn_e" gsl_sf_bessel_Yn_e :: Int -> Double -> Ptr Double -> IO(Int) | 193 | foreign import ccall "bessel.h gsl_sf_bessel_Yn_e" gsl_sf_bessel_Yn_e :: Int -> Double -> Ptr Double -> IO(Int) |
170 | 194 | ||
171 | -- | wrapper for double gsl_sf_bessel_Yn(int n,double x); | 195 | -- | wrapper for double gsl_sf_bessel_Yn(int n,double x); |
196 | -- | ||
197 | -- <http://www.google.com/search?q=gsl_sf_bessel_Yn&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
172 | bessel_Yn :: Int -> Double -> Double | 198 | bessel_Yn :: Int -> Double -> Double |
173 | bessel_Yn = gsl_sf_bessel_Yn | 199 | bessel_Yn = gsl_sf_bessel_Yn |
174 | foreign import ccall "bessel.h gsl_sf_bessel_Yn" gsl_sf_bessel_Yn :: Int -> Double -> Double | 200 | foreign import ccall "bessel.h gsl_sf_bessel_Yn" gsl_sf_bessel_Yn :: Int -> Double -> Double |
175 | 201 | ||
176 | -- | wrapper for int gsl_sf_bessel_Yn_array(int nmin,int nmax,double x,double* result_array); | 202 | -- | wrapper for int gsl_sf_bessel_Yn_array(int nmin,int nmax,double x,double* result_array); |
203 | -- | ||
204 | -- <http://www.google.com/search?q=gsl_sf_bessel_Yn_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
177 | bessel_Yn_array :: Int -> Int -> Double -> Ptr Double -> Int | 205 | bessel_Yn_array :: Int -> Int -> Double -> Ptr Double -> Int |
178 | bessel_Yn_array = gsl_sf_bessel_Yn_array | 206 | bessel_Yn_array = gsl_sf_bessel_Yn_array |
179 | foreign import ccall "bessel.h gsl_sf_bessel_Yn_array" gsl_sf_bessel_Yn_array :: Int -> Int -> Double -> Ptr Double -> Int | 207 | foreign import ccall "bessel.h gsl_sf_bessel_Yn_array" gsl_sf_bessel_Yn_array :: Int -> Int -> Double -> Ptr Double -> Int |
180 | 208 | ||
181 | -- | wrapper for int gsl_sf_bessel_I0_e(double x,gsl_sf_result* result); | 209 | -- | wrapper for int gsl_sf_bessel_I0_e(double x,gsl_sf_result* result); |
210 | -- | ||
211 | -- <http://www.google.com/search?q=gsl_sf_bessel_I0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
182 | bessel_I0_e :: Double -> (Double,Double) | 212 | bessel_I0_e :: Double -> (Double,Double) |
183 | bessel_I0_e x = createSFR "bessel_I0_e" $ gsl_sf_bessel_I0_e x | 213 | bessel_I0_e x = createSFR "bessel_I0_e" $ gsl_sf_bessel_I0_e x |
184 | foreign import ccall "bessel.h gsl_sf_bessel_I0_e" gsl_sf_bessel_I0_e :: Double -> Ptr Double -> IO(Int) | 214 | foreign import ccall "bessel.h gsl_sf_bessel_I0_e" gsl_sf_bessel_I0_e :: Double -> Ptr Double -> IO(Int) |
185 | 215 | ||
186 | -- | wrapper for double gsl_sf_bessel_I0(double x); | 216 | -- | wrapper for double gsl_sf_bessel_I0(double x); |
217 | -- | ||
218 | -- <http://www.google.com/search?q=gsl_sf_bessel_I0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
187 | bessel_I0 :: Double -> Double | 219 | bessel_I0 :: Double -> Double |
188 | bessel_I0 = gsl_sf_bessel_I0 | 220 | bessel_I0 = gsl_sf_bessel_I0 |
189 | foreign import ccall "bessel.h gsl_sf_bessel_I0" gsl_sf_bessel_I0 :: Double -> Double | 221 | foreign import ccall "bessel.h gsl_sf_bessel_I0" gsl_sf_bessel_I0 :: Double -> Double |
190 | 222 | ||
191 | -- | wrapper for int gsl_sf_bessel_I1_e(double x,gsl_sf_result* result); | 223 | -- | wrapper for int gsl_sf_bessel_I1_e(double x,gsl_sf_result* result); |
224 | -- | ||
225 | -- <http://www.google.com/search?q=gsl_sf_bessel_I1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
192 | bessel_I1_e :: Double -> (Double,Double) | 226 | bessel_I1_e :: Double -> (Double,Double) |
193 | bessel_I1_e x = createSFR "bessel_I1_e" $ gsl_sf_bessel_I1_e x | 227 | bessel_I1_e x = createSFR "bessel_I1_e" $ gsl_sf_bessel_I1_e x |
194 | foreign import ccall "bessel.h gsl_sf_bessel_I1_e" gsl_sf_bessel_I1_e :: Double -> Ptr Double -> IO(Int) | 228 | foreign import ccall "bessel.h gsl_sf_bessel_I1_e" gsl_sf_bessel_I1_e :: Double -> Ptr Double -> IO(Int) |
195 | 229 | ||
196 | -- | wrapper for double gsl_sf_bessel_I1(double x); | 230 | -- | wrapper for double gsl_sf_bessel_I1(double x); |
231 | -- | ||
232 | -- <http://www.google.com/search?q=gsl_sf_bessel_I1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
197 | bessel_I1 :: Double -> Double | 233 | bessel_I1 :: Double -> Double |
198 | bessel_I1 = gsl_sf_bessel_I1 | 234 | bessel_I1 = gsl_sf_bessel_I1 |
199 | foreign import ccall "bessel.h gsl_sf_bessel_I1" gsl_sf_bessel_I1 :: Double -> Double | 235 | foreign import ccall "bessel.h gsl_sf_bessel_I1" gsl_sf_bessel_I1 :: Double -> Double |
200 | 236 | ||
201 | -- | wrapper for int gsl_sf_bessel_In_e(int n,double x,gsl_sf_result* result); | 237 | -- | wrapper for int gsl_sf_bessel_In_e(int n,double x,gsl_sf_result* result); |
238 | -- | ||
239 | -- <http://www.google.com/search?q=gsl_sf_bessel_In_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
202 | bessel_In_e :: Int -> Double -> (Double,Double) | 240 | bessel_In_e :: Int -> Double -> (Double,Double) |
203 | bessel_In_e n x = createSFR "bessel_In_e" $ gsl_sf_bessel_In_e n x | 241 | bessel_In_e n x = createSFR "bessel_In_e" $ gsl_sf_bessel_In_e n x |
204 | foreign import ccall "bessel.h gsl_sf_bessel_In_e" gsl_sf_bessel_In_e :: Int -> Double -> Ptr Double -> IO(Int) | 242 | foreign import ccall "bessel.h gsl_sf_bessel_In_e" gsl_sf_bessel_In_e :: Int -> Double -> Ptr Double -> IO(Int) |
205 | 243 | ||
206 | -- | wrapper for double gsl_sf_bessel_In(int n,double x); | 244 | -- | wrapper for double gsl_sf_bessel_In(int n,double x); |
245 | -- | ||
246 | -- <http://www.google.com/search?q=gsl_sf_bessel_In&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
207 | bessel_In :: Int -> Double -> Double | 247 | bessel_In :: Int -> Double -> Double |
208 | bessel_In = gsl_sf_bessel_In | 248 | bessel_In = gsl_sf_bessel_In |
209 | foreign import ccall "bessel.h gsl_sf_bessel_In" gsl_sf_bessel_In :: Int -> Double -> Double | 249 | foreign import ccall "bessel.h gsl_sf_bessel_In" gsl_sf_bessel_In :: Int -> Double -> Double |
210 | 250 | ||
211 | -- | wrapper for int gsl_sf_bessel_In_array(int nmin,int nmax,double x,double* result_array); | 251 | -- | wrapper for int gsl_sf_bessel_In_array(int nmin,int nmax,double x,double* result_array); |
252 | -- | ||
253 | -- <http://www.google.com/search?q=gsl_sf_bessel_In_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
212 | bessel_In_array :: Int -> Int -> Double -> Ptr Double -> Int | 254 | bessel_In_array :: Int -> Int -> Double -> Ptr Double -> Int |
213 | bessel_In_array = gsl_sf_bessel_In_array | 255 | bessel_In_array = gsl_sf_bessel_In_array |
214 | foreign import ccall "bessel.h gsl_sf_bessel_In_array" gsl_sf_bessel_In_array :: Int -> Int -> Double -> Ptr Double -> Int | 256 | foreign import ccall "bessel.h gsl_sf_bessel_In_array" gsl_sf_bessel_In_array :: Int -> Int -> Double -> Ptr Double -> Int |
215 | 257 | ||
216 | -- | wrapper for int gsl_sf_bessel_I0_scaled_e(double x,gsl_sf_result* result); | 258 | -- | wrapper for int gsl_sf_bessel_I0_scaled_e(double x,gsl_sf_result* result); |
259 | -- | ||
260 | -- <http://www.google.com/search?q=gsl_sf_bessel_I0_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
217 | bessel_I0_scaled_e :: Double -> (Double,Double) | 261 | bessel_I0_scaled_e :: Double -> (Double,Double) |
218 | bessel_I0_scaled_e x = createSFR "bessel_I0_scaled_e" $ gsl_sf_bessel_I0_scaled_e x | 262 | bessel_I0_scaled_e x = createSFR "bessel_I0_scaled_e" $ gsl_sf_bessel_I0_scaled_e x |
219 | foreign import ccall "bessel.h gsl_sf_bessel_I0_scaled_e" gsl_sf_bessel_I0_scaled_e :: Double -> Ptr Double -> IO(Int) | 263 | foreign import ccall "bessel.h gsl_sf_bessel_I0_scaled_e" gsl_sf_bessel_I0_scaled_e :: Double -> Ptr Double -> IO(Int) |
220 | 264 | ||
221 | -- | wrapper for double gsl_sf_bessel_I0_scaled(double x); | 265 | -- | wrapper for double gsl_sf_bessel_I0_scaled(double x); |
266 | -- | ||
267 | -- <http://www.google.com/search?q=gsl_sf_bessel_I0_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
222 | bessel_I0_scaled :: Double -> Double | 268 | bessel_I0_scaled :: Double -> Double |
223 | bessel_I0_scaled = gsl_sf_bessel_I0_scaled | 269 | bessel_I0_scaled = gsl_sf_bessel_I0_scaled |
224 | foreign import ccall "bessel.h gsl_sf_bessel_I0_scaled" gsl_sf_bessel_I0_scaled :: Double -> Double | 270 | foreign import ccall "bessel.h gsl_sf_bessel_I0_scaled" gsl_sf_bessel_I0_scaled :: Double -> Double |
225 | 271 | ||
226 | -- | wrapper for int gsl_sf_bessel_I1_scaled_e(double x,gsl_sf_result* result); | 272 | -- | wrapper for int gsl_sf_bessel_I1_scaled_e(double x,gsl_sf_result* result); |
273 | -- | ||
274 | -- <http://www.google.com/search?q=gsl_sf_bessel_I1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
227 | bessel_I1_scaled_e :: Double -> (Double,Double) | 275 | bessel_I1_scaled_e :: Double -> (Double,Double) |
228 | bessel_I1_scaled_e x = createSFR "bessel_I1_scaled_e" $ gsl_sf_bessel_I1_scaled_e x | 276 | bessel_I1_scaled_e x = createSFR "bessel_I1_scaled_e" $ gsl_sf_bessel_I1_scaled_e x |
229 | foreign import ccall "bessel.h gsl_sf_bessel_I1_scaled_e" gsl_sf_bessel_I1_scaled_e :: Double -> Ptr Double -> IO(Int) | 277 | foreign import ccall "bessel.h gsl_sf_bessel_I1_scaled_e" gsl_sf_bessel_I1_scaled_e :: Double -> Ptr Double -> IO(Int) |
230 | 278 | ||
231 | -- | wrapper for double gsl_sf_bessel_I1_scaled(double x); | 279 | -- | wrapper for double gsl_sf_bessel_I1_scaled(double x); |
280 | -- | ||
281 | -- <http://www.google.com/search?q=gsl_sf_bessel_I1_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
232 | bessel_I1_scaled :: Double -> Double | 282 | bessel_I1_scaled :: Double -> Double |
233 | bessel_I1_scaled = gsl_sf_bessel_I1_scaled | 283 | bessel_I1_scaled = gsl_sf_bessel_I1_scaled |
234 | foreign import ccall "bessel.h gsl_sf_bessel_I1_scaled" gsl_sf_bessel_I1_scaled :: Double -> Double | 284 | foreign import ccall "bessel.h gsl_sf_bessel_I1_scaled" gsl_sf_bessel_I1_scaled :: Double -> Double |
235 | 285 | ||
236 | -- | wrapper for int gsl_sf_bessel_In_scaled_e(int n,double x,gsl_sf_result* result); | 286 | -- | wrapper for int gsl_sf_bessel_In_scaled_e(int n,double x,gsl_sf_result* result); |
287 | -- | ||
288 | -- <http://www.google.com/search?q=gsl_sf_bessel_In_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
237 | bessel_In_scaled_e :: Int -> Double -> (Double,Double) | 289 | bessel_In_scaled_e :: Int -> Double -> (Double,Double) |
238 | bessel_In_scaled_e n x = createSFR "bessel_In_scaled_e" $ gsl_sf_bessel_In_scaled_e n x | 290 | bessel_In_scaled_e n x = createSFR "bessel_In_scaled_e" $ gsl_sf_bessel_In_scaled_e n x |
239 | foreign import ccall "bessel.h gsl_sf_bessel_In_scaled_e" gsl_sf_bessel_In_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) | 291 | foreign import ccall "bessel.h gsl_sf_bessel_In_scaled_e" gsl_sf_bessel_In_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) |
240 | 292 | ||
241 | -- | wrapper for double gsl_sf_bessel_In_scaled(int n,double x); | 293 | -- | wrapper for double gsl_sf_bessel_In_scaled(int n,double x); |
294 | -- | ||
295 | -- <http://www.google.com/search?q=gsl_sf_bessel_In_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
242 | bessel_In_scaled :: Int -> Double -> Double | 296 | bessel_In_scaled :: Int -> Double -> Double |
243 | bessel_In_scaled = gsl_sf_bessel_In_scaled | 297 | bessel_In_scaled = gsl_sf_bessel_In_scaled |
244 | foreign import ccall "bessel.h gsl_sf_bessel_In_scaled" gsl_sf_bessel_In_scaled :: Int -> Double -> Double | 298 | foreign import ccall "bessel.h gsl_sf_bessel_In_scaled" gsl_sf_bessel_In_scaled :: Int -> Double -> Double |
245 | 299 | ||
246 | -- | wrapper for int gsl_sf_bessel_In_scaled_array(int nmin,int nmax,double x,double* result_array); | 300 | -- | wrapper for int gsl_sf_bessel_In_scaled_array(int nmin,int nmax,double x,double* result_array); |
301 | -- | ||
302 | -- <http://www.google.com/search?q=gsl_sf_bessel_In_scaled_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
247 | bessel_In_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int | 303 | bessel_In_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int |
248 | bessel_In_scaled_array = gsl_sf_bessel_In_scaled_array | 304 | bessel_In_scaled_array = gsl_sf_bessel_In_scaled_array |
249 | foreign import ccall "bessel.h gsl_sf_bessel_In_scaled_array" gsl_sf_bessel_In_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int | 305 | foreign import ccall "bessel.h gsl_sf_bessel_In_scaled_array" gsl_sf_bessel_In_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int |
250 | 306 | ||
251 | -- | wrapper for int gsl_sf_bessel_K0_e(double x,gsl_sf_result* result); | 307 | -- | wrapper for int gsl_sf_bessel_K0_e(double x,gsl_sf_result* result); |
308 | -- | ||
309 | -- <http://www.google.com/search?q=gsl_sf_bessel_K0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
252 | bessel_K0_e :: Double -> (Double,Double) | 310 | bessel_K0_e :: Double -> (Double,Double) |
253 | bessel_K0_e x = createSFR "bessel_K0_e" $ gsl_sf_bessel_K0_e x | 311 | bessel_K0_e x = createSFR "bessel_K0_e" $ gsl_sf_bessel_K0_e x |
254 | foreign import ccall "bessel.h gsl_sf_bessel_K0_e" gsl_sf_bessel_K0_e :: Double -> Ptr Double -> IO(Int) | 312 | foreign import ccall "bessel.h gsl_sf_bessel_K0_e" gsl_sf_bessel_K0_e :: Double -> Ptr Double -> IO(Int) |
255 | 313 | ||
256 | -- | wrapper for double gsl_sf_bessel_K0(double x); | 314 | -- | wrapper for double gsl_sf_bessel_K0(double x); |
315 | -- | ||
316 | -- <http://www.google.com/search?q=gsl_sf_bessel_K0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
257 | bessel_K0 :: Double -> Double | 317 | bessel_K0 :: Double -> Double |
258 | bessel_K0 = gsl_sf_bessel_K0 | 318 | bessel_K0 = gsl_sf_bessel_K0 |
259 | foreign import ccall "bessel.h gsl_sf_bessel_K0" gsl_sf_bessel_K0 :: Double -> Double | 319 | foreign import ccall "bessel.h gsl_sf_bessel_K0" gsl_sf_bessel_K0 :: Double -> Double |
260 | 320 | ||
261 | -- | wrapper for int gsl_sf_bessel_K1_e(double x,gsl_sf_result* result); | 321 | -- | wrapper for int gsl_sf_bessel_K1_e(double x,gsl_sf_result* result); |
322 | -- | ||
323 | -- <http://www.google.com/search?q=gsl_sf_bessel_K1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
262 | bessel_K1_e :: Double -> (Double,Double) | 324 | bessel_K1_e :: Double -> (Double,Double) |
263 | bessel_K1_e x = createSFR "bessel_K1_e" $ gsl_sf_bessel_K1_e x | 325 | bessel_K1_e x = createSFR "bessel_K1_e" $ gsl_sf_bessel_K1_e x |
264 | foreign import ccall "bessel.h gsl_sf_bessel_K1_e" gsl_sf_bessel_K1_e :: Double -> Ptr Double -> IO(Int) | 326 | foreign import ccall "bessel.h gsl_sf_bessel_K1_e" gsl_sf_bessel_K1_e :: Double -> Ptr Double -> IO(Int) |
265 | 327 | ||
266 | -- | wrapper for double gsl_sf_bessel_K1(double x); | 328 | -- | wrapper for double gsl_sf_bessel_K1(double x); |
329 | -- | ||
330 | -- <http://www.google.com/search?q=gsl_sf_bessel_K1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
267 | bessel_K1 :: Double -> Double | 331 | bessel_K1 :: Double -> Double |
268 | bessel_K1 = gsl_sf_bessel_K1 | 332 | bessel_K1 = gsl_sf_bessel_K1 |
269 | foreign import ccall "bessel.h gsl_sf_bessel_K1" gsl_sf_bessel_K1 :: Double -> Double | 333 | foreign import ccall "bessel.h gsl_sf_bessel_K1" gsl_sf_bessel_K1 :: Double -> Double |
270 | 334 | ||
271 | -- | wrapper for int gsl_sf_bessel_Kn_e(int n,double x,gsl_sf_result* result); | 335 | -- | wrapper for int gsl_sf_bessel_Kn_e(int n,double x,gsl_sf_result* result); |
336 | -- | ||
337 | -- <http://www.google.com/search?q=gsl_sf_bessel_Kn_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
272 | bessel_Kn_e :: Int -> Double -> (Double,Double) | 338 | bessel_Kn_e :: Int -> Double -> (Double,Double) |
273 | bessel_Kn_e n x = createSFR "bessel_Kn_e" $ gsl_sf_bessel_Kn_e n x | 339 | bessel_Kn_e n x = createSFR "bessel_Kn_e" $ gsl_sf_bessel_Kn_e n x |
274 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_e" gsl_sf_bessel_Kn_e :: Int -> Double -> Ptr Double -> IO(Int) | 340 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_e" gsl_sf_bessel_Kn_e :: Int -> Double -> Ptr Double -> IO(Int) |
275 | 341 | ||
276 | -- | wrapper for double gsl_sf_bessel_Kn(int n,double x); | 342 | -- | wrapper for double gsl_sf_bessel_Kn(int n,double x); |
343 | -- | ||
344 | -- <http://www.google.com/search?q=gsl_sf_bessel_Kn&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
277 | bessel_Kn :: Int -> Double -> Double | 345 | bessel_Kn :: Int -> Double -> Double |
278 | bessel_Kn = gsl_sf_bessel_Kn | 346 | bessel_Kn = gsl_sf_bessel_Kn |
279 | foreign import ccall "bessel.h gsl_sf_bessel_Kn" gsl_sf_bessel_Kn :: Int -> Double -> Double | 347 | foreign import ccall "bessel.h gsl_sf_bessel_Kn" gsl_sf_bessel_Kn :: Int -> Double -> Double |
280 | 348 | ||
281 | -- | wrapper for int gsl_sf_bessel_Kn_array(int nmin,int nmax,double x,double* result_array); | 349 | -- | wrapper for int gsl_sf_bessel_Kn_array(int nmin,int nmax,double x,double* result_array); |
350 | -- | ||
351 | -- <http://www.google.com/search?q=gsl_sf_bessel_Kn_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
282 | bessel_Kn_array :: Int -> Int -> Double -> Ptr Double -> Int | 352 | bessel_Kn_array :: Int -> Int -> Double -> Ptr Double -> Int |
283 | bessel_Kn_array = gsl_sf_bessel_Kn_array | 353 | bessel_Kn_array = gsl_sf_bessel_Kn_array |
284 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_array" gsl_sf_bessel_Kn_array :: Int -> Int -> Double -> Ptr Double -> Int | 354 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_array" gsl_sf_bessel_Kn_array :: Int -> Int -> Double -> Ptr Double -> Int |
285 | 355 | ||
286 | -- | wrapper for int gsl_sf_bessel_K0_scaled_e(double x,gsl_sf_result* result); | 356 | -- | wrapper for int gsl_sf_bessel_K0_scaled_e(double x,gsl_sf_result* result); |
357 | -- | ||
358 | -- <http://www.google.com/search?q=gsl_sf_bessel_K0_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
287 | bessel_K0_scaled_e :: Double -> (Double,Double) | 359 | bessel_K0_scaled_e :: Double -> (Double,Double) |
288 | bessel_K0_scaled_e x = createSFR "bessel_K0_scaled_e" $ gsl_sf_bessel_K0_scaled_e x | 360 | bessel_K0_scaled_e x = createSFR "bessel_K0_scaled_e" $ gsl_sf_bessel_K0_scaled_e x |
289 | foreign import ccall "bessel.h gsl_sf_bessel_K0_scaled_e" gsl_sf_bessel_K0_scaled_e :: Double -> Ptr Double -> IO(Int) | 361 | foreign import ccall "bessel.h gsl_sf_bessel_K0_scaled_e" gsl_sf_bessel_K0_scaled_e :: Double -> Ptr Double -> IO(Int) |
290 | 362 | ||
291 | -- | wrapper for double gsl_sf_bessel_K0_scaled(double x); | 363 | -- | wrapper for double gsl_sf_bessel_K0_scaled(double x); |
364 | -- | ||
365 | -- <http://www.google.com/search?q=gsl_sf_bessel_K0_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
292 | bessel_K0_scaled :: Double -> Double | 366 | bessel_K0_scaled :: Double -> Double |
293 | bessel_K0_scaled = gsl_sf_bessel_K0_scaled | 367 | bessel_K0_scaled = gsl_sf_bessel_K0_scaled |
294 | foreign import ccall "bessel.h gsl_sf_bessel_K0_scaled" gsl_sf_bessel_K0_scaled :: Double -> Double | 368 | foreign import ccall "bessel.h gsl_sf_bessel_K0_scaled" gsl_sf_bessel_K0_scaled :: Double -> Double |
295 | 369 | ||
296 | -- | wrapper for int gsl_sf_bessel_K1_scaled_e(double x,gsl_sf_result* result); | 370 | -- | wrapper for int gsl_sf_bessel_K1_scaled_e(double x,gsl_sf_result* result); |
371 | -- | ||
372 | -- <http://www.google.com/search?q=gsl_sf_bessel_K1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
297 | bessel_K1_scaled_e :: Double -> (Double,Double) | 373 | bessel_K1_scaled_e :: Double -> (Double,Double) |
298 | bessel_K1_scaled_e x = createSFR "bessel_K1_scaled_e" $ gsl_sf_bessel_K1_scaled_e x | 374 | bessel_K1_scaled_e x = createSFR "bessel_K1_scaled_e" $ gsl_sf_bessel_K1_scaled_e x |
299 | foreign import ccall "bessel.h gsl_sf_bessel_K1_scaled_e" gsl_sf_bessel_K1_scaled_e :: Double -> Ptr Double -> IO(Int) | 375 | foreign import ccall "bessel.h gsl_sf_bessel_K1_scaled_e" gsl_sf_bessel_K1_scaled_e :: Double -> Ptr Double -> IO(Int) |
300 | 376 | ||
301 | -- | wrapper for double gsl_sf_bessel_K1_scaled(double x); | 377 | -- | wrapper for double gsl_sf_bessel_K1_scaled(double x); |
378 | -- | ||
379 | -- <http://www.google.com/search?q=gsl_sf_bessel_K1_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
302 | bessel_K1_scaled :: Double -> Double | 380 | bessel_K1_scaled :: Double -> Double |
303 | bessel_K1_scaled = gsl_sf_bessel_K1_scaled | 381 | bessel_K1_scaled = gsl_sf_bessel_K1_scaled |
304 | foreign import ccall "bessel.h gsl_sf_bessel_K1_scaled" gsl_sf_bessel_K1_scaled :: Double -> Double | 382 | foreign import ccall "bessel.h gsl_sf_bessel_K1_scaled" gsl_sf_bessel_K1_scaled :: Double -> Double |
305 | 383 | ||
306 | -- | wrapper for int gsl_sf_bessel_Kn_scaled_e(int n,double x,gsl_sf_result* result); | 384 | -- | wrapper for int gsl_sf_bessel_Kn_scaled_e(int n,double x,gsl_sf_result* result); |
385 | -- | ||
386 | -- <http://www.google.com/search?q=gsl_sf_bessel_Kn_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
307 | bessel_Kn_scaled_e :: Int -> Double -> (Double,Double) | 387 | bessel_Kn_scaled_e :: Int -> Double -> (Double,Double) |
308 | bessel_Kn_scaled_e n x = createSFR "bessel_Kn_scaled_e" $ gsl_sf_bessel_Kn_scaled_e n x | 388 | bessel_Kn_scaled_e n x = createSFR "bessel_Kn_scaled_e" $ gsl_sf_bessel_Kn_scaled_e n x |
309 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_scaled_e" gsl_sf_bessel_Kn_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) | 389 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_scaled_e" gsl_sf_bessel_Kn_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) |
310 | 390 | ||
311 | -- | wrapper for double gsl_sf_bessel_Kn_scaled(int n,double x); | 391 | -- | wrapper for double gsl_sf_bessel_Kn_scaled(int n,double x); |
392 | -- | ||
393 | -- <http://www.google.com/search?q=gsl_sf_bessel_Kn_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
312 | bessel_Kn_scaled :: Int -> Double -> Double | 394 | bessel_Kn_scaled :: Int -> Double -> Double |
313 | bessel_Kn_scaled = gsl_sf_bessel_Kn_scaled | 395 | bessel_Kn_scaled = gsl_sf_bessel_Kn_scaled |
314 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_scaled" gsl_sf_bessel_Kn_scaled :: Int -> Double -> Double | 396 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_scaled" gsl_sf_bessel_Kn_scaled :: Int -> Double -> Double |
315 | 397 | ||
316 | -- | wrapper for int gsl_sf_bessel_Kn_scaled_array(int nmin,int nmax,double x,double* result_array); | 398 | -- | wrapper for int gsl_sf_bessel_Kn_scaled_array(int nmin,int nmax,double x,double* result_array); |
399 | -- | ||
400 | -- <http://www.google.com/search?q=gsl_sf_bessel_Kn_scaled_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
317 | bessel_Kn_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int | 401 | bessel_Kn_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int |
318 | bessel_Kn_scaled_array = gsl_sf_bessel_Kn_scaled_array | 402 | bessel_Kn_scaled_array = gsl_sf_bessel_Kn_scaled_array |
319 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_scaled_array" gsl_sf_bessel_Kn_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int | 403 | foreign import ccall "bessel.h gsl_sf_bessel_Kn_scaled_array" gsl_sf_bessel_Kn_scaled_array :: Int -> Int -> Double -> Ptr Double -> Int |
320 | 404 | ||
321 | -- | wrapper for int gsl_sf_bessel_j0_e(double x,gsl_sf_result* result); | 405 | -- | wrapper for int gsl_sf_bessel_j0_e(double x,gsl_sf_result* result); |
406 | -- | ||
407 | -- <http://www.google.com/search?q=gsl_sf_bessel_j0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
322 | bessel_j0_e :: Double -> (Double,Double) | 408 | bessel_j0_e :: Double -> (Double,Double) |
323 | bessel_j0_e x = createSFR "bessel_j0_e" $ gsl_sf_bessel_j0_e x | 409 | bessel_j0_e x = createSFR "bessel_j0_e" $ gsl_sf_bessel_j0_e x |
324 | foreign import ccall "bessel.h gsl_sf_bessel_j0_e" gsl_sf_bessel_j0_e :: Double -> Ptr Double -> IO(Int) | 410 | foreign import ccall "bessel.h gsl_sf_bessel_j0_e" gsl_sf_bessel_j0_e :: Double -> Ptr Double -> IO(Int) |
325 | 411 | ||
326 | -- | wrapper for double gsl_sf_bessel_j0(double x); | 412 | -- | wrapper for double gsl_sf_bessel_j0(double x); |
413 | -- | ||
414 | -- <http://www.google.com/search?q=gsl_sf_bessel_j0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
327 | bessel_j0 :: Double -> Double | 415 | bessel_j0 :: Double -> Double |
328 | bessel_j0 = gsl_sf_bessel_j0 | 416 | bessel_j0 = gsl_sf_bessel_j0 |
329 | foreign import ccall "bessel.h gsl_sf_bessel_j0" gsl_sf_bessel_j0 :: Double -> Double | 417 | foreign import ccall "bessel.h gsl_sf_bessel_j0" gsl_sf_bessel_j0 :: Double -> Double |
330 | 418 | ||
331 | -- | wrapper for int gsl_sf_bessel_j1_e(double x,gsl_sf_result* result); | 419 | -- | wrapper for int gsl_sf_bessel_j1_e(double x,gsl_sf_result* result); |
420 | -- | ||
421 | -- <http://www.google.com/search?q=gsl_sf_bessel_j1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
332 | bessel_j1_e :: Double -> (Double,Double) | 422 | bessel_j1_e :: Double -> (Double,Double) |
333 | bessel_j1_e x = createSFR "bessel_j1_e" $ gsl_sf_bessel_j1_e x | 423 | bessel_j1_e x = createSFR "bessel_j1_e" $ gsl_sf_bessel_j1_e x |
334 | foreign import ccall "bessel.h gsl_sf_bessel_j1_e" gsl_sf_bessel_j1_e :: Double -> Ptr Double -> IO(Int) | 424 | foreign import ccall "bessel.h gsl_sf_bessel_j1_e" gsl_sf_bessel_j1_e :: Double -> Ptr Double -> IO(Int) |
335 | 425 | ||
336 | -- | wrapper for double gsl_sf_bessel_j1(double x); | 426 | -- | wrapper for double gsl_sf_bessel_j1(double x); |
427 | -- | ||
428 | -- <http://www.google.com/search?q=gsl_sf_bessel_j1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
337 | bessel_j1 :: Double -> Double | 429 | bessel_j1 :: Double -> Double |
338 | bessel_j1 = gsl_sf_bessel_j1 | 430 | bessel_j1 = gsl_sf_bessel_j1 |
339 | foreign import ccall "bessel.h gsl_sf_bessel_j1" gsl_sf_bessel_j1 :: Double -> Double | 431 | foreign import ccall "bessel.h gsl_sf_bessel_j1" gsl_sf_bessel_j1 :: Double -> Double |
340 | 432 | ||
341 | -- | wrapper for int gsl_sf_bessel_j2_e(double x,gsl_sf_result* result); | 433 | -- | wrapper for int gsl_sf_bessel_j2_e(double x,gsl_sf_result* result); |
434 | -- | ||
435 | -- <http://www.google.com/search?q=gsl_sf_bessel_j2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
342 | bessel_j2_e :: Double -> (Double,Double) | 436 | bessel_j2_e :: Double -> (Double,Double) |
343 | bessel_j2_e x = createSFR "bessel_j2_e" $ gsl_sf_bessel_j2_e x | 437 | bessel_j2_e x = createSFR "bessel_j2_e" $ gsl_sf_bessel_j2_e x |
344 | foreign import ccall "bessel.h gsl_sf_bessel_j2_e" gsl_sf_bessel_j2_e :: Double -> Ptr Double -> IO(Int) | 438 | foreign import ccall "bessel.h gsl_sf_bessel_j2_e" gsl_sf_bessel_j2_e :: Double -> Ptr Double -> IO(Int) |
345 | 439 | ||
346 | -- | wrapper for double gsl_sf_bessel_j2(double x); | 440 | -- | wrapper for double gsl_sf_bessel_j2(double x); |
441 | -- | ||
442 | -- <http://www.google.com/search?q=gsl_sf_bessel_j2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
347 | bessel_j2 :: Double -> Double | 443 | bessel_j2 :: Double -> Double |
348 | bessel_j2 = gsl_sf_bessel_j2 | 444 | bessel_j2 = gsl_sf_bessel_j2 |
349 | foreign import ccall "bessel.h gsl_sf_bessel_j2" gsl_sf_bessel_j2 :: Double -> Double | 445 | foreign import ccall "bessel.h gsl_sf_bessel_j2" gsl_sf_bessel_j2 :: Double -> Double |
350 | 446 | ||
351 | -- | wrapper for int gsl_sf_bessel_jl_e(int l,double x,gsl_sf_result* result); | 447 | -- | wrapper for int gsl_sf_bessel_jl_e(int l,double x,gsl_sf_result* result); |
448 | -- | ||
449 | -- <http://www.google.com/search?q=gsl_sf_bessel_jl_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
352 | bessel_jl_e :: Int -> Double -> (Double,Double) | 450 | bessel_jl_e :: Int -> Double -> (Double,Double) |
353 | bessel_jl_e l x = createSFR "bessel_jl_e" $ gsl_sf_bessel_jl_e l x | 451 | bessel_jl_e l x = createSFR "bessel_jl_e" $ gsl_sf_bessel_jl_e l x |
354 | foreign import ccall "bessel.h gsl_sf_bessel_jl_e" gsl_sf_bessel_jl_e :: Int -> Double -> Ptr Double -> IO(Int) | 452 | foreign import ccall "bessel.h gsl_sf_bessel_jl_e" gsl_sf_bessel_jl_e :: Int -> Double -> Ptr Double -> IO(Int) |
355 | 453 | ||
356 | -- | wrapper for double gsl_sf_bessel_jl(int l,double x); | 454 | -- | wrapper for double gsl_sf_bessel_jl(int l,double x); |
455 | -- | ||
456 | -- <http://www.google.com/search?q=gsl_sf_bessel_jl&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
357 | bessel_jl :: Int -> Double -> Double | 457 | bessel_jl :: Int -> Double -> Double |
358 | bessel_jl = gsl_sf_bessel_jl | 458 | bessel_jl = gsl_sf_bessel_jl |
359 | foreign import ccall "bessel.h gsl_sf_bessel_jl" gsl_sf_bessel_jl :: Int -> Double -> Double | 459 | foreign import ccall "bessel.h gsl_sf_bessel_jl" gsl_sf_bessel_jl :: Int -> Double -> Double |
360 | 460 | ||
361 | -- | wrapper for int gsl_sf_bessel_jl_array(int lmax,double x,double* result_array); | 461 | -- | wrapper for int gsl_sf_bessel_jl_array(int lmax,double x,double* result_array); |
462 | -- | ||
463 | -- <http://www.google.com/search?q=gsl_sf_bessel_jl_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
362 | bessel_jl_array :: Int -> Double -> Ptr Double -> Int | 464 | bessel_jl_array :: Int -> Double -> Ptr Double -> Int |
363 | bessel_jl_array = gsl_sf_bessel_jl_array | 465 | bessel_jl_array = gsl_sf_bessel_jl_array |
364 | foreign import ccall "bessel.h gsl_sf_bessel_jl_array" gsl_sf_bessel_jl_array :: Int -> Double -> Ptr Double -> Int | 466 | foreign import ccall "bessel.h gsl_sf_bessel_jl_array" gsl_sf_bessel_jl_array :: Int -> Double -> Ptr Double -> Int |
365 | 467 | ||
366 | -- | wrapper for int gsl_sf_bessel_jl_steed_array(int lmax,double x,double* jl_x_array); | 468 | -- | wrapper for int gsl_sf_bessel_jl_steed_array(int lmax,double x,double* jl_x_array); |
469 | -- | ||
470 | -- <http://www.google.com/search?q=gsl_sf_bessel_jl_steed_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
367 | bessel_jl_steed_array :: Int -> Double -> Ptr Double -> Int | 471 | bessel_jl_steed_array :: Int -> Double -> Ptr Double -> Int |
368 | bessel_jl_steed_array = gsl_sf_bessel_jl_steed_array | 472 | bessel_jl_steed_array = gsl_sf_bessel_jl_steed_array |
369 | foreign import ccall "bessel.h gsl_sf_bessel_jl_steed_array" gsl_sf_bessel_jl_steed_array :: Int -> Double -> Ptr Double -> Int | 473 | foreign import ccall "bessel.h gsl_sf_bessel_jl_steed_array" gsl_sf_bessel_jl_steed_array :: Int -> Double -> Ptr Double -> Int |
370 | 474 | ||
371 | -- | wrapper for int gsl_sf_bessel_y0_e(double x,gsl_sf_result* result); | 475 | -- | wrapper for int gsl_sf_bessel_y0_e(double x,gsl_sf_result* result); |
476 | -- | ||
477 | -- <http://www.google.com/search?q=gsl_sf_bessel_y0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
372 | bessel_y0_e :: Double -> (Double,Double) | 478 | bessel_y0_e :: Double -> (Double,Double) |
373 | bessel_y0_e x = createSFR "bessel_y0_e" $ gsl_sf_bessel_y0_e x | 479 | bessel_y0_e x = createSFR "bessel_y0_e" $ gsl_sf_bessel_y0_e x |
374 | foreign import ccall "bessel.h gsl_sf_bessel_y0_e" gsl_sf_bessel_y0_e :: Double -> Ptr Double -> IO(Int) | 480 | foreign import ccall "bessel.h gsl_sf_bessel_y0_e" gsl_sf_bessel_y0_e :: Double -> Ptr Double -> IO(Int) |
375 | 481 | ||
376 | -- | wrapper for double gsl_sf_bessel_y0(double x); | 482 | -- | wrapper for double gsl_sf_bessel_y0(double x); |
483 | -- | ||
484 | -- <http://www.google.com/search?q=gsl_sf_bessel_y0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
377 | bessel_y0 :: Double -> Double | 485 | bessel_y0 :: Double -> Double |
378 | bessel_y0 = gsl_sf_bessel_y0 | 486 | bessel_y0 = gsl_sf_bessel_y0 |
379 | foreign import ccall "bessel.h gsl_sf_bessel_y0" gsl_sf_bessel_y0 :: Double -> Double | 487 | foreign import ccall "bessel.h gsl_sf_bessel_y0" gsl_sf_bessel_y0 :: Double -> Double |
380 | 488 | ||
381 | -- | wrapper for int gsl_sf_bessel_y1_e(double x,gsl_sf_result* result); | 489 | -- | wrapper for int gsl_sf_bessel_y1_e(double x,gsl_sf_result* result); |
490 | -- | ||
491 | -- <http://www.google.com/search?q=gsl_sf_bessel_y1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
382 | bessel_y1_e :: Double -> (Double,Double) | 492 | bessel_y1_e :: Double -> (Double,Double) |
383 | bessel_y1_e x = createSFR "bessel_y1_e" $ gsl_sf_bessel_y1_e x | 493 | bessel_y1_e x = createSFR "bessel_y1_e" $ gsl_sf_bessel_y1_e x |
384 | foreign import ccall "bessel.h gsl_sf_bessel_y1_e" gsl_sf_bessel_y1_e :: Double -> Ptr Double -> IO(Int) | 494 | foreign import ccall "bessel.h gsl_sf_bessel_y1_e" gsl_sf_bessel_y1_e :: Double -> Ptr Double -> IO(Int) |
385 | 495 | ||
386 | -- | wrapper for double gsl_sf_bessel_y1(double x); | 496 | -- | wrapper for double gsl_sf_bessel_y1(double x); |
497 | -- | ||
498 | -- <http://www.google.com/search?q=gsl_sf_bessel_y1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
387 | bessel_y1 :: Double -> Double | 499 | bessel_y1 :: Double -> Double |
388 | bessel_y1 = gsl_sf_bessel_y1 | 500 | bessel_y1 = gsl_sf_bessel_y1 |
389 | foreign import ccall "bessel.h gsl_sf_bessel_y1" gsl_sf_bessel_y1 :: Double -> Double | 501 | foreign import ccall "bessel.h gsl_sf_bessel_y1" gsl_sf_bessel_y1 :: Double -> Double |
390 | 502 | ||
391 | -- | wrapper for int gsl_sf_bessel_y2_e(double x,gsl_sf_result* result); | 503 | -- | wrapper for int gsl_sf_bessel_y2_e(double x,gsl_sf_result* result); |
504 | -- | ||
505 | -- <http://www.google.com/search?q=gsl_sf_bessel_y2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
392 | bessel_y2_e :: Double -> (Double,Double) | 506 | bessel_y2_e :: Double -> (Double,Double) |
393 | bessel_y2_e x = createSFR "bessel_y2_e" $ gsl_sf_bessel_y2_e x | 507 | bessel_y2_e x = createSFR "bessel_y2_e" $ gsl_sf_bessel_y2_e x |
394 | foreign import ccall "bessel.h gsl_sf_bessel_y2_e" gsl_sf_bessel_y2_e :: Double -> Ptr Double -> IO(Int) | 508 | foreign import ccall "bessel.h gsl_sf_bessel_y2_e" gsl_sf_bessel_y2_e :: Double -> Ptr Double -> IO(Int) |
395 | 509 | ||
396 | -- | wrapper for double gsl_sf_bessel_y2(double x); | 510 | -- | wrapper for double gsl_sf_bessel_y2(double x); |
511 | -- | ||
512 | -- <http://www.google.com/search?q=gsl_sf_bessel_y2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
397 | bessel_y2 :: Double -> Double | 513 | bessel_y2 :: Double -> Double |
398 | bessel_y2 = gsl_sf_bessel_y2 | 514 | bessel_y2 = gsl_sf_bessel_y2 |
399 | foreign import ccall "bessel.h gsl_sf_bessel_y2" gsl_sf_bessel_y2 :: Double -> Double | 515 | foreign import ccall "bessel.h gsl_sf_bessel_y2" gsl_sf_bessel_y2 :: Double -> Double |
400 | 516 | ||
401 | -- | wrapper for int gsl_sf_bessel_yl_e(int l,double x,gsl_sf_result* result); | 517 | -- | wrapper for int gsl_sf_bessel_yl_e(int l,double x,gsl_sf_result* result); |
518 | -- | ||
519 | -- <http://www.google.com/search?q=gsl_sf_bessel_yl_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
402 | bessel_yl_e :: Int -> Double -> (Double,Double) | 520 | bessel_yl_e :: Int -> Double -> (Double,Double) |
403 | bessel_yl_e l x = createSFR "bessel_yl_e" $ gsl_sf_bessel_yl_e l x | 521 | bessel_yl_e l x = createSFR "bessel_yl_e" $ gsl_sf_bessel_yl_e l x |
404 | foreign import ccall "bessel.h gsl_sf_bessel_yl_e" gsl_sf_bessel_yl_e :: Int -> Double -> Ptr Double -> IO(Int) | 522 | foreign import ccall "bessel.h gsl_sf_bessel_yl_e" gsl_sf_bessel_yl_e :: Int -> Double -> Ptr Double -> IO(Int) |
405 | 523 | ||
406 | -- | wrapper for double gsl_sf_bessel_yl(int l,double x); | 524 | -- | wrapper for double gsl_sf_bessel_yl(int l,double x); |
525 | -- | ||
526 | -- <http://www.google.com/search?q=gsl_sf_bessel_yl&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
407 | bessel_yl :: Int -> Double -> Double | 527 | bessel_yl :: Int -> Double -> Double |
408 | bessel_yl = gsl_sf_bessel_yl | 528 | bessel_yl = gsl_sf_bessel_yl |
409 | foreign import ccall "bessel.h gsl_sf_bessel_yl" gsl_sf_bessel_yl :: Int -> Double -> Double | 529 | foreign import ccall "bessel.h gsl_sf_bessel_yl" gsl_sf_bessel_yl :: Int -> Double -> Double |
410 | 530 | ||
411 | -- | wrapper for int gsl_sf_bessel_yl_array(int lmax,double x,double* result_array); | 531 | -- | wrapper for int gsl_sf_bessel_yl_array(int lmax,double x,double* result_array); |
532 | -- | ||
533 | -- <http://www.google.com/search?q=gsl_sf_bessel_yl_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
412 | bessel_yl_array :: Int -> Double -> Ptr Double -> Int | 534 | bessel_yl_array :: Int -> Double -> Ptr Double -> Int |
413 | bessel_yl_array = gsl_sf_bessel_yl_array | 535 | bessel_yl_array = gsl_sf_bessel_yl_array |
414 | foreign import ccall "bessel.h gsl_sf_bessel_yl_array" gsl_sf_bessel_yl_array :: Int -> Double -> Ptr Double -> Int | 536 | foreign import ccall "bessel.h gsl_sf_bessel_yl_array" gsl_sf_bessel_yl_array :: Int -> Double -> Ptr Double -> Int |
415 | 537 | ||
416 | -- | wrapper for int gsl_sf_bessel_i0_scaled_e(double x,gsl_sf_result* result); | 538 | -- | wrapper for int gsl_sf_bessel_i0_scaled_e(double x,gsl_sf_result* result); |
539 | -- | ||
540 | -- <http://www.google.com/search?q=gsl_sf_bessel_i0_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
417 | bessel_i0_scaled_e :: Double -> (Double,Double) | 541 | bessel_i0_scaled_e :: Double -> (Double,Double) |
418 | bessel_i0_scaled_e x = createSFR "bessel_i0_scaled_e" $ gsl_sf_bessel_i0_scaled_e x | 542 | bessel_i0_scaled_e x = createSFR "bessel_i0_scaled_e" $ gsl_sf_bessel_i0_scaled_e x |
419 | foreign import ccall "bessel.h gsl_sf_bessel_i0_scaled_e" gsl_sf_bessel_i0_scaled_e :: Double -> Ptr Double -> IO(Int) | 543 | foreign import ccall "bessel.h gsl_sf_bessel_i0_scaled_e" gsl_sf_bessel_i0_scaled_e :: Double -> Ptr Double -> IO(Int) |
420 | 544 | ||
421 | -- | wrapper for double gsl_sf_bessel_i0_scaled(double x); | 545 | -- | wrapper for double gsl_sf_bessel_i0_scaled(double x); |
546 | -- | ||
547 | -- <http://www.google.com/search?q=gsl_sf_bessel_i0_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
422 | bessel_i0_scaled :: Double -> Double | 548 | bessel_i0_scaled :: Double -> Double |
423 | bessel_i0_scaled = gsl_sf_bessel_i0_scaled | 549 | bessel_i0_scaled = gsl_sf_bessel_i0_scaled |
424 | foreign import ccall "bessel.h gsl_sf_bessel_i0_scaled" gsl_sf_bessel_i0_scaled :: Double -> Double | 550 | foreign import ccall "bessel.h gsl_sf_bessel_i0_scaled" gsl_sf_bessel_i0_scaled :: Double -> Double |
425 | 551 | ||
426 | -- | wrapper for int gsl_sf_bessel_i1_scaled_e(double x,gsl_sf_result* result); | 552 | -- | wrapper for int gsl_sf_bessel_i1_scaled_e(double x,gsl_sf_result* result); |
553 | -- | ||
554 | -- <http://www.google.com/search?q=gsl_sf_bessel_i1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
427 | bessel_i1_scaled_e :: Double -> (Double,Double) | 555 | bessel_i1_scaled_e :: Double -> (Double,Double) |
428 | bessel_i1_scaled_e x = createSFR "bessel_i1_scaled_e" $ gsl_sf_bessel_i1_scaled_e x | 556 | bessel_i1_scaled_e x = createSFR "bessel_i1_scaled_e" $ gsl_sf_bessel_i1_scaled_e x |
429 | foreign import ccall "bessel.h gsl_sf_bessel_i1_scaled_e" gsl_sf_bessel_i1_scaled_e :: Double -> Ptr Double -> IO(Int) | 557 | foreign import ccall "bessel.h gsl_sf_bessel_i1_scaled_e" gsl_sf_bessel_i1_scaled_e :: Double -> Ptr Double -> IO(Int) |
430 | 558 | ||
431 | -- | wrapper for double gsl_sf_bessel_i1_scaled(double x); | 559 | -- | wrapper for double gsl_sf_bessel_i1_scaled(double x); |
560 | -- | ||
561 | -- <http://www.google.com/search?q=gsl_sf_bessel_i1_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
432 | bessel_i1_scaled :: Double -> Double | 562 | bessel_i1_scaled :: Double -> Double |
433 | bessel_i1_scaled = gsl_sf_bessel_i1_scaled | 563 | bessel_i1_scaled = gsl_sf_bessel_i1_scaled |
434 | foreign import ccall "bessel.h gsl_sf_bessel_i1_scaled" gsl_sf_bessel_i1_scaled :: Double -> Double | 564 | foreign import ccall "bessel.h gsl_sf_bessel_i1_scaled" gsl_sf_bessel_i1_scaled :: Double -> Double |
435 | 565 | ||
436 | -- | wrapper for int gsl_sf_bessel_i2_scaled_e(double x,gsl_sf_result* result); | 566 | -- | wrapper for int gsl_sf_bessel_i2_scaled_e(double x,gsl_sf_result* result); |
567 | -- | ||
568 | -- <http://www.google.com/search?q=gsl_sf_bessel_i2_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
437 | bessel_i2_scaled_e :: Double -> (Double,Double) | 569 | bessel_i2_scaled_e :: Double -> (Double,Double) |
438 | bessel_i2_scaled_e x = createSFR "bessel_i2_scaled_e" $ gsl_sf_bessel_i2_scaled_e x | 570 | bessel_i2_scaled_e x = createSFR "bessel_i2_scaled_e" $ gsl_sf_bessel_i2_scaled_e x |
439 | foreign import ccall "bessel.h gsl_sf_bessel_i2_scaled_e" gsl_sf_bessel_i2_scaled_e :: Double -> Ptr Double -> IO(Int) | 571 | foreign import ccall "bessel.h gsl_sf_bessel_i2_scaled_e" gsl_sf_bessel_i2_scaled_e :: Double -> Ptr Double -> IO(Int) |
440 | 572 | ||
441 | -- | wrapper for double gsl_sf_bessel_i2_scaled(double x); | 573 | -- | wrapper for double gsl_sf_bessel_i2_scaled(double x); |
574 | -- | ||
575 | -- <http://www.google.com/search?q=gsl_sf_bessel_i2_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
442 | bessel_i2_scaled :: Double -> Double | 576 | bessel_i2_scaled :: Double -> Double |
443 | bessel_i2_scaled = gsl_sf_bessel_i2_scaled | 577 | bessel_i2_scaled = gsl_sf_bessel_i2_scaled |
444 | foreign import ccall "bessel.h gsl_sf_bessel_i2_scaled" gsl_sf_bessel_i2_scaled :: Double -> Double | 578 | foreign import ccall "bessel.h gsl_sf_bessel_i2_scaled" gsl_sf_bessel_i2_scaled :: Double -> Double |
445 | 579 | ||
446 | -- | wrapper for int gsl_sf_bessel_il_scaled_e(int l,double x,gsl_sf_result* result); | 580 | -- | wrapper for int gsl_sf_bessel_il_scaled_e(int l,double x,gsl_sf_result* result); |
581 | -- | ||
582 | -- <http://www.google.com/search?q=gsl_sf_bessel_il_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
447 | bessel_il_scaled_e :: Int -> Double -> (Double,Double) | 583 | bessel_il_scaled_e :: Int -> Double -> (Double,Double) |
448 | bessel_il_scaled_e l x = createSFR "bessel_il_scaled_e" $ gsl_sf_bessel_il_scaled_e l x | 584 | bessel_il_scaled_e l x = createSFR "bessel_il_scaled_e" $ gsl_sf_bessel_il_scaled_e l x |
449 | foreign import ccall "bessel.h gsl_sf_bessel_il_scaled_e" gsl_sf_bessel_il_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) | 585 | foreign import ccall "bessel.h gsl_sf_bessel_il_scaled_e" gsl_sf_bessel_il_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) |
450 | 586 | ||
451 | -- | wrapper for double gsl_sf_bessel_il_scaled(int l,double x); | 587 | -- | wrapper for double gsl_sf_bessel_il_scaled(int l,double x); |
588 | -- | ||
589 | -- <http://www.google.com/search?q=gsl_sf_bessel_il_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
452 | bessel_il_scaled :: Int -> Double -> Double | 590 | bessel_il_scaled :: Int -> Double -> Double |
453 | bessel_il_scaled = gsl_sf_bessel_il_scaled | 591 | bessel_il_scaled = gsl_sf_bessel_il_scaled |
454 | foreign import ccall "bessel.h gsl_sf_bessel_il_scaled" gsl_sf_bessel_il_scaled :: Int -> Double -> Double | 592 | foreign import ccall "bessel.h gsl_sf_bessel_il_scaled" gsl_sf_bessel_il_scaled :: Int -> Double -> Double |
455 | 593 | ||
456 | -- | wrapper for int gsl_sf_bessel_il_scaled_array(int lmax,double x,double* result_array); | 594 | -- | wrapper for int gsl_sf_bessel_il_scaled_array(int lmax,double x,double* result_array); |
595 | -- | ||
596 | -- <http://www.google.com/search?q=gsl_sf_bessel_il_scaled_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
457 | bessel_il_scaled_array :: Int -> Double -> Ptr Double -> Int | 597 | bessel_il_scaled_array :: Int -> Double -> Ptr Double -> Int |
458 | bessel_il_scaled_array = gsl_sf_bessel_il_scaled_array | 598 | bessel_il_scaled_array = gsl_sf_bessel_il_scaled_array |
459 | foreign import ccall "bessel.h gsl_sf_bessel_il_scaled_array" gsl_sf_bessel_il_scaled_array :: Int -> Double -> Ptr Double -> Int | 599 | foreign import ccall "bessel.h gsl_sf_bessel_il_scaled_array" gsl_sf_bessel_il_scaled_array :: Int -> Double -> Ptr Double -> Int |
460 | 600 | ||
461 | -- | wrapper for int gsl_sf_bessel_k0_scaled_e(double x,gsl_sf_result* result); | 601 | -- | wrapper for int gsl_sf_bessel_k0_scaled_e(double x,gsl_sf_result* result); |
602 | -- | ||
603 | -- <http://www.google.com/search?q=gsl_sf_bessel_k0_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
462 | bessel_k0_scaled_e :: Double -> (Double,Double) | 604 | bessel_k0_scaled_e :: Double -> (Double,Double) |
463 | bessel_k0_scaled_e x = createSFR "bessel_k0_scaled_e" $ gsl_sf_bessel_k0_scaled_e x | 605 | bessel_k0_scaled_e x = createSFR "bessel_k0_scaled_e" $ gsl_sf_bessel_k0_scaled_e x |
464 | foreign import ccall "bessel.h gsl_sf_bessel_k0_scaled_e" gsl_sf_bessel_k0_scaled_e :: Double -> Ptr Double -> IO(Int) | 606 | foreign import ccall "bessel.h gsl_sf_bessel_k0_scaled_e" gsl_sf_bessel_k0_scaled_e :: Double -> Ptr Double -> IO(Int) |
465 | 607 | ||
466 | -- | wrapper for double gsl_sf_bessel_k0_scaled(double x); | 608 | -- | wrapper for double gsl_sf_bessel_k0_scaled(double x); |
609 | -- | ||
610 | -- <http://www.google.com/search?q=gsl_sf_bessel_k0_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
467 | bessel_k0_scaled :: Double -> Double | 611 | bessel_k0_scaled :: Double -> Double |
468 | bessel_k0_scaled = gsl_sf_bessel_k0_scaled | 612 | bessel_k0_scaled = gsl_sf_bessel_k0_scaled |
469 | foreign import ccall "bessel.h gsl_sf_bessel_k0_scaled" gsl_sf_bessel_k0_scaled :: Double -> Double | 613 | foreign import ccall "bessel.h gsl_sf_bessel_k0_scaled" gsl_sf_bessel_k0_scaled :: Double -> Double |
470 | 614 | ||
471 | -- | wrapper for int gsl_sf_bessel_k1_scaled_e(double x,gsl_sf_result* result); | 615 | -- | wrapper for int gsl_sf_bessel_k1_scaled_e(double x,gsl_sf_result* result); |
616 | -- | ||
617 | -- <http://www.google.com/search?q=gsl_sf_bessel_k1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
472 | bessel_k1_scaled_e :: Double -> (Double,Double) | 618 | bessel_k1_scaled_e :: Double -> (Double,Double) |
473 | bessel_k1_scaled_e x = createSFR "bessel_k1_scaled_e" $ gsl_sf_bessel_k1_scaled_e x | 619 | bessel_k1_scaled_e x = createSFR "bessel_k1_scaled_e" $ gsl_sf_bessel_k1_scaled_e x |
474 | foreign import ccall "bessel.h gsl_sf_bessel_k1_scaled_e" gsl_sf_bessel_k1_scaled_e :: Double -> Ptr Double -> IO(Int) | 620 | foreign import ccall "bessel.h gsl_sf_bessel_k1_scaled_e" gsl_sf_bessel_k1_scaled_e :: Double -> Ptr Double -> IO(Int) |
475 | 621 | ||
476 | -- | wrapper for double gsl_sf_bessel_k1_scaled(double x); | 622 | -- | wrapper for double gsl_sf_bessel_k1_scaled(double x); |
623 | -- | ||
624 | -- <http://www.google.com/search?q=gsl_sf_bessel_k1_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
477 | bessel_k1_scaled :: Double -> Double | 625 | bessel_k1_scaled :: Double -> Double |
478 | bessel_k1_scaled = gsl_sf_bessel_k1_scaled | 626 | bessel_k1_scaled = gsl_sf_bessel_k1_scaled |
479 | foreign import ccall "bessel.h gsl_sf_bessel_k1_scaled" gsl_sf_bessel_k1_scaled :: Double -> Double | 627 | foreign import ccall "bessel.h gsl_sf_bessel_k1_scaled" gsl_sf_bessel_k1_scaled :: Double -> Double |
480 | 628 | ||
481 | -- | wrapper for int gsl_sf_bessel_k2_scaled_e(double x,gsl_sf_result* result); | 629 | -- | wrapper for int gsl_sf_bessel_k2_scaled_e(double x,gsl_sf_result* result); |
630 | -- | ||
631 | -- <http://www.google.com/search?q=gsl_sf_bessel_k2_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
482 | bessel_k2_scaled_e :: Double -> (Double,Double) | 632 | bessel_k2_scaled_e :: Double -> (Double,Double) |
483 | bessel_k2_scaled_e x = createSFR "bessel_k2_scaled_e" $ gsl_sf_bessel_k2_scaled_e x | 633 | bessel_k2_scaled_e x = createSFR "bessel_k2_scaled_e" $ gsl_sf_bessel_k2_scaled_e x |
484 | foreign import ccall "bessel.h gsl_sf_bessel_k2_scaled_e" gsl_sf_bessel_k2_scaled_e :: Double -> Ptr Double -> IO(Int) | 634 | foreign import ccall "bessel.h gsl_sf_bessel_k2_scaled_e" gsl_sf_bessel_k2_scaled_e :: Double -> Ptr Double -> IO(Int) |
485 | 635 | ||
486 | -- | wrapper for double gsl_sf_bessel_k2_scaled(double x); | 636 | -- | wrapper for double gsl_sf_bessel_k2_scaled(double x); |
637 | -- | ||
638 | -- <http://www.google.com/search?q=gsl_sf_bessel_k2_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
487 | bessel_k2_scaled :: Double -> Double | 639 | bessel_k2_scaled :: Double -> Double |
488 | bessel_k2_scaled = gsl_sf_bessel_k2_scaled | 640 | bessel_k2_scaled = gsl_sf_bessel_k2_scaled |
489 | foreign import ccall "bessel.h gsl_sf_bessel_k2_scaled" gsl_sf_bessel_k2_scaled :: Double -> Double | 641 | foreign import ccall "bessel.h gsl_sf_bessel_k2_scaled" gsl_sf_bessel_k2_scaled :: Double -> Double |
490 | 642 | ||
491 | -- | wrapper for int gsl_sf_bessel_kl_scaled_e(int l,double x,gsl_sf_result* result); | 643 | -- | wrapper for int gsl_sf_bessel_kl_scaled_e(int l,double x,gsl_sf_result* result); |
644 | -- | ||
645 | -- <http://www.google.com/search?q=gsl_sf_bessel_kl_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
492 | bessel_kl_scaled_e :: Int -> Double -> (Double,Double) | 646 | bessel_kl_scaled_e :: Int -> Double -> (Double,Double) |
493 | bessel_kl_scaled_e l x = createSFR "bessel_kl_scaled_e" $ gsl_sf_bessel_kl_scaled_e l x | 647 | bessel_kl_scaled_e l x = createSFR "bessel_kl_scaled_e" $ gsl_sf_bessel_kl_scaled_e l x |
494 | foreign import ccall "bessel.h gsl_sf_bessel_kl_scaled_e" gsl_sf_bessel_kl_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) | 648 | foreign import ccall "bessel.h gsl_sf_bessel_kl_scaled_e" gsl_sf_bessel_kl_scaled_e :: Int -> Double -> Ptr Double -> IO(Int) |
495 | 649 | ||
496 | -- | wrapper for double gsl_sf_bessel_kl_scaled(int l,double x); | 650 | -- | wrapper for double gsl_sf_bessel_kl_scaled(int l,double x); |
651 | -- | ||
652 | -- <http://www.google.com/search?q=gsl_sf_bessel_kl_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
497 | bessel_kl_scaled :: Int -> Double -> Double | 653 | bessel_kl_scaled :: Int -> Double -> Double |
498 | bessel_kl_scaled = gsl_sf_bessel_kl_scaled | 654 | bessel_kl_scaled = gsl_sf_bessel_kl_scaled |
499 | foreign import ccall "bessel.h gsl_sf_bessel_kl_scaled" gsl_sf_bessel_kl_scaled :: Int -> Double -> Double | 655 | foreign import ccall "bessel.h gsl_sf_bessel_kl_scaled" gsl_sf_bessel_kl_scaled :: Int -> Double -> Double |
500 | 656 | ||
501 | -- | wrapper for int gsl_sf_bessel_kl_scaled_array(int lmax,double x,double* result_array); | 657 | -- | wrapper for int gsl_sf_bessel_kl_scaled_array(int lmax,double x,double* result_array); |
658 | -- | ||
659 | -- <http://www.google.com/search?q=gsl_sf_bessel_kl_scaled_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
502 | bessel_kl_scaled_array :: Int -> Double -> Ptr Double -> Int | 660 | bessel_kl_scaled_array :: Int -> Double -> Ptr Double -> Int |
503 | bessel_kl_scaled_array = gsl_sf_bessel_kl_scaled_array | 661 | bessel_kl_scaled_array = gsl_sf_bessel_kl_scaled_array |
504 | foreign import ccall "bessel.h gsl_sf_bessel_kl_scaled_array" gsl_sf_bessel_kl_scaled_array :: Int -> Double -> Ptr Double -> Int | 662 | foreign import ccall "bessel.h gsl_sf_bessel_kl_scaled_array" gsl_sf_bessel_kl_scaled_array :: Int -> Double -> Ptr Double -> Int |
505 | 663 | ||
506 | -- | wrapper for int gsl_sf_bessel_Jnu_e(double nu,double x,gsl_sf_result* result); | 664 | -- | wrapper for int gsl_sf_bessel_Jnu_e(double nu,double x,gsl_sf_result* result); |
665 | -- | ||
666 | -- <http://www.google.com/search?q=gsl_sf_bessel_Jnu_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
507 | bessel_Jnu_e :: Double -> Double -> (Double,Double) | 667 | bessel_Jnu_e :: Double -> Double -> (Double,Double) |
508 | bessel_Jnu_e nu x = createSFR "bessel_Jnu_e" $ gsl_sf_bessel_Jnu_e nu x | 668 | bessel_Jnu_e nu x = createSFR "bessel_Jnu_e" $ gsl_sf_bessel_Jnu_e nu x |
509 | foreign import ccall "bessel.h gsl_sf_bessel_Jnu_e" gsl_sf_bessel_Jnu_e :: Double -> Double -> Ptr Double -> IO(Int) | 669 | foreign import ccall "bessel.h gsl_sf_bessel_Jnu_e" gsl_sf_bessel_Jnu_e :: Double -> Double -> Ptr Double -> IO(Int) |
510 | 670 | ||
511 | -- | wrapper for double gsl_sf_bessel_Jnu(double nu,double x); | 671 | -- | wrapper for double gsl_sf_bessel_Jnu(double nu,double x); |
672 | -- | ||
673 | -- <http://www.google.com/search?q=gsl_sf_bessel_Jnu&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
512 | bessel_Jnu :: Double -> Double -> Double | 674 | bessel_Jnu :: Double -> Double -> Double |
513 | bessel_Jnu = gsl_sf_bessel_Jnu | 675 | bessel_Jnu = gsl_sf_bessel_Jnu |
514 | foreign import ccall "bessel.h gsl_sf_bessel_Jnu" gsl_sf_bessel_Jnu :: Double -> Double -> Double | 676 | foreign import ccall "bessel.h gsl_sf_bessel_Jnu" gsl_sf_bessel_Jnu :: Double -> Double -> Double |
515 | 677 | ||
516 | -- | wrapper for int gsl_sf_bessel_Ynu_e(double nu,double x,gsl_sf_result* result); | 678 | -- | wrapper for int gsl_sf_bessel_Ynu_e(double nu,double x,gsl_sf_result* result); |
679 | -- | ||
680 | -- <http://www.google.com/search?q=gsl_sf_bessel_Ynu_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
517 | bessel_Ynu_e :: Double -> Double -> (Double,Double) | 681 | bessel_Ynu_e :: Double -> Double -> (Double,Double) |
518 | bessel_Ynu_e nu x = createSFR "bessel_Ynu_e" $ gsl_sf_bessel_Ynu_e nu x | 682 | bessel_Ynu_e nu x = createSFR "bessel_Ynu_e" $ gsl_sf_bessel_Ynu_e nu x |
519 | foreign import ccall "bessel.h gsl_sf_bessel_Ynu_e" gsl_sf_bessel_Ynu_e :: Double -> Double -> Ptr Double -> IO(Int) | 683 | foreign import ccall "bessel.h gsl_sf_bessel_Ynu_e" gsl_sf_bessel_Ynu_e :: Double -> Double -> Ptr Double -> IO(Int) |
520 | 684 | ||
521 | -- | wrapper for double gsl_sf_bessel_Ynu(double nu,double x); | 685 | -- | wrapper for double gsl_sf_bessel_Ynu(double nu,double x); |
686 | -- | ||
687 | -- <http://www.google.com/search?q=gsl_sf_bessel_Ynu&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
522 | bessel_Ynu :: Double -> Double -> Double | 688 | bessel_Ynu :: Double -> Double -> Double |
523 | bessel_Ynu = gsl_sf_bessel_Ynu | 689 | bessel_Ynu = gsl_sf_bessel_Ynu |
524 | foreign import ccall "bessel.h gsl_sf_bessel_Ynu" gsl_sf_bessel_Ynu :: Double -> Double -> Double | 690 | foreign import ccall "bessel.h gsl_sf_bessel_Ynu" gsl_sf_bessel_Ynu :: Double -> Double -> Double |
525 | 691 | ||
692 | -- | wrapper for int gsl_sf_bessel_sequence_Jnu_e(double nu,gsl_mode_t mode,size_t size,double* v); | ||
693 | -- | ||
694 | -- <http://www.google.com/search?q=gsl_sf_bessel_sequence_Jnu_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
695 | bessel_sequence_Jnu_e :: Double -> Precision -> Size_t -> Ptr Double -> Int | ||
696 | bessel_sequence_Jnu_e nu mode size v = gsl_sf_bessel_sequence_Jnu_e nu (precCode mode) size v | ||
697 | foreign import ccall "bessel.h gsl_sf_bessel_sequence_Jnu_e" gsl_sf_bessel_sequence_Jnu_e :: Double -> Gsl_mode_t -> Size_t -> Ptr Double -> Int | ||
698 | |||
526 | -- | wrapper for int gsl_sf_bessel_Inu_scaled_e(double nu,double x,gsl_sf_result* result); | 699 | -- | wrapper for int gsl_sf_bessel_Inu_scaled_e(double nu,double x,gsl_sf_result* result); |
700 | -- | ||
701 | -- <http://www.google.com/search?q=gsl_sf_bessel_Inu_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
527 | bessel_Inu_scaled_e :: Double -> Double -> (Double,Double) | 702 | bessel_Inu_scaled_e :: Double -> Double -> (Double,Double) |
528 | bessel_Inu_scaled_e nu x = createSFR "bessel_Inu_scaled_e" $ gsl_sf_bessel_Inu_scaled_e nu x | 703 | bessel_Inu_scaled_e nu x = createSFR "bessel_Inu_scaled_e" $ gsl_sf_bessel_Inu_scaled_e nu x |
529 | foreign import ccall "bessel.h gsl_sf_bessel_Inu_scaled_e" gsl_sf_bessel_Inu_scaled_e :: Double -> Double -> Ptr Double -> IO(Int) | 704 | foreign import ccall "bessel.h gsl_sf_bessel_Inu_scaled_e" gsl_sf_bessel_Inu_scaled_e :: Double -> Double -> Ptr Double -> IO(Int) |
530 | 705 | ||
531 | -- | wrapper for double gsl_sf_bessel_Inu_scaled(double nu,double x); | 706 | -- | wrapper for double gsl_sf_bessel_Inu_scaled(double nu,double x); |
707 | -- | ||
708 | -- <http://www.google.com/search?q=gsl_sf_bessel_Inu_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
532 | bessel_Inu_scaled :: Double -> Double -> Double | 709 | bessel_Inu_scaled :: Double -> Double -> Double |
533 | bessel_Inu_scaled = gsl_sf_bessel_Inu_scaled | 710 | bessel_Inu_scaled = gsl_sf_bessel_Inu_scaled |
534 | foreign import ccall "bessel.h gsl_sf_bessel_Inu_scaled" gsl_sf_bessel_Inu_scaled :: Double -> Double -> Double | 711 | foreign import ccall "bessel.h gsl_sf_bessel_Inu_scaled" gsl_sf_bessel_Inu_scaled :: Double -> Double -> Double |
535 | 712 | ||
536 | -- | wrapper for int gsl_sf_bessel_Inu_e(double nu,double x,gsl_sf_result* result); | 713 | -- | wrapper for int gsl_sf_bessel_Inu_e(double nu,double x,gsl_sf_result* result); |
714 | -- | ||
715 | -- <http://www.google.com/search?q=gsl_sf_bessel_Inu_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
537 | bessel_Inu_e :: Double -> Double -> (Double,Double) | 716 | bessel_Inu_e :: Double -> Double -> (Double,Double) |
538 | bessel_Inu_e nu x = createSFR "bessel_Inu_e" $ gsl_sf_bessel_Inu_e nu x | 717 | bessel_Inu_e nu x = createSFR "bessel_Inu_e" $ gsl_sf_bessel_Inu_e nu x |
539 | foreign import ccall "bessel.h gsl_sf_bessel_Inu_e" gsl_sf_bessel_Inu_e :: Double -> Double -> Ptr Double -> IO(Int) | 718 | foreign import ccall "bessel.h gsl_sf_bessel_Inu_e" gsl_sf_bessel_Inu_e :: Double -> Double -> Ptr Double -> IO(Int) |
540 | 719 | ||
541 | -- | wrapper for double gsl_sf_bessel_Inu(double nu,double x); | 720 | -- | wrapper for double gsl_sf_bessel_Inu(double nu,double x); |
721 | -- | ||
722 | -- <http://www.google.com/search?q=gsl_sf_bessel_Inu&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
542 | bessel_Inu :: Double -> Double -> Double | 723 | bessel_Inu :: Double -> Double -> Double |
543 | bessel_Inu = gsl_sf_bessel_Inu | 724 | bessel_Inu = gsl_sf_bessel_Inu |
544 | foreign import ccall "bessel.h gsl_sf_bessel_Inu" gsl_sf_bessel_Inu :: Double -> Double -> Double | 725 | foreign import ccall "bessel.h gsl_sf_bessel_Inu" gsl_sf_bessel_Inu :: Double -> Double -> Double |
545 | 726 | ||
546 | -- | wrapper for int gsl_sf_bessel_Knu_scaled_e(double nu,double x,gsl_sf_result* result); | 727 | -- | wrapper for int gsl_sf_bessel_Knu_scaled_e(double nu,double x,gsl_sf_result* result); |
728 | -- | ||
729 | -- <http://www.google.com/search?q=gsl_sf_bessel_Knu_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
547 | bessel_Knu_scaled_e :: Double -> Double -> (Double,Double) | 730 | bessel_Knu_scaled_e :: Double -> Double -> (Double,Double) |
548 | bessel_Knu_scaled_e nu x = createSFR "bessel_Knu_scaled_e" $ gsl_sf_bessel_Knu_scaled_e nu x | 731 | bessel_Knu_scaled_e nu x = createSFR "bessel_Knu_scaled_e" $ gsl_sf_bessel_Knu_scaled_e nu x |
549 | foreign import ccall "bessel.h gsl_sf_bessel_Knu_scaled_e" gsl_sf_bessel_Knu_scaled_e :: Double -> Double -> Ptr Double -> IO(Int) | 732 | foreign import ccall "bessel.h gsl_sf_bessel_Knu_scaled_e" gsl_sf_bessel_Knu_scaled_e :: Double -> Double -> Ptr Double -> IO(Int) |
550 | 733 | ||
551 | -- | wrapper for double gsl_sf_bessel_Knu_scaled(double nu,double x); | 734 | -- | wrapper for double gsl_sf_bessel_Knu_scaled(double nu,double x); |
735 | -- | ||
736 | -- <http://www.google.com/search?q=gsl_sf_bessel_Knu_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
552 | bessel_Knu_scaled :: Double -> Double -> Double | 737 | bessel_Knu_scaled :: Double -> Double -> Double |
553 | bessel_Knu_scaled = gsl_sf_bessel_Knu_scaled | 738 | bessel_Knu_scaled = gsl_sf_bessel_Knu_scaled |
554 | foreign import ccall "bessel.h gsl_sf_bessel_Knu_scaled" gsl_sf_bessel_Knu_scaled :: Double -> Double -> Double | 739 | foreign import ccall "bessel.h gsl_sf_bessel_Knu_scaled" gsl_sf_bessel_Knu_scaled :: Double -> Double -> Double |
555 | 740 | ||
556 | -- | wrapper for int gsl_sf_bessel_Knu_e(double nu,double x,gsl_sf_result* result); | 741 | -- | wrapper for int gsl_sf_bessel_Knu_e(double nu,double x,gsl_sf_result* result); |
742 | -- | ||
743 | -- <http://www.google.com/search?q=gsl_sf_bessel_Knu_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
557 | bessel_Knu_e :: Double -> Double -> (Double,Double) | 744 | bessel_Knu_e :: Double -> Double -> (Double,Double) |
558 | bessel_Knu_e nu x = createSFR "bessel_Knu_e" $ gsl_sf_bessel_Knu_e nu x | 745 | bessel_Knu_e nu x = createSFR "bessel_Knu_e" $ gsl_sf_bessel_Knu_e nu x |
559 | foreign import ccall "bessel.h gsl_sf_bessel_Knu_e" gsl_sf_bessel_Knu_e :: Double -> Double -> Ptr Double -> IO(Int) | 746 | foreign import ccall "bessel.h gsl_sf_bessel_Knu_e" gsl_sf_bessel_Knu_e :: Double -> Double -> Ptr Double -> IO(Int) |
560 | 747 | ||
561 | -- | wrapper for double gsl_sf_bessel_Knu(double nu,double x); | 748 | -- | wrapper for double gsl_sf_bessel_Knu(double nu,double x); |
749 | -- | ||
750 | -- <http://www.google.com/search?q=gsl_sf_bessel_Knu&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
562 | bessel_Knu :: Double -> Double -> Double | 751 | bessel_Knu :: Double -> Double -> Double |
563 | bessel_Knu = gsl_sf_bessel_Knu | 752 | bessel_Knu = gsl_sf_bessel_Knu |
564 | foreign import ccall "bessel.h gsl_sf_bessel_Knu" gsl_sf_bessel_Knu :: Double -> Double -> Double | 753 | foreign import ccall "bessel.h gsl_sf_bessel_Knu" gsl_sf_bessel_Knu :: Double -> Double -> Double |
565 | 754 | ||
566 | -- | wrapper for int gsl_sf_bessel_lnKnu_e(double nu,double x,gsl_sf_result* result); | 755 | -- | wrapper for int gsl_sf_bessel_lnKnu_e(double nu,double x,gsl_sf_result* result); |
756 | -- | ||
757 | -- <http://www.google.com/search?q=gsl_sf_bessel_lnKnu_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
567 | bessel_lnKnu_e :: Double -> Double -> (Double,Double) | 758 | bessel_lnKnu_e :: Double -> Double -> (Double,Double) |
568 | bessel_lnKnu_e nu x = createSFR "bessel_lnKnu_e" $ gsl_sf_bessel_lnKnu_e nu x | 759 | bessel_lnKnu_e nu x = createSFR "bessel_lnKnu_e" $ gsl_sf_bessel_lnKnu_e nu x |
569 | foreign import ccall "bessel.h gsl_sf_bessel_lnKnu_e" gsl_sf_bessel_lnKnu_e :: Double -> Double -> Ptr Double -> IO(Int) | 760 | foreign import ccall "bessel.h gsl_sf_bessel_lnKnu_e" gsl_sf_bessel_lnKnu_e :: Double -> Double -> Ptr Double -> IO(Int) |
570 | 761 | ||
571 | -- | wrapper for double gsl_sf_bessel_lnKnu(double nu,double x); | 762 | -- | wrapper for double gsl_sf_bessel_lnKnu(double nu,double x); |
763 | -- | ||
764 | -- <http://www.google.com/search?q=gsl_sf_bessel_lnKnu&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
572 | bessel_lnKnu :: Double -> Double -> Double | 765 | bessel_lnKnu :: Double -> Double -> Double |
573 | bessel_lnKnu = gsl_sf_bessel_lnKnu | 766 | bessel_lnKnu = gsl_sf_bessel_lnKnu |
574 | foreign import ccall "bessel.h gsl_sf_bessel_lnKnu" gsl_sf_bessel_lnKnu :: Double -> Double -> Double | 767 | foreign import ccall "bessel.h gsl_sf_bessel_lnKnu" gsl_sf_bessel_lnKnu :: Double -> Double -> Double |
575 | 768 | ||
576 | -- | wrapper for int gsl_sf_bessel_zero_J0_e(int s,gsl_sf_result* result); | 769 | -- | wrapper for int gsl_sf_bessel_zero_J0_e(int s,gsl_sf_result* result); |
770 | -- | ||
771 | -- <http://www.google.com/search?q=gsl_sf_bessel_zero_J0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
577 | bessel_zero_J0_e :: Int -> (Double,Double) | 772 | bessel_zero_J0_e :: Int -> (Double,Double) |
578 | bessel_zero_J0_e s = createSFR "bessel_zero_J0_e" $ gsl_sf_bessel_zero_J0_e s | 773 | bessel_zero_J0_e s = createSFR "bessel_zero_J0_e" $ gsl_sf_bessel_zero_J0_e s |
579 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J0_e" gsl_sf_bessel_zero_J0_e :: Int -> Ptr Double -> IO(Int) | 774 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J0_e" gsl_sf_bessel_zero_J0_e :: Int -> Ptr Double -> IO(Int) |
580 | 775 | ||
581 | -- | wrapper for double gsl_sf_bessel_zero_J0(int s); | 776 | -- | wrapper for double gsl_sf_bessel_zero_J0(int s); |
777 | -- | ||
778 | -- <http://www.google.com/search?q=gsl_sf_bessel_zero_J0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
582 | bessel_zero_J0 :: Int -> Double | 779 | bessel_zero_J0 :: Int -> Double |
583 | bessel_zero_J0 = gsl_sf_bessel_zero_J0 | 780 | bessel_zero_J0 = gsl_sf_bessel_zero_J0 |
584 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J0" gsl_sf_bessel_zero_J0 :: Int -> Double | 781 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J0" gsl_sf_bessel_zero_J0 :: Int -> Double |
585 | 782 | ||
586 | -- | wrapper for int gsl_sf_bessel_zero_J1_e(int s,gsl_sf_result* result); | 783 | -- | wrapper for int gsl_sf_bessel_zero_J1_e(int s,gsl_sf_result* result); |
784 | -- | ||
785 | -- <http://www.google.com/search?q=gsl_sf_bessel_zero_J1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
587 | bessel_zero_J1_e :: Int -> (Double,Double) | 786 | bessel_zero_J1_e :: Int -> (Double,Double) |
588 | bessel_zero_J1_e s = createSFR "bessel_zero_J1_e" $ gsl_sf_bessel_zero_J1_e s | 787 | bessel_zero_J1_e s = createSFR "bessel_zero_J1_e" $ gsl_sf_bessel_zero_J1_e s |
589 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J1_e" gsl_sf_bessel_zero_J1_e :: Int -> Ptr Double -> IO(Int) | 788 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J1_e" gsl_sf_bessel_zero_J1_e :: Int -> Ptr Double -> IO(Int) |
590 | 789 | ||
591 | -- | wrapper for double gsl_sf_bessel_zero_J1(int s); | 790 | -- | wrapper for double gsl_sf_bessel_zero_J1(int s); |
791 | -- | ||
792 | -- <http://www.google.com/search?q=gsl_sf_bessel_zero_J1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
592 | bessel_zero_J1 :: Int -> Double | 793 | bessel_zero_J1 :: Int -> Double |
593 | bessel_zero_J1 = gsl_sf_bessel_zero_J1 | 794 | bessel_zero_J1 = gsl_sf_bessel_zero_J1 |
594 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J1" gsl_sf_bessel_zero_J1 :: Int -> Double | 795 | foreign import ccall "bessel.h gsl_sf_bessel_zero_J1" gsl_sf_bessel_zero_J1 :: Int -> Double |
595 | 796 | ||
596 | -- | wrapper for int gsl_sf_bessel_zero_Jnu_e(double nu,int s,gsl_sf_result* result); | 797 | -- | wrapper for int gsl_sf_bessel_zero_Jnu_e(double nu,int s,gsl_sf_result* result); |
798 | -- | ||
799 | -- <http://www.google.com/search?q=gsl_sf_bessel_zero_Jnu_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
597 | bessel_zero_Jnu_e :: Double -> Int -> (Double,Double) | 800 | bessel_zero_Jnu_e :: Double -> Int -> (Double,Double) |
598 | bessel_zero_Jnu_e nu s = createSFR "bessel_zero_Jnu_e" $ gsl_sf_bessel_zero_Jnu_e nu s | 801 | bessel_zero_Jnu_e nu s = createSFR "bessel_zero_Jnu_e" $ gsl_sf_bessel_zero_Jnu_e nu s |
599 | foreign import ccall "bessel.h gsl_sf_bessel_zero_Jnu_e" gsl_sf_bessel_zero_Jnu_e :: Double -> Int -> Ptr Double -> IO(Int) | 802 | foreign import ccall "bessel.h gsl_sf_bessel_zero_Jnu_e" gsl_sf_bessel_zero_Jnu_e :: Double -> Int -> Ptr Double -> IO(Int) |
600 | 803 | ||
601 | -- | wrapper for double gsl_sf_bessel_zero_Jnu(double nu,int s); | 804 | -- | wrapper for double gsl_sf_bessel_zero_Jnu(double nu,int s); |
805 | -- | ||
806 | -- <http://www.google.com/search?q=gsl_sf_bessel_zero_Jnu&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
602 | bessel_zero_Jnu :: Double -> Int -> Double | 807 | bessel_zero_Jnu :: Double -> Int -> Double |
603 | bessel_zero_Jnu = gsl_sf_bessel_zero_Jnu | 808 | bessel_zero_Jnu = gsl_sf_bessel_zero_Jnu |
604 | foreign import ccall "bessel.h gsl_sf_bessel_zero_Jnu" gsl_sf_bessel_zero_Jnu :: Double -> Int -> Double | 809 | foreign import ccall "bessel.h gsl_sf_bessel_zero_Jnu" gsl_sf_bessel_zero_Jnu :: Double -> Int -> Double |
diff --git a/lib/GSL/Special/Clausen.hs b/lib/GSL/Special/Clausen.hs index 33da421..57c8878 100644 --- a/lib/GSL/Special/Clausen.hs +++ b/lib/GSL/Special/Clausen.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Clausen-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_clausen.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -23,11 +23,15 @@ import Foreign(Ptr) | |||
23 | import GSL.Special.Internal | 23 | import GSL.Special.Internal |
24 | 24 | ||
25 | -- | wrapper for int gsl_sf_clausen_e(double x,gsl_sf_result* result); | 25 | -- | wrapper for int gsl_sf_clausen_e(double x,gsl_sf_result* result); |
26 | -- | ||
27 | -- <http://www.google.com/search?q=gsl_sf_clausen_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
26 | clausen_e :: Double -> (Double,Double) | 28 | clausen_e :: Double -> (Double,Double) |
27 | clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x | 29 | clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x |
28 | foreign import ccall "clausen.h gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr Double -> IO(Int) | 30 | foreign import ccall "clausen.h gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr Double -> IO(Int) |
29 | 31 | ||
30 | -- | wrapper for double gsl_sf_clausen(double x); | 32 | -- | wrapper for double gsl_sf_clausen(double x); |
33 | -- | ||
34 | -- <http://www.google.com/search?q=gsl_sf_clausen&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
31 | clausen :: Double -> Double | 35 | clausen :: Double -> Double |
32 | clausen = gsl_sf_clausen | 36 | clausen = gsl_sf_clausen |
33 | foreign import ccall "clausen.h gsl_sf_clausen" gsl_sf_clausen :: Double -> Double | 37 | foreign import ccall "clausen.h gsl_sf_clausen" gsl_sf_clausen :: Double -> Double |
diff --git a/lib/GSL/Special/Coulomb.hs b/lib/GSL/Special/Coulomb.hs index 6995ee3..a60b724 100644 --- a/lib/GSL/Special/Coulomb.hs +++ b/lib/GSL/Special/Coulomb.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Coulomb-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_coulomb.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -26,56 +26,78 @@ import Foreign(Ptr) | |||
26 | import GSL.Special.Internal | 26 | import GSL.Special.Internal |
27 | 27 | ||
28 | -- | wrapper for int gsl_sf_hydrogenicR_1_e(double Z,double r,gsl_sf_result* result); | 28 | -- | wrapper for int gsl_sf_hydrogenicR_1_e(double Z,double r,gsl_sf_result* result); |
29 | -- | ||
30 | -- <http://www.google.com/search?q=gsl_sf_hydrogenicR_1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
29 | hydrogenicR_1_e :: Double -> Double -> (Double,Double) | 31 | hydrogenicR_1_e :: Double -> Double -> (Double,Double) |
30 | hydrogenicR_1_e zZ r = createSFR "hydrogenicR_1_e" $ gsl_sf_hydrogenicR_1_e zZ r | 32 | hydrogenicR_1_e zZ r = createSFR "hydrogenicR_1_e" $ gsl_sf_hydrogenicR_1_e zZ r |
31 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR_1_e" gsl_sf_hydrogenicR_1_e :: Double -> Double -> Ptr Double -> IO(Int) | 33 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR_1_e" gsl_sf_hydrogenicR_1_e :: Double -> Double -> Ptr Double -> IO(Int) |
32 | 34 | ||
33 | -- | wrapper for double gsl_sf_hydrogenicR_1(double Z,double r); | 35 | -- | wrapper for double gsl_sf_hydrogenicR_1(double Z,double r); |
36 | -- | ||
37 | -- <http://www.google.com/search?q=gsl_sf_hydrogenicR_1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
34 | hydrogenicR_1 :: Double -> Double -> Double | 38 | hydrogenicR_1 :: Double -> Double -> Double |
35 | hydrogenicR_1 = gsl_sf_hydrogenicR_1 | 39 | hydrogenicR_1 = gsl_sf_hydrogenicR_1 |
36 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR_1" gsl_sf_hydrogenicR_1 :: Double -> Double -> Double | 40 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR_1" gsl_sf_hydrogenicR_1 :: Double -> Double -> Double |
37 | 41 | ||
38 | -- | wrapper for int gsl_sf_hydrogenicR_e(int n,int l,double Z,double r,gsl_sf_result* result); | 42 | -- | wrapper for int gsl_sf_hydrogenicR_e(int n,int l,double Z,double r,gsl_sf_result* result); |
43 | -- | ||
44 | -- <http://www.google.com/search?q=gsl_sf_hydrogenicR_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
39 | hydrogenicR_e :: Int -> Int -> Double -> Double -> (Double,Double) | 45 | hydrogenicR_e :: Int -> Int -> Double -> Double -> (Double,Double) |
40 | hydrogenicR_e n l zZ r = createSFR "hydrogenicR_e" $ gsl_sf_hydrogenicR_e n l zZ r | 46 | hydrogenicR_e n l zZ r = createSFR "hydrogenicR_e" $ gsl_sf_hydrogenicR_e n l zZ r |
41 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR_e" gsl_sf_hydrogenicR_e :: Int -> Int -> Double -> Double -> Ptr Double -> IO(Int) | 47 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR_e" gsl_sf_hydrogenicR_e :: Int -> Int -> Double -> Double -> Ptr Double -> IO(Int) |
42 | 48 | ||
43 | -- | wrapper for double gsl_sf_hydrogenicR(int n,int l,double Z,double r); | 49 | -- | wrapper for double gsl_sf_hydrogenicR(int n,int l,double Z,double r); |
50 | -- | ||
51 | -- <http://www.google.com/search?q=gsl_sf_hydrogenicR&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
44 | hydrogenicR :: Int -> Int -> Double -> Double -> Double | 52 | hydrogenicR :: Int -> Int -> Double -> Double -> Double |
45 | hydrogenicR = gsl_sf_hydrogenicR | 53 | hydrogenicR = gsl_sf_hydrogenicR |
46 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR" gsl_sf_hydrogenicR :: Int -> Int -> Double -> Double -> Double | 54 | foreign import ccall "coulomb.h gsl_sf_hydrogenicR" gsl_sf_hydrogenicR :: Int -> Int -> Double -> Double -> Double |
47 | 55 | ||
48 | -- | wrapper for int gsl_sf_coulomb_wave_FG_e(double eta,double x,double lam_F,int k_lam_G,gsl_sf_result* F,gsl_sf_result* Fp,gsl_sf_result* G,gsl_sf_result* Gp,double* exp_F,double* exp_G); | 56 | -- | wrapper for int gsl_sf_coulomb_wave_FG_e(double eta,double x,double lam_F,int k_lam_G,gsl_sf_result* F,gsl_sf_result* Fp,gsl_sf_result* G,gsl_sf_result* Gp,double* exp_F,double* exp_G); |
57 | -- | ||
58 | -- <http://www.google.com/search?q=gsl_sf_coulomb_wave_FG_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
49 | coulomb_wave_FG_e :: Double -> Double -> Double -> Int -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int | 59 | coulomb_wave_FG_e :: Double -> Double -> Double -> Int -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int |
50 | coulomb_wave_FG_e = gsl_sf_coulomb_wave_FG_e | 60 | coulomb_wave_FG_e = gsl_sf_coulomb_wave_FG_e |
51 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_FG_e" gsl_sf_coulomb_wave_FG_e :: Double -> Double -> Double -> Int -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int | 61 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_FG_e" gsl_sf_coulomb_wave_FG_e :: Double -> Double -> Double -> Int -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int |
52 | 62 | ||
53 | -- | wrapper for int gsl_sf_coulomb_wave_F_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* F_exponent); | 63 | -- | wrapper for int gsl_sf_coulomb_wave_F_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* F_exponent); |
64 | -- | ||
65 | -- <http://www.google.com/search?q=gsl_sf_coulomb_wave_F_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
54 | coulomb_wave_F_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int | 66 | coulomb_wave_F_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int |
55 | coulomb_wave_F_array = gsl_sf_coulomb_wave_F_array | 67 | coulomb_wave_F_array = gsl_sf_coulomb_wave_F_array |
56 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_F_array" gsl_sf_coulomb_wave_F_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int | 68 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_F_array" gsl_sf_coulomb_wave_F_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int |
57 | 69 | ||
58 | -- | wrapper for int gsl_sf_coulomb_wave_FG_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* gc_array,double* F_exponent,double* G_exponent); | 70 | -- | wrapper for int gsl_sf_coulomb_wave_FG_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* gc_array,double* F_exponent,double* G_exponent); |
71 | -- | ||
72 | -- <http://www.google.com/search?q=gsl_sf_coulomb_wave_FG_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
59 | coulomb_wave_FG_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int | 73 | coulomb_wave_FG_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int |
60 | coulomb_wave_FG_array = gsl_sf_coulomb_wave_FG_array | 74 | coulomb_wave_FG_array = gsl_sf_coulomb_wave_FG_array |
61 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_FG_array" gsl_sf_coulomb_wave_FG_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int | 75 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_FG_array" gsl_sf_coulomb_wave_FG_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int |
62 | 76 | ||
63 | -- | wrapper for int gsl_sf_coulomb_wave_FGp_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* fcp_array,double* gc_array,double* gcp_array,double* F_exponent,double* G_exponent); | 77 | -- | wrapper for int gsl_sf_coulomb_wave_FGp_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* fcp_array,double* gc_array,double* gcp_array,double* F_exponent,double* G_exponent); |
78 | -- | ||
79 | -- <http://www.google.com/search?q=gsl_sf_coulomb_wave_FGp_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
64 | coulomb_wave_FGp_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int | 80 | coulomb_wave_FGp_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int |
65 | coulomb_wave_FGp_array = gsl_sf_coulomb_wave_FGp_array | 81 | coulomb_wave_FGp_array = gsl_sf_coulomb_wave_FGp_array |
66 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_FGp_array" gsl_sf_coulomb_wave_FGp_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int | 82 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_FGp_array" gsl_sf_coulomb_wave_FGp_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Int |
67 | 83 | ||
68 | -- | wrapper for int gsl_sf_coulomb_wave_sphF_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* F_exponent); | 84 | -- | wrapper for int gsl_sf_coulomb_wave_sphF_array(double lam_min,int kmax,double eta,double x,double* fc_array,double* F_exponent); |
85 | -- | ||
86 | -- <http://www.google.com/search?q=gsl_sf_coulomb_wave_sphF_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
69 | coulomb_wave_sphF_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int | 87 | coulomb_wave_sphF_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int |
70 | coulomb_wave_sphF_array = gsl_sf_coulomb_wave_sphF_array | 88 | coulomb_wave_sphF_array = gsl_sf_coulomb_wave_sphF_array |
71 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_sphF_array" gsl_sf_coulomb_wave_sphF_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int | 89 | foreign import ccall "coulomb.h gsl_sf_coulomb_wave_sphF_array" gsl_sf_coulomb_wave_sphF_array :: Double -> Int -> Double -> Double -> Ptr Double -> Ptr Double -> Int |
72 | 90 | ||
73 | -- | wrapper for int gsl_sf_coulomb_CL_e(double L,double eta,gsl_sf_result* result); | 91 | -- | wrapper for int gsl_sf_coulomb_CL_e(double L,double eta,gsl_sf_result* result); |
92 | -- | ||
93 | -- <http://www.google.com/search?q=gsl_sf_coulomb_CL_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
74 | coulomb_CL_e :: Double -> Double -> (Double,Double) | 94 | coulomb_CL_e :: Double -> Double -> (Double,Double) |
75 | coulomb_CL_e lL eta = createSFR "coulomb_CL_e" $ gsl_sf_coulomb_CL_e lL eta | 95 | coulomb_CL_e lL eta = createSFR "coulomb_CL_e" $ gsl_sf_coulomb_CL_e lL eta |
76 | foreign import ccall "coulomb.h gsl_sf_coulomb_CL_e" gsl_sf_coulomb_CL_e :: Double -> Double -> Ptr Double -> IO(Int) | 96 | foreign import ccall "coulomb.h gsl_sf_coulomb_CL_e" gsl_sf_coulomb_CL_e :: Double -> Double -> Ptr Double -> IO(Int) |
77 | 97 | ||
78 | -- | wrapper for int gsl_sf_coulomb_CL_array(double Lmin,int kmax,double eta,double* cl); | 98 | -- | wrapper for int gsl_sf_coulomb_CL_array(double Lmin,int kmax,double eta,double* cl); |
99 | -- | ||
100 | -- <http://www.google.com/search?q=gsl_sf_coulomb_CL_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
79 | coulomb_CL_array :: Double -> Int -> Double -> Ptr Double -> Int | 101 | coulomb_CL_array :: Double -> Int -> Double -> Ptr Double -> Int |
80 | coulomb_CL_array = gsl_sf_coulomb_CL_array | 102 | coulomb_CL_array = gsl_sf_coulomb_CL_array |
81 | foreign import ccall "coulomb.h gsl_sf_coulomb_CL_array" gsl_sf_coulomb_CL_array :: Double -> Int -> Double -> Ptr Double -> Int | 103 | foreign import ccall "coulomb.h gsl_sf_coulomb_CL_array" gsl_sf_coulomb_CL_array :: Double -> Int -> Double -> Ptr Double -> Int |
diff --git a/lib/GSL/Special/Dawson.hs b/lib/GSL/Special/Dawson.hs index 54671e1..69d0127 100644 --- a/lib/GSL/Special/Dawson.hs +++ b/lib/GSL/Special/Dawson.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Dawson-Function.html> | 12 | <http://www.google.com/search?q=gsl_sf_dawson.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -23,11 +23,15 @@ import Foreign(Ptr) | |||
23 | import GSL.Special.Internal | 23 | import GSL.Special.Internal |
24 | 24 | ||
25 | -- | wrapper for int gsl_sf_dawson_e(double x,gsl_sf_result* result); | 25 | -- | wrapper for int gsl_sf_dawson_e(double x,gsl_sf_result* result); |
26 | -- | ||
27 | -- <http://www.google.com/search?q=gsl_sf_dawson_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
26 | dawson_e :: Double -> (Double,Double) | 28 | dawson_e :: Double -> (Double,Double) |
27 | dawson_e x = createSFR "dawson_e" $ gsl_sf_dawson_e x | 29 | dawson_e x = createSFR "dawson_e" $ gsl_sf_dawson_e x |
28 | foreign import ccall "dawson.h gsl_sf_dawson_e" gsl_sf_dawson_e :: Double -> Ptr Double -> IO(Int) | 30 | foreign import ccall "dawson.h gsl_sf_dawson_e" gsl_sf_dawson_e :: Double -> Ptr Double -> IO(Int) |
29 | 31 | ||
30 | -- | wrapper for double gsl_sf_dawson(double x); | 32 | -- | wrapper for double gsl_sf_dawson(double x); |
33 | -- | ||
34 | -- <http://www.google.com/search?q=gsl_sf_dawson&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
31 | dawson :: Double -> Double | 35 | dawson :: Double -> Double |
32 | dawson = gsl_sf_dawson | 36 | dawson = gsl_sf_dawson |
33 | foreign import ccall "dawson.h gsl_sf_dawson" gsl_sf_dawson :: Double -> Double | 37 | foreign import ccall "dawson.h gsl_sf_dawson" gsl_sf_dawson :: Double -> Double |
diff --git a/lib/GSL/Special/Debye.hs b/lib/GSL/Special/Debye.hs index ecb617e..55f5158 100644 --- a/lib/GSL/Special/Debye.hs +++ b/lib/GSL/Special/Debye.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Debye-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_debye.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -29,41 +29,57 @@ import Foreign(Ptr) | |||
29 | import GSL.Special.Internal | 29 | import GSL.Special.Internal |
30 | 30 | ||
31 | -- | wrapper for int gsl_sf_debye_1_e(double x,gsl_sf_result* result); | 31 | -- | wrapper for int gsl_sf_debye_1_e(double x,gsl_sf_result* result); |
32 | -- | ||
33 | -- <http://www.google.com/search?q=gsl_sf_debye_1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
32 | debye_1_e :: Double -> (Double,Double) | 34 | debye_1_e :: Double -> (Double,Double) |
33 | debye_1_e x = createSFR "debye_1_e" $ gsl_sf_debye_1_e x | 35 | debye_1_e x = createSFR "debye_1_e" $ gsl_sf_debye_1_e x |
34 | foreign import ccall "debye.h gsl_sf_debye_1_e" gsl_sf_debye_1_e :: Double -> Ptr Double -> IO(Int) | 36 | foreign import ccall "debye.h gsl_sf_debye_1_e" gsl_sf_debye_1_e :: Double -> Ptr Double -> IO(Int) |
35 | 37 | ||
36 | -- | wrapper for double gsl_sf_debye_1(double x); | 38 | -- | wrapper for double gsl_sf_debye_1(double x); |
39 | -- | ||
40 | -- <http://www.google.com/search?q=gsl_sf_debye_1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
37 | debye_1 :: Double -> Double | 41 | debye_1 :: Double -> Double |
38 | debye_1 = gsl_sf_debye_1 | 42 | debye_1 = gsl_sf_debye_1 |
39 | foreign import ccall "debye.h gsl_sf_debye_1" gsl_sf_debye_1 :: Double -> Double | 43 | foreign import ccall "debye.h gsl_sf_debye_1" gsl_sf_debye_1 :: Double -> Double |
40 | 44 | ||
41 | -- | wrapper for int gsl_sf_debye_2_e(double x,gsl_sf_result* result); | 45 | -- | wrapper for int gsl_sf_debye_2_e(double x,gsl_sf_result* result); |
46 | -- | ||
47 | -- <http://www.google.com/search?q=gsl_sf_debye_2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
42 | debye_2_e :: Double -> (Double,Double) | 48 | debye_2_e :: Double -> (Double,Double) |
43 | debye_2_e x = createSFR "debye_2_e" $ gsl_sf_debye_2_e x | 49 | debye_2_e x = createSFR "debye_2_e" $ gsl_sf_debye_2_e x |
44 | foreign import ccall "debye.h gsl_sf_debye_2_e" gsl_sf_debye_2_e :: Double -> Ptr Double -> IO(Int) | 50 | foreign import ccall "debye.h gsl_sf_debye_2_e" gsl_sf_debye_2_e :: Double -> Ptr Double -> IO(Int) |
45 | 51 | ||
46 | -- | wrapper for double gsl_sf_debye_2(double x); | 52 | -- | wrapper for double gsl_sf_debye_2(double x); |
53 | -- | ||
54 | -- <http://www.google.com/search?q=gsl_sf_debye_2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
47 | debye_2 :: Double -> Double | 55 | debye_2 :: Double -> Double |
48 | debye_2 = gsl_sf_debye_2 | 56 | debye_2 = gsl_sf_debye_2 |
49 | foreign import ccall "debye.h gsl_sf_debye_2" gsl_sf_debye_2 :: Double -> Double | 57 | foreign import ccall "debye.h gsl_sf_debye_2" gsl_sf_debye_2 :: Double -> Double |
50 | 58 | ||
51 | -- | wrapper for int gsl_sf_debye_3_e(double x,gsl_sf_result* result); | 59 | -- | wrapper for int gsl_sf_debye_3_e(double x,gsl_sf_result* result); |
60 | -- | ||
61 | -- <http://www.google.com/search?q=gsl_sf_debye_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
52 | debye_3_e :: Double -> (Double,Double) | 62 | debye_3_e :: Double -> (Double,Double) |
53 | debye_3_e x = createSFR "debye_3_e" $ gsl_sf_debye_3_e x | 63 | debye_3_e x = createSFR "debye_3_e" $ gsl_sf_debye_3_e x |
54 | foreign import ccall "debye.h gsl_sf_debye_3_e" gsl_sf_debye_3_e :: Double -> Ptr Double -> IO(Int) | 64 | foreign import ccall "debye.h gsl_sf_debye_3_e" gsl_sf_debye_3_e :: Double -> Ptr Double -> IO(Int) |
55 | 65 | ||
56 | -- | wrapper for double gsl_sf_debye_3(double x); | 66 | -- | wrapper for double gsl_sf_debye_3(double x); |
67 | -- | ||
68 | -- <http://www.google.com/search?q=gsl_sf_debye_3&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
57 | debye_3 :: Double -> Double | 69 | debye_3 :: Double -> Double |
58 | debye_3 = gsl_sf_debye_3 | 70 | debye_3 = gsl_sf_debye_3 |
59 | foreign import ccall "debye.h gsl_sf_debye_3" gsl_sf_debye_3 :: Double -> Double | 71 | foreign import ccall "debye.h gsl_sf_debye_3" gsl_sf_debye_3 :: Double -> Double |
60 | 72 | ||
61 | -- | wrapper for int gsl_sf_debye_4_e(double x,gsl_sf_result* result); | 73 | -- | wrapper for int gsl_sf_debye_4_e(double x,gsl_sf_result* result); |
74 | -- | ||
75 | -- <http://www.google.com/search?q=gsl_sf_debye_4_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
62 | debye_4_e :: Double -> (Double,Double) | 76 | debye_4_e :: Double -> (Double,Double) |
63 | debye_4_e x = createSFR "debye_4_e" $ gsl_sf_debye_4_e x | 77 | debye_4_e x = createSFR "debye_4_e" $ gsl_sf_debye_4_e x |
64 | foreign import ccall "debye.h gsl_sf_debye_4_e" gsl_sf_debye_4_e :: Double -> Ptr Double -> IO(Int) | 78 | foreign import ccall "debye.h gsl_sf_debye_4_e" gsl_sf_debye_4_e :: Double -> Ptr Double -> IO(Int) |
65 | 79 | ||
66 | -- | wrapper for double gsl_sf_debye_4(double x); | 80 | -- | wrapper for double gsl_sf_debye_4(double x); |
81 | -- | ||
82 | -- <http://www.google.com/search?q=gsl_sf_debye_4&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
67 | debye_4 :: Double -> Double | 83 | debye_4 :: Double -> Double |
68 | debye_4 = gsl_sf_debye_4 | 84 | debye_4 = gsl_sf_debye_4 |
69 | foreign import ccall "debye.h gsl_sf_debye_4" gsl_sf_debye_4 :: Double -> Double | 85 | foreign import ccall "debye.h gsl_sf_debye_4" gsl_sf_debye_4 :: Double -> Double |
diff --git a/lib/GSL/Special/Dilog.hs b/lib/GSL/Special/Dilog.hs index c7412dd..5575895 100644 --- a/lib/GSL/Special/Dilog.hs +++ b/lib/GSL/Special/Dilog.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Dilogarithm.html> | 12 | <http://www.google.com/search?q=gsl_sf_dilog.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -23,26 +23,36 @@ import Foreign(Ptr) | |||
23 | import GSL.Special.Internal | 23 | import GSL.Special.Internal |
24 | 24 | ||
25 | -- | wrapper for int gsl_sf_dilog_e(double x,gsl_sf_result* result); | 25 | -- | wrapper for int gsl_sf_dilog_e(double x,gsl_sf_result* result); |
26 | -- | ||
27 | -- <http://www.google.com/search?q=gsl_sf_dilog_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
26 | dilog_e :: Double -> (Double,Double) | 28 | dilog_e :: Double -> (Double,Double) |
27 | dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x | 29 | dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x |
28 | foreign import ccall "dilog.h gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr Double -> IO(Int) | 30 | foreign import ccall "dilog.h gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr Double -> IO(Int) |
29 | 31 | ||
30 | -- | wrapper for double gsl_sf_dilog(double x); | 32 | -- | wrapper for double gsl_sf_dilog(double x); |
33 | -- | ||
34 | -- <http://www.google.com/search?q=gsl_sf_dilog&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
31 | dilog :: Double -> Double | 35 | dilog :: Double -> Double |
32 | dilog = gsl_sf_dilog | 36 | dilog = gsl_sf_dilog |
33 | foreign import ccall "dilog.h gsl_sf_dilog" gsl_sf_dilog :: Double -> Double | 37 | foreign import ccall "dilog.h gsl_sf_dilog" gsl_sf_dilog :: Double -> Double |
34 | 38 | ||
35 | -- | wrapper for int gsl_sf_complex_dilog_xy_e(double x,double y,gsl_sf_result* result_re,gsl_sf_result* result_im); | 39 | -- | wrapper for int gsl_sf_complex_dilog_xy_e(double x,double y,gsl_sf_result* result_re,gsl_sf_result* result_im); |
40 | -- | ||
41 | -- <http://www.google.com/search?q=gsl_sf_complex_dilog_xy_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
36 | complex_dilog_xy_e :: Double -> Double -> Ptr Double -> (Double,Double) | 42 | complex_dilog_xy_e :: Double -> Double -> Ptr Double -> (Double,Double) |
37 | complex_dilog_xy_e x y result_re = createSFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y result_re | 43 | complex_dilog_xy_e x y result_re = createSFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y result_re |
38 | foreign import ccall "dilog.h gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) | 44 | foreign import ccall "dilog.h gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) |
39 | 45 | ||
40 | -- | wrapper for int gsl_sf_complex_dilog_e(double r,double theta,gsl_sf_result* result_re,gsl_sf_result* result_im); | 46 | -- | wrapper for int gsl_sf_complex_dilog_e(double r,double theta,gsl_sf_result* result_re,gsl_sf_result* result_im); |
47 | -- | ||
48 | -- <http://www.google.com/search?q=gsl_sf_complex_dilog_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
41 | complex_dilog_e :: Double -> Double -> Ptr Double -> (Double,Double) | 49 | complex_dilog_e :: Double -> Double -> Ptr Double -> (Double,Double) |
42 | complex_dilog_e r theta result_re = createSFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta result_re | 50 | complex_dilog_e r theta result_re = createSFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta result_re |
43 | foreign import ccall "dilog.h gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) | 51 | foreign import ccall "dilog.h gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) |
44 | 52 | ||
45 | -- | wrapper for int gsl_sf_complex_spence_xy_e(double x,double y,gsl_sf_result* real_sp,gsl_sf_result* imag_sp); | 53 | -- | wrapper for int gsl_sf_complex_spence_xy_e(double x,double y,gsl_sf_result* real_sp,gsl_sf_result* imag_sp); |
54 | -- | ||
55 | -- <http://www.google.com/search?q=gsl_sf_complex_spence_xy_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
46 | complex_spence_xy_e :: Double -> Double -> Ptr Double -> (Double,Double) | 56 | complex_spence_xy_e :: Double -> Double -> Ptr Double -> (Double,Double) |
47 | complex_spence_xy_e x y real_sp = createSFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y real_sp | 57 | complex_spence_xy_e x y real_sp = createSFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y real_sp |
48 | foreign import ccall "dilog.h gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) | 58 | foreign import ccall "dilog.h gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) |
diff --git a/lib/GSL/Special/Elementary.hs b/lib/GSL/Special/Elementary.hs index 1eab1ce..da927a2 100644 --- a/lib/GSL/Special/Elementary.hs +++ b/lib/GSL/Special/Elementary.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Elementary-Operations.html> | 12 | <http://www.google.com/search?q=gsl_sf_elementary.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -24,16 +24,22 @@ import Foreign(Ptr) | |||
24 | import GSL.Special.Internal | 24 | import GSL.Special.Internal |
25 | 25 | ||
26 | -- | wrapper for int gsl_sf_multiply_e(double x,double y,gsl_sf_result* result); | 26 | -- | wrapper for int gsl_sf_multiply_e(double x,double y,gsl_sf_result* result); |
27 | -- | ||
28 | -- <http://www.google.com/search?q=gsl_sf_multiply_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
27 | multiply_e :: Double -> Double -> (Double,Double) | 29 | multiply_e :: Double -> Double -> (Double,Double) |
28 | multiply_e x y = createSFR "multiply_e" $ gsl_sf_multiply_e x y | 30 | multiply_e x y = createSFR "multiply_e" $ gsl_sf_multiply_e x y |
29 | foreign import ccall "elementary.h gsl_sf_multiply_e" gsl_sf_multiply_e :: Double -> Double -> Ptr Double -> IO(Int) | 31 | foreign import ccall "elementary.h gsl_sf_multiply_e" gsl_sf_multiply_e :: Double -> Double -> Ptr Double -> IO(Int) |
30 | 32 | ||
31 | -- | wrapper for double gsl_sf_multiply(double x,double y); | 33 | -- | wrapper for double gsl_sf_multiply(double x,double y); |
34 | -- | ||
35 | -- <http://www.google.com/search?q=gsl_sf_multiply&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
32 | multiply :: Double -> Double -> Double | 36 | multiply :: Double -> Double -> Double |
33 | multiply = gsl_sf_multiply | 37 | multiply = gsl_sf_multiply |
34 | foreign import ccall "elementary.h gsl_sf_multiply" gsl_sf_multiply :: Double -> Double -> Double | 38 | foreign import ccall "elementary.h gsl_sf_multiply" gsl_sf_multiply :: Double -> Double -> Double |
35 | 39 | ||
36 | -- | wrapper for int gsl_sf_multiply_err_e(double x,double dx,double y,double dy,gsl_sf_result* result); | 40 | -- | wrapper for int gsl_sf_multiply_err_e(double x,double dx,double y,double dy,gsl_sf_result* result); |
41 | -- | ||
42 | -- <http://www.google.com/search?q=gsl_sf_multiply_err_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
37 | multiply_err_e :: Double -> Double -> Double -> Double -> (Double,Double) | 43 | multiply_err_e :: Double -> Double -> Double -> Double -> (Double,Double) |
38 | multiply_err_e x dx y dy = createSFR "multiply_err_e" $ gsl_sf_multiply_err_e x dx y dy | 44 | multiply_err_e x dx y dy = createSFR "multiply_err_e" $ gsl_sf_multiply_err_e x dx y dy |
39 | foreign import ccall "elementary.h gsl_sf_multiply_err_e" gsl_sf_multiply_err_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) | 45 | foreign import ccall "elementary.h gsl_sf_multiply_err_e" gsl_sf_multiply_err_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) |
diff --git a/lib/GSL/Special/Ellint.hs b/lib/GSL/Special/Ellint.hs index b277072..dddbe21 100644 --- a/lib/GSL/Special/Ellint.hs +++ b/lib/GSL/Special/Ellint.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Elliptic-Integrals.html> | 12 | <http://www.google.com/search?q=gsl_sf_ellint.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -41,101 +41,141 @@ import Foreign(Ptr) | |||
41 | import GSL.Special.Internal | 41 | import GSL.Special.Internal |
42 | 42 | ||
43 | -- | wrapper for int gsl_sf_ellint_Kcomp_e(double k,gsl_mode_t mode,gsl_sf_result* result); | 43 | -- | wrapper for int gsl_sf_ellint_Kcomp_e(double k,gsl_mode_t mode,gsl_sf_result* result); |
44 | -- | ||
45 | -- <http://www.google.com/search?q=gsl_sf_ellint_Kcomp_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
44 | ellint_Kcomp_e :: Double -> Precision -> (Double,Double) | 46 | ellint_Kcomp_e :: Double -> Precision -> (Double,Double) |
45 | ellint_Kcomp_e k mode = createSFR "ellint_Kcomp_e" $ gsl_sf_ellint_Kcomp_e k (precCode mode) | 47 | ellint_Kcomp_e k mode = createSFR "ellint_Kcomp_e" $ gsl_sf_ellint_Kcomp_e k (precCode mode) |
46 | foreign import ccall "ellint.h gsl_sf_ellint_Kcomp_e" gsl_sf_ellint_Kcomp_e :: Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 48 | foreign import ccall "ellint.h gsl_sf_ellint_Kcomp_e" gsl_sf_ellint_Kcomp_e :: Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
47 | 49 | ||
48 | -- | wrapper for double gsl_sf_ellint_Kcomp(double k,gsl_mode_t mode); | 50 | -- | wrapper for double gsl_sf_ellint_Kcomp(double k,gsl_mode_t mode); |
51 | -- | ||
52 | -- <http://www.google.com/search?q=gsl_sf_ellint_Kcomp&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
49 | ellint_Kcomp :: Double -> Precision -> Double | 53 | ellint_Kcomp :: Double -> Precision -> Double |
50 | ellint_Kcomp k mode = gsl_sf_ellint_Kcomp k (precCode mode) | 54 | ellint_Kcomp k mode = gsl_sf_ellint_Kcomp k (precCode mode) |
51 | foreign import ccall "ellint.h gsl_sf_ellint_Kcomp" gsl_sf_ellint_Kcomp :: Double -> Gsl_mode_t -> Double | 55 | foreign import ccall "ellint.h gsl_sf_ellint_Kcomp" gsl_sf_ellint_Kcomp :: Double -> Gsl_mode_t -> Double |
52 | 56 | ||
53 | -- | wrapper for int gsl_sf_ellint_Ecomp_e(double k,gsl_mode_t mode,gsl_sf_result* result); | 57 | -- | wrapper for int gsl_sf_ellint_Ecomp_e(double k,gsl_mode_t mode,gsl_sf_result* result); |
58 | -- | ||
59 | -- <http://www.google.com/search?q=gsl_sf_ellint_Ecomp_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
54 | ellint_Ecomp_e :: Double -> Precision -> (Double,Double) | 60 | ellint_Ecomp_e :: Double -> Precision -> (Double,Double) |
55 | ellint_Ecomp_e k mode = createSFR "ellint_Ecomp_e" $ gsl_sf_ellint_Ecomp_e k (precCode mode) | 61 | ellint_Ecomp_e k mode = createSFR "ellint_Ecomp_e" $ gsl_sf_ellint_Ecomp_e k (precCode mode) |
56 | foreign import ccall "ellint.h gsl_sf_ellint_Ecomp_e" gsl_sf_ellint_Ecomp_e :: Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 62 | foreign import ccall "ellint.h gsl_sf_ellint_Ecomp_e" gsl_sf_ellint_Ecomp_e :: Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
57 | 63 | ||
58 | -- | wrapper for double gsl_sf_ellint_Ecomp(double k,gsl_mode_t mode); | 64 | -- | wrapper for double gsl_sf_ellint_Ecomp(double k,gsl_mode_t mode); |
65 | -- | ||
66 | -- <http://www.google.com/search?q=gsl_sf_ellint_Ecomp&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
59 | ellint_Ecomp :: Double -> Precision -> Double | 67 | ellint_Ecomp :: Double -> Precision -> Double |
60 | ellint_Ecomp k mode = gsl_sf_ellint_Ecomp k (precCode mode) | 68 | ellint_Ecomp k mode = gsl_sf_ellint_Ecomp k (precCode mode) |
61 | foreign import ccall "ellint.h gsl_sf_ellint_Ecomp" gsl_sf_ellint_Ecomp :: Double -> Gsl_mode_t -> Double | 69 | foreign import ccall "ellint.h gsl_sf_ellint_Ecomp" gsl_sf_ellint_Ecomp :: Double -> Gsl_mode_t -> Double |
62 | 70 | ||
63 | -- | wrapper for int gsl_sf_ellint_F_e(double phi,double k,gsl_mode_t mode,gsl_sf_result* result); | 71 | -- | wrapper for int gsl_sf_ellint_F_e(double phi,double k,gsl_mode_t mode,gsl_sf_result* result); |
72 | -- | ||
73 | -- <http://www.google.com/search?q=gsl_sf_ellint_F_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
64 | ellint_F_e :: Double -> Double -> Precision -> (Double,Double) | 74 | ellint_F_e :: Double -> Double -> Precision -> (Double,Double) |
65 | ellint_F_e phi k mode = createSFR "ellint_F_e" $ gsl_sf_ellint_F_e phi k (precCode mode) | 75 | ellint_F_e phi k mode = createSFR "ellint_F_e" $ gsl_sf_ellint_F_e phi k (precCode mode) |
66 | foreign import ccall "ellint.h gsl_sf_ellint_F_e" gsl_sf_ellint_F_e :: Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 76 | foreign import ccall "ellint.h gsl_sf_ellint_F_e" gsl_sf_ellint_F_e :: Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
67 | 77 | ||
68 | -- | wrapper for double gsl_sf_ellint_F(double phi,double k,gsl_mode_t mode); | 78 | -- | wrapper for double gsl_sf_ellint_F(double phi,double k,gsl_mode_t mode); |
79 | -- | ||
80 | -- <http://www.google.com/search?q=gsl_sf_ellint_F&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
69 | ellint_F :: Double -> Double -> Precision -> Double | 81 | ellint_F :: Double -> Double -> Precision -> Double |
70 | ellint_F phi k mode = gsl_sf_ellint_F phi k (precCode mode) | 82 | ellint_F phi k mode = gsl_sf_ellint_F phi k (precCode mode) |
71 | foreign import ccall "ellint.h gsl_sf_ellint_F" gsl_sf_ellint_F :: Double -> Double -> Gsl_mode_t -> Double | 83 | foreign import ccall "ellint.h gsl_sf_ellint_F" gsl_sf_ellint_F :: Double -> Double -> Gsl_mode_t -> Double |
72 | 84 | ||
73 | -- | wrapper for int gsl_sf_ellint_E_e(double phi,double k,gsl_mode_t mode,gsl_sf_result* result); | 85 | -- | wrapper for int gsl_sf_ellint_E_e(double phi,double k,gsl_mode_t mode,gsl_sf_result* result); |
86 | -- | ||
87 | -- <http://www.google.com/search?q=gsl_sf_ellint_E_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
74 | ellint_E_e :: Double -> Double -> Precision -> (Double,Double) | 88 | ellint_E_e :: Double -> Double -> Precision -> (Double,Double) |
75 | ellint_E_e phi k mode = createSFR "ellint_E_e" $ gsl_sf_ellint_E_e phi k (precCode mode) | 89 | ellint_E_e phi k mode = createSFR "ellint_E_e" $ gsl_sf_ellint_E_e phi k (precCode mode) |
76 | foreign import ccall "ellint.h gsl_sf_ellint_E_e" gsl_sf_ellint_E_e :: Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 90 | foreign import ccall "ellint.h gsl_sf_ellint_E_e" gsl_sf_ellint_E_e :: Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
77 | 91 | ||
78 | -- | wrapper for double gsl_sf_ellint_E(double phi,double k,gsl_mode_t mode); | 92 | -- | wrapper for double gsl_sf_ellint_E(double phi,double k,gsl_mode_t mode); |
93 | -- | ||
94 | -- <http://www.google.com/search?q=gsl_sf_ellint_E&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
79 | ellint_E :: Double -> Double -> Precision -> Double | 95 | ellint_E :: Double -> Double -> Precision -> Double |
80 | ellint_E phi k mode = gsl_sf_ellint_E phi k (precCode mode) | 96 | ellint_E phi k mode = gsl_sf_ellint_E phi k (precCode mode) |
81 | foreign import ccall "ellint.h gsl_sf_ellint_E" gsl_sf_ellint_E :: Double -> Double -> Gsl_mode_t -> Double | 97 | foreign import ccall "ellint.h gsl_sf_ellint_E" gsl_sf_ellint_E :: Double -> Double -> Gsl_mode_t -> Double |
82 | 98 | ||
83 | -- | wrapper for int gsl_sf_ellint_P_e(double phi,double k,double n,gsl_mode_t mode,gsl_sf_result* result); | 99 | -- | wrapper for int gsl_sf_ellint_P_e(double phi,double k,double n,gsl_mode_t mode,gsl_sf_result* result); |
100 | -- | ||
101 | -- <http://www.google.com/search?q=gsl_sf_ellint_P_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
84 | ellint_P_e :: Double -> Double -> Double -> Precision -> (Double,Double) | 102 | ellint_P_e :: Double -> Double -> Double -> Precision -> (Double,Double) |
85 | ellint_P_e phi k n mode = createSFR "ellint_P_e" $ gsl_sf_ellint_P_e phi k n (precCode mode) | 103 | ellint_P_e phi k n mode = createSFR "ellint_P_e" $ gsl_sf_ellint_P_e phi k n (precCode mode) |
86 | foreign import ccall "ellint.h gsl_sf_ellint_P_e" gsl_sf_ellint_P_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 104 | foreign import ccall "ellint.h gsl_sf_ellint_P_e" gsl_sf_ellint_P_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
87 | 105 | ||
88 | -- | wrapper for double gsl_sf_ellint_P(double phi,double k,double n,gsl_mode_t mode); | 106 | -- | wrapper for double gsl_sf_ellint_P(double phi,double k,double n,gsl_mode_t mode); |
107 | -- | ||
108 | -- <http://www.google.com/search?q=gsl_sf_ellint_P&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
89 | ellint_P :: Double -> Double -> Double -> Precision -> Double | 109 | ellint_P :: Double -> Double -> Double -> Precision -> Double |
90 | ellint_P phi k n mode = gsl_sf_ellint_P phi k n (precCode mode) | 110 | ellint_P phi k n mode = gsl_sf_ellint_P phi k n (precCode mode) |
91 | foreign import ccall "ellint.h gsl_sf_ellint_P" gsl_sf_ellint_P :: Double -> Double -> Double -> Gsl_mode_t -> Double | 111 | foreign import ccall "ellint.h gsl_sf_ellint_P" gsl_sf_ellint_P :: Double -> Double -> Double -> Gsl_mode_t -> Double |
92 | 112 | ||
93 | -- | wrapper for int gsl_sf_ellint_D_e(double phi,double k,double n,gsl_mode_t mode,gsl_sf_result* result); | 113 | -- | wrapper for int gsl_sf_ellint_D_e(double phi,double k,double n,gsl_mode_t mode,gsl_sf_result* result); |
114 | -- | ||
115 | -- <http://www.google.com/search?q=gsl_sf_ellint_D_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
94 | ellint_D_e :: Double -> Double -> Double -> Precision -> (Double,Double) | 116 | ellint_D_e :: Double -> Double -> Double -> Precision -> (Double,Double) |
95 | ellint_D_e phi k n mode = createSFR "ellint_D_e" $ gsl_sf_ellint_D_e phi k n (precCode mode) | 117 | ellint_D_e phi k n mode = createSFR "ellint_D_e" $ gsl_sf_ellint_D_e phi k n (precCode mode) |
96 | foreign import ccall "ellint.h gsl_sf_ellint_D_e" gsl_sf_ellint_D_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 118 | foreign import ccall "ellint.h gsl_sf_ellint_D_e" gsl_sf_ellint_D_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
97 | 119 | ||
98 | -- | wrapper for double gsl_sf_ellint_D(double phi,double k,double n,gsl_mode_t mode); | 120 | -- | wrapper for double gsl_sf_ellint_D(double phi,double k,double n,gsl_mode_t mode); |
121 | -- | ||
122 | -- <http://www.google.com/search?q=gsl_sf_ellint_D&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
99 | ellint_D :: Double -> Double -> Double -> Precision -> Double | 123 | ellint_D :: Double -> Double -> Double -> Precision -> Double |
100 | ellint_D phi k n mode = gsl_sf_ellint_D phi k n (precCode mode) | 124 | ellint_D phi k n mode = gsl_sf_ellint_D phi k n (precCode mode) |
101 | foreign import ccall "ellint.h gsl_sf_ellint_D" gsl_sf_ellint_D :: Double -> Double -> Double -> Gsl_mode_t -> Double | 125 | foreign import ccall "ellint.h gsl_sf_ellint_D" gsl_sf_ellint_D :: Double -> Double -> Double -> Gsl_mode_t -> Double |
102 | 126 | ||
103 | -- | wrapper for int gsl_sf_ellint_RC_e(double x,double y,gsl_mode_t mode,gsl_sf_result* result); | 127 | -- | wrapper for int gsl_sf_ellint_RC_e(double x,double y,gsl_mode_t mode,gsl_sf_result* result); |
128 | -- | ||
129 | -- <http://www.google.com/search?q=gsl_sf_ellint_RC_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
104 | ellint_RC_e :: Double -> Double -> Precision -> (Double,Double) | 130 | ellint_RC_e :: Double -> Double -> Precision -> (Double,Double) |
105 | ellint_RC_e x y mode = createSFR "ellint_RC_e" $ gsl_sf_ellint_RC_e x y (precCode mode) | 131 | ellint_RC_e x y mode = createSFR "ellint_RC_e" $ gsl_sf_ellint_RC_e x y (precCode mode) |
106 | foreign import ccall "ellint.h gsl_sf_ellint_RC_e" gsl_sf_ellint_RC_e :: Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 132 | foreign import ccall "ellint.h gsl_sf_ellint_RC_e" gsl_sf_ellint_RC_e :: Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
107 | 133 | ||
108 | -- | wrapper for double gsl_sf_ellint_RC(double x,double y,gsl_mode_t mode); | 134 | -- | wrapper for double gsl_sf_ellint_RC(double x,double y,gsl_mode_t mode); |
135 | -- | ||
136 | -- <http://www.google.com/search?q=gsl_sf_ellint_RC&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
109 | ellint_RC :: Double -> Double -> Precision -> Double | 137 | ellint_RC :: Double -> Double -> Precision -> Double |
110 | ellint_RC x y mode = gsl_sf_ellint_RC x y (precCode mode) | 138 | ellint_RC x y mode = gsl_sf_ellint_RC x y (precCode mode) |
111 | foreign import ccall "ellint.h gsl_sf_ellint_RC" gsl_sf_ellint_RC :: Double -> Double -> Gsl_mode_t -> Double | 139 | foreign import ccall "ellint.h gsl_sf_ellint_RC" gsl_sf_ellint_RC :: Double -> Double -> Gsl_mode_t -> Double |
112 | 140 | ||
113 | -- | wrapper for int gsl_sf_ellint_RD_e(double x,double y,double z,gsl_mode_t mode,gsl_sf_result* result); | 141 | -- | wrapper for int gsl_sf_ellint_RD_e(double x,double y,double z,gsl_mode_t mode,gsl_sf_result* result); |
142 | -- | ||
143 | -- <http://www.google.com/search?q=gsl_sf_ellint_RD_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
114 | ellint_RD_e :: Double -> Double -> Double -> Precision -> (Double,Double) | 144 | ellint_RD_e :: Double -> Double -> Double -> Precision -> (Double,Double) |
115 | ellint_RD_e x y z mode = createSFR "ellint_RD_e" $ gsl_sf_ellint_RD_e x y z (precCode mode) | 145 | ellint_RD_e x y z mode = createSFR "ellint_RD_e" $ gsl_sf_ellint_RD_e x y z (precCode mode) |
116 | foreign import ccall "ellint.h gsl_sf_ellint_RD_e" gsl_sf_ellint_RD_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 146 | foreign import ccall "ellint.h gsl_sf_ellint_RD_e" gsl_sf_ellint_RD_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
117 | 147 | ||
118 | -- | wrapper for double gsl_sf_ellint_RD(double x,double y,double z,gsl_mode_t mode); | 148 | -- | wrapper for double gsl_sf_ellint_RD(double x,double y,double z,gsl_mode_t mode); |
149 | -- | ||
150 | -- <http://www.google.com/search?q=gsl_sf_ellint_RD&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
119 | ellint_RD :: Double -> Double -> Double -> Precision -> Double | 151 | ellint_RD :: Double -> Double -> Double -> Precision -> Double |
120 | ellint_RD x y z mode = gsl_sf_ellint_RD x y z (precCode mode) | 152 | ellint_RD x y z mode = gsl_sf_ellint_RD x y z (precCode mode) |
121 | foreign import ccall "ellint.h gsl_sf_ellint_RD" gsl_sf_ellint_RD :: Double -> Double -> Double -> Gsl_mode_t -> Double | 153 | foreign import ccall "ellint.h gsl_sf_ellint_RD" gsl_sf_ellint_RD :: Double -> Double -> Double -> Gsl_mode_t -> Double |
122 | 154 | ||
123 | -- | wrapper for int gsl_sf_ellint_RF_e(double x,double y,double z,gsl_mode_t mode,gsl_sf_result* result); | 155 | -- | wrapper for int gsl_sf_ellint_RF_e(double x,double y,double z,gsl_mode_t mode,gsl_sf_result* result); |
156 | -- | ||
157 | -- <http://www.google.com/search?q=gsl_sf_ellint_RF_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
124 | ellint_RF_e :: Double -> Double -> Double -> Precision -> (Double,Double) | 158 | ellint_RF_e :: Double -> Double -> Double -> Precision -> (Double,Double) |
125 | ellint_RF_e x y z mode = createSFR "ellint_RF_e" $ gsl_sf_ellint_RF_e x y z (precCode mode) | 159 | ellint_RF_e x y z mode = createSFR "ellint_RF_e" $ gsl_sf_ellint_RF_e x y z (precCode mode) |
126 | foreign import ccall "ellint.h gsl_sf_ellint_RF_e" gsl_sf_ellint_RF_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 160 | foreign import ccall "ellint.h gsl_sf_ellint_RF_e" gsl_sf_ellint_RF_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
127 | 161 | ||
128 | -- | wrapper for double gsl_sf_ellint_RF(double x,double y,double z,gsl_mode_t mode); | 162 | -- | wrapper for double gsl_sf_ellint_RF(double x,double y,double z,gsl_mode_t mode); |
163 | -- | ||
164 | -- <http://www.google.com/search?q=gsl_sf_ellint_RF&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
129 | ellint_RF :: Double -> Double -> Double -> Precision -> Double | 165 | ellint_RF :: Double -> Double -> Double -> Precision -> Double |
130 | ellint_RF x y z mode = gsl_sf_ellint_RF x y z (precCode mode) | 166 | ellint_RF x y z mode = gsl_sf_ellint_RF x y z (precCode mode) |
131 | foreign import ccall "ellint.h gsl_sf_ellint_RF" gsl_sf_ellint_RF :: Double -> Double -> Double -> Gsl_mode_t -> Double | 167 | foreign import ccall "ellint.h gsl_sf_ellint_RF" gsl_sf_ellint_RF :: Double -> Double -> Double -> Gsl_mode_t -> Double |
132 | 168 | ||
133 | -- | wrapper for int gsl_sf_ellint_RJ_e(double x,double y,double z,double p,gsl_mode_t mode,gsl_sf_result* result); | 169 | -- | wrapper for int gsl_sf_ellint_RJ_e(double x,double y,double z,double p,gsl_mode_t mode,gsl_sf_result* result); |
170 | -- | ||
171 | -- <http://www.google.com/search?q=gsl_sf_ellint_RJ_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
134 | ellint_RJ_e :: Double -> Double -> Double -> Double -> Precision -> (Double,Double) | 172 | ellint_RJ_e :: Double -> Double -> Double -> Double -> Precision -> (Double,Double) |
135 | ellint_RJ_e x y z p mode = createSFR "ellint_RJ_e" $ gsl_sf_ellint_RJ_e x y z p (precCode mode) | 173 | ellint_RJ_e x y z p mode = createSFR "ellint_RJ_e" $ gsl_sf_ellint_RJ_e x y z p (precCode mode) |
136 | foreign import ccall "ellint.h gsl_sf_ellint_RJ_e" gsl_sf_ellint_RJ_e :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) | 174 | foreign import ccall "ellint.h gsl_sf_ellint_RJ_e" gsl_sf_ellint_RJ_e :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Ptr Double -> IO(Int) |
137 | 175 | ||
138 | -- | wrapper for double gsl_sf_ellint_RJ(double x,double y,double z,double p,gsl_mode_t mode); | 176 | -- | wrapper for double gsl_sf_ellint_RJ(double x,double y,double z,double p,gsl_mode_t mode); |
177 | -- | ||
178 | -- <http://www.google.com/search?q=gsl_sf_ellint_RJ&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
139 | ellint_RJ :: Double -> Double -> Double -> Double -> Precision -> Double | 179 | ellint_RJ :: Double -> Double -> Double -> Double -> Precision -> Double |
140 | ellint_RJ x y z p mode = gsl_sf_ellint_RJ x y z p (precCode mode) | 180 | ellint_RJ x y z p mode = gsl_sf_ellint_RJ x y z p (precCode mode) |
141 | foreign import ccall "ellint.h gsl_sf_ellint_RJ" gsl_sf_ellint_RJ :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Double | 181 | foreign import ccall "ellint.h gsl_sf_ellint_RJ" gsl_sf_ellint_RJ :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Double |
diff --git a/lib/GSL/Special/Erf.hs b/lib/GSL/Special/Erf.hs index 30b7817..6dc5abb 100644 --- a/lib/GSL/Special/Erf.hs +++ b/lib/GSL/Special/Erf.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Error-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_erf.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -33,61 +33,85 @@ import Foreign(Ptr) | |||
33 | import GSL.Special.Internal | 33 | import GSL.Special.Internal |
34 | 34 | ||
35 | -- | wrapper for int gsl_sf_erfc_e(double x,gsl_sf_result* result); | 35 | -- | wrapper for int gsl_sf_erfc_e(double x,gsl_sf_result* result); |
36 | -- | ||
37 | -- <http://www.google.com/search?q=gsl_sf_erfc_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
36 | erfc_e :: Double -> (Double,Double) | 38 | erfc_e :: Double -> (Double,Double) |
37 | erfc_e x = createSFR "erfc_e" $ gsl_sf_erfc_e x | 39 | erfc_e x = createSFR "erfc_e" $ gsl_sf_erfc_e x |
38 | foreign import ccall "erf.h gsl_sf_erfc_e" gsl_sf_erfc_e :: Double -> Ptr Double -> IO(Int) | 40 | foreign import ccall "erf.h gsl_sf_erfc_e" gsl_sf_erfc_e :: Double -> Ptr Double -> IO(Int) |
39 | 41 | ||
40 | -- | wrapper for double gsl_sf_erfc(double x); | 42 | -- | wrapper for double gsl_sf_erfc(double x); |
43 | -- | ||
44 | -- <http://www.google.com/search?q=gsl_sf_erfc&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
41 | erfc :: Double -> Double | 45 | erfc :: Double -> Double |
42 | erfc = gsl_sf_erfc | 46 | erfc = gsl_sf_erfc |
43 | foreign import ccall "erf.h gsl_sf_erfc" gsl_sf_erfc :: Double -> Double | 47 | foreign import ccall "erf.h gsl_sf_erfc" gsl_sf_erfc :: Double -> Double |
44 | 48 | ||
45 | -- | wrapper for int gsl_sf_log_erfc_e(double x,gsl_sf_result* result); | 49 | -- | wrapper for int gsl_sf_log_erfc_e(double x,gsl_sf_result* result); |
50 | -- | ||
51 | -- <http://www.google.com/search?q=gsl_sf_log_erfc_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
46 | log_erfc_e :: Double -> (Double,Double) | 52 | log_erfc_e :: Double -> (Double,Double) |
47 | log_erfc_e x = createSFR "log_erfc_e" $ gsl_sf_log_erfc_e x | 53 | log_erfc_e x = createSFR "log_erfc_e" $ gsl_sf_log_erfc_e x |
48 | foreign import ccall "erf.h gsl_sf_log_erfc_e" gsl_sf_log_erfc_e :: Double -> Ptr Double -> IO(Int) | 54 | foreign import ccall "erf.h gsl_sf_log_erfc_e" gsl_sf_log_erfc_e :: Double -> Ptr Double -> IO(Int) |
49 | 55 | ||
50 | -- | wrapper for double gsl_sf_log_erfc(double x); | 56 | -- | wrapper for double gsl_sf_log_erfc(double x); |
57 | -- | ||
58 | -- <http://www.google.com/search?q=gsl_sf_log_erfc&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
51 | log_erfc :: Double -> Double | 59 | log_erfc :: Double -> Double |
52 | log_erfc = gsl_sf_log_erfc | 60 | log_erfc = gsl_sf_log_erfc |
53 | foreign import ccall "erf.h gsl_sf_log_erfc" gsl_sf_log_erfc :: Double -> Double | 61 | foreign import ccall "erf.h gsl_sf_log_erfc" gsl_sf_log_erfc :: Double -> Double |
54 | 62 | ||
55 | -- | wrapper for int gsl_sf_erf_e(double x,gsl_sf_result* result); | 63 | -- | wrapper for int gsl_sf_erf_e(double x,gsl_sf_result* result); |
64 | -- | ||
65 | -- <http://www.google.com/search?q=gsl_sf_erf_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
56 | erf_e :: Double -> (Double,Double) | 66 | erf_e :: Double -> (Double,Double) |
57 | erf_e x = createSFR "erf_e" $ gsl_sf_erf_e x | 67 | erf_e x = createSFR "erf_e" $ gsl_sf_erf_e x |
58 | foreign import ccall "erf.h gsl_sf_erf_e" gsl_sf_erf_e :: Double -> Ptr Double -> IO(Int) | 68 | foreign import ccall "erf.h gsl_sf_erf_e" gsl_sf_erf_e :: Double -> Ptr Double -> IO(Int) |
59 | 69 | ||
60 | -- | wrapper for double gsl_sf_erf(double x); | 70 | -- | wrapper for double gsl_sf_erf(double x); |
71 | -- | ||
72 | -- <http://www.google.com/search?q=gsl_sf_erf&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
61 | erf :: Double -> Double | 73 | erf :: Double -> Double |
62 | erf = gsl_sf_erf | 74 | erf = gsl_sf_erf |
63 | foreign import ccall "erf.h gsl_sf_erf" gsl_sf_erf :: Double -> Double | 75 | foreign import ccall "erf.h gsl_sf_erf" gsl_sf_erf :: Double -> Double |
64 | 76 | ||
65 | -- | wrapper for int gsl_sf_erf_Z_e(double x,gsl_sf_result* result); | 77 | -- | wrapper for int gsl_sf_erf_Z_e(double x,gsl_sf_result* result); |
78 | -- | ||
79 | -- <http://www.google.com/search?q=gsl_sf_erf_Z_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
66 | erf_Z_e :: Double -> (Double,Double) | 80 | erf_Z_e :: Double -> (Double,Double) |
67 | erf_Z_e x = createSFR "erf_Z_e" $ gsl_sf_erf_Z_e x | 81 | erf_Z_e x = createSFR "erf_Z_e" $ gsl_sf_erf_Z_e x |
68 | foreign import ccall "erf.h gsl_sf_erf_Z_e" gsl_sf_erf_Z_e :: Double -> Ptr Double -> IO(Int) | 82 | foreign import ccall "erf.h gsl_sf_erf_Z_e" gsl_sf_erf_Z_e :: Double -> Ptr Double -> IO(Int) |
69 | 83 | ||
70 | -- | wrapper for int gsl_sf_erf_Q_e(double x,gsl_sf_result* result); | 84 | -- | wrapper for int gsl_sf_erf_Q_e(double x,gsl_sf_result* result); |
85 | -- | ||
86 | -- <http://www.google.com/search?q=gsl_sf_erf_Q_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
71 | erf_Q_e :: Double -> (Double,Double) | 87 | erf_Q_e :: Double -> (Double,Double) |
72 | erf_Q_e x = createSFR "erf_Q_e" $ gsl_sf_erf_Q_e x | 88 | erf_Q_e x = createSFR "erf_Q_e" $ gsl_sf_erf_Q_e x |
73 | foreign import ccall "erf.h gsl_sf_erf_Q_e" gsl_sf_erf_Q_e :: Double -> Ptr Double -> IO(Int) | 89 | foreign import ccall "erf.h gsl_sf_erf_Q_e" gsl_sf_erf_Q_e :: Double -> Ptr Double -> IO(Int) |
74 | 90 | ||
75 | -- | wrapper for double gsl_sf_erf_Z(double x); | 91 | -- | wrapper for double gsl_sf_erf_Z(double x); |
92 | -- | ||
93 | -- <http://www.google.com/search?q=gsl_sf_erf_Z&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
76 | erf_Z :: Double -> Double | 94 | erf_Z :: Double -> Double |
77 | erf_Z = gsl_sf_erf_Z | 95 | erf_Z = gsl_sf_erf_Z |
78 | foreign import ccall "erf.h gsl_sf_erf_Z" gsl_sf_erf_Z :: Double -> Double | 96 | foreign import ccall "erf.h gsl_sf_erf_Z" gsl_sf_erf_Z :: Double -> Double |
79 | 97 | ||
80 | -- | wrapper for double gsl_sf_erf_Q(double x); | 98 | -- | wrapper for double gsl_sf_erf_Q(double x); |
99 | -- | ||
100 | -- <http://www.google.com/search?q=gsl_sf_erf_Q&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
81 | erf_Q :: Double -> Double | 101 | erf_Q :: Double -> Double |
82 | erf_Q = gsl_sf_erf_Q | 102 | erf_Q = gsl_sf_erf_Q |
83 | foreign import ccall "erf.h gsl_sf_erf_Q" gsl_sf_erf_Q :: Double -> Double | 103 | foreign import ccall "erf.h gsl_sf_erf_Q" gsl_sf_erf_Q :: Double -> Double |
84 | 104 | ||
85 | -- | wrapper for int gsl_sf_hazard_e(double x,gsl_sf_result* result); | 105 | -- | wrapper for int gsl_sf_hazard_e(double x,gsl_sf_result* result); |
106 | -- | ||
107 | -- <http://www.google.com/search?q=gsl_sf_hazard_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
86 | hazard_e :: Double -> (Double,Double) | 108 | hazard_e :: Double -> (Double,Double) |
87 | hazard_e x = createSFR "hazard_e" $ gsl_sf_hazard_e x | 109 | hazard_e x = createSFR "hazard_e" $ gsl_sf_hazard_e x |
88 | foreign import ccall "erf.h gsl_sf_hazard_e" gsl_sf_hazard_e :: Double -> Ptr Double -> IO(Int) | 110 | foreign import ccall "erf.h gsl_sf_hazard_e" gsl_sf_hazard_e :: Double -> Ptr Double -> IO(Int) |
89 | 111 | ||
90 | -- | wrapper for double gsl_sf_hazard(double x); | 112 | -- | wrapper for double gsl_sf_hazard(double x); |
113 | -- | ||
114 | -- <http://www.google.com/search?q=gsl_sf_hazard&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
91 | hazard :: Double -> Double | 115 | hazard :: Double -> Double |
92 | hazard = gsl_sf_hazard | 116 | hazard = gsl_sf_hazard |
93 | foreign import ccall "erf.h gsl_sf_hazard" gsl_sf_hazard :: Double -> Double | 117 | foreign import ccall "erf.h gsl_sf_hazard" gsl_sf_hazard :: Double -> Double |
diff --git a/lib/GSL/Special/Expint.hs b/lib/GSL/Special/Expint.hs index 6dd5959..4e1b2b5 100644 --- a/lib/GSL/Special/Expint.hs +++ b/lib/GSL/Special/Expint.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Exponential-Integrals.html> | 12 | <http://www.google.com/search?q=gsl_sf_expint.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -45,121 +45,169 @@ import Foreign(Ptr) | |||
45 | import GSL.Special.Internal | 45 | import GSL.Special.Internal |
46 | 46 | ||
47 | -- | wrapper for int gsl_sf_expint_E1_e(double x,gsl_sf_result* result); | 47 | -- | wrapper for int gsl_sf_expint_E1_e(double x,gsl_sf_result* result); |
48 | -- | ||
49 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
48 | expint_E1_e :: Double -> (Double,Double) | 50 | expint_E1_e :: Double -> (Double,Double) |
49 | expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x | 51 | expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x |
50 | foreign import ccall "expint.h gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr Double -> IO(Int) | 52 | foreign import ccall "expint.h gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr Double -> IO(Int) |
51 | 53 | ||
52 | -- | wrapper for double gsl_sf_expint_E1(double x); | 54 | -- | wrapper for double gsl_sf_expint_E1(double x); |
55 | -- | ||
56 | -- <http://www.google.com/search?q=gsl_sf_expint_E1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
53 | expint_E1 :: Double -> Double | 57 | expint_E1 :: Double -> Double |
54 | expint_E1 = gsl_sf_expint_E1 | 58 | expint_E1 = gsl_sf_expint_E1 |
55 | foreign import ccall "expint.h gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> Double | 59 | foreign import ccall "expint.h gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> Double |
56 | 60 | ||
57 | -- | wrapper for int gsl_sf_expint_E2_e(double x,gsl_sf_result* result); | 61 | -- | wrapper for int gsl_sf_expint_E2_e(double x,gsl_sf_result* result); |
62 | -- | ||
63 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
58 | expint_E2_e :: Double -> (Double,Double) | 64 | expint_E2_e :: Double -> (Double,Double) |
59 | expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x | 65 | expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x |
60 | foreign import ccall "expint.h gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr Double -> IO(Int) | 66 | foreign import ccall "expint.h gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr Double -> IO(Int) |
61 | 67 | ||
62 | -- | wrapper for double gsl_sf_expint_E2(double x); | 68 | -- | wrapper for double gsl_sf_expint_E2(double x); |
69 | -- | ||
70 | -- <http://www.google.com/search?q=gsl_sf_expint_E2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
63 | expint_E2 :: Double -> Double | 71 | expint_E2 :: Double -> Double |
64 | expint_E2 = gsl_sf_expint_E2 | 72 | expint_E2 = gsl_sf_expint_E2 |
65 | foreign import ccall "expint.h gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> Double | 73 | foreign import ccall "expint.h gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> Double |
66 | 74 | ||
67 | -- | wrapper for int gsl_sf_expint_E1_scaled_e(double x,gsl_sf_result* result); | 75 | -- | wrapper for int gsl_sf_expint_E1_scaled_e(double x,gsl_sf_result* result); |
76 | -- | ||
77 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
68 | expint_E1_scaled_e :: Double -> (Double,Double) | 78 | expint_E1_scaled_e :: Double -> (Double,Double) |
69 | expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x | 79 | expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x |
70 | foreign import ccall "expint.h gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr Double -> IO(Int) | 80 | foreign import ccall "expint.h gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr Double -> IO(Int) |
71 | 81 | ||
72 | -- | wrapper for double gsl_sf_expint_E1_scaled(double x); | 82 | -- | wrapper for double gsl_sf_expint_E1_scaled(double x); |
83 | -- | ||
84 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
73 | expint_E1_scaled :: Double -> Double | 85 | expint_E1_scaled :: Double -> Double |
74 | expint_E1_scaled = gsl_sf_expint_E1_scaled | 86 | expint_E1_scaled = gsl_sf_expint_E1_scaled |
75 | foreign import ccall "expint.h gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled :: Double -> Double | 87 | foreign import ccall "expint.h gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled :: Double -> Double |
76 | 88 | ||
77 | -- | wrapper for int gsl_sf_expint_E2_scaled_e(double x,gsl_sf_result* result); | 89 | -- | wrapper for int gsl_sf_expint_E2_scaled_e(double x,gsl_sf_result* result); |
90 | -- | ||
91 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
78 | expint_E2_scaled_e :: Double -> (Double,Double) | 92 | expint_E2_scaled_e :: Double -> (Double,Double) |
79 | expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x | 93 | expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x |
80 | foreign import ccall "expint.h gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr Double -> IO(Int) | 94 | foreign import ccall "expint.h gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr Double -> IO(Int) |
81 | 95 | ||
82 | -- | wrapper for double gsl_sf_expint_E2_scaled(double x); | 96 | -- | wrapper for double gsl_sf_expint_E2_scaled(double x); |
97 | -- | ||
98 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
83 | expint_E2_scaled :: Double -> Double | 99 | expint_E2_scaled :: Double -> Double |
84 | expint_E2_scaled = gsl_sf_expint_E2_scaled | 100 | expint_E2_scaled = gsl_sf_expint_E2_scaled |
85 | foreign import ccall "expint.h gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled :: Double -> Double | 101 | foreign import ccall "expint.h gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled :: Double -> Double |
86 | 102 | ||
87 | -- | wrapper for int gsl_sf_expint_Ei_e(double x,gsl_sf_result* result); | 103 | -- | wrapper for int gsl_sf_expint_Ei_e(double x,gsl_sf_result* result); |
104 | -- | ||
105 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
88 | expint_Ei_e :: Double -> (Double,Double) | 106 | expint_Ei_e :: Double -> (Double,Double) |
89 | expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x | 107 | expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x |
90 | foreign import ccall "expint.h gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr Double -> IO(Int) | 108 | foreign import ccall "expint.h gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr Double -> IO(Int) |
91 | 109 | ||
92 | -- | wrapper for double gsl_sf_expint_Ei(double x); | 110 | -- | wrapper for double gsl_sf_expint_Ei(double x); |
111 | -- | ||
112 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
93 | expint_Ei :: Double -> Double | 113 | expint_Ei :: Double -> Double |
94 | expint_Ei = gsl_sf_expint_Ei | 114 | expint_Ei = gsl_sf_expint_Ei |
95 | foreign import ccall "expint.h gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> Double | 115 | foreign import ccall "expint.h gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> Double |
96 | 116 | ||
97 | -- | wrapper for int gsl_sf_expint_Ei_scaled_e(double x,gsl_sf_result* result); | 117 | -- | wrapper for int gsl_sf_expint_Ei_scaled_e(double x,gsl_sf_result* result); |
118 | -- | ||
119 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
98 | expint_Ei_scaled_e :: Double -> (Double,Double) | 120 | expint_Ei_scaled_e :: Double -> (Double,Double) |
99 | expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x | 121 | expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x |
100 | foreign import ccall "expint.h gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr Double -> IO(Int) | 122 | foreign import ccall "expint.h gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr Double -> IO(Int) |
101 | 123 | ||
102 | -- | wrapper for double gsl_sf_expint_Ei_scaled(double x); | 124 | -- | wrapper for double gsl_sf_expint_Ei_scaled(double x); |
125 | -- | ||
126 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
103 | expint_Ei_scaled :: Double -> Double | 127 | expint_Ei_scaled :: Double -> Double |
104 | expint_Ei_scaled = gsl_sf_expint_Ei_scaled | 128 | expint_Ei_scaled = gsl_sf_expint_Ei_scaled |
105 | foreign import ccall "expint.h gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled :: Double -> Double | 129 | foreign import ccall "expint.h gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled :: Double -> Double |
106 | 130 | ||
107 | -- | wrapper for int gsl_sf_Shi_e(double x,gsl_sf_result* result); | 131 | -- | wrapper for int gsl_sf_Shi_e(double x,gsl_sf_result* result); |
132 | -- | ||
133 | -- <http://www.google.com/search?q=gsl_sf_Shi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
108 | shi_e :: Double -> (Double,Double) | 134 | shi_e :: Double -> (Double,Double) |
109 | shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x | 135 | shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x |
110 | foreign import ccall "expint.h gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr Double -> IO(Int) | 136 | foreign import ccall "expint.h gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr Double -> IO(Int) |
111 | 137 | ||
112 | -- | wrapper for double gsl_sf_Shi(double x); | 138 | -- | wrapper for double gsl_sf_Shi(double x); |
139 | -- | ||
140 | -- <http://www.google.com/search?q=gsl_sf_Shi&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
113 | shi :: Double -> Double | 141 | shi :: Double -> Double |
114 | shi = gsl_sf_Shi | 142 | shi = gsl_sf_Shi |
115 | foreign import ccall "expint.h gsl_sf_Shi" gsl_sf_Shi :: Double -> Double | 143 | foreign import ccall "expint.h gsl_sf_Shi" gsl_sf_Shi :: Double -> Double |
116 | 144 | ||
117 | -- | wrapper for int gsl_sf_Chi_e(double x,gsl_sf_result* result); | 145 | -- | wrapper for int gsl_sf_Chi_e(double x,gsl_sf_result* result); |
146 | -- | ||
147 | -- <http://www.google.com/search?q=gsl_sf_Chi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
118 | chi_e :: Double -> (Double,Double) | 148 | chi_e :: Double -> (Double,Double) |
119 | chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x | 149 | chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x |
120 | foreign import ccall "expint.h gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr Double -> IO(Int) | 150 | foreign import ccall "expint.h gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr Double -> IO(Int) |
121 | 151 | ||
122 | -- | wrapper for double gsl_sf_Chi(double x); | 152 | -- | wrapper for double gsl_sf_Chi(double x); |
153 | -- | ||
154 | -- <http://www.google.com/search?q=gsl_sf_Chi&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
123 | chi :: Double -> Double | 155 | chi :: Double -> Double |
124 | chi = gsl_sf_Chi | 156 | chi = gsl_sf_Chi |
125 | foreign import ccall "expint.h gsl_sf_Chi" gsl_sf_Chi :: Double -> Double | 157 | foreign import ccall "expint.h gsl_sf_Chi" gsl_sf_Chi :: Double -> Double |
126 | 158 | ||
127 | -- | wrapper for int gsl_sf_expint_3_e(double x,gsl_sf_result* result); | 159 | -- | wrapper for int gsl_sf_expint_3_e(double x,gsl_sf_result* result); |
160 | -- | ||
161 | -- <http://www.google.com/search?q=gsl_sf_expint_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
128 | expint_3_e :: Double -> (Double,Double) | 162 | expint_3_e :: Double -> (Double,Double) |
129 | expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x | 163 | expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x |
130 | foreign import ccall "expint.h gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr Double -> IO(Int) | 164 | foreign import ccall "expint.h gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr Double -> IO(Int) |
131 | 165 | ||
132 | -- | wrapper for double gsl_sf_expint_3(double x); | 166 | -- | wrapper for double gsl_sf_expint_3(double x); |
167 | -- | ||
168 | -- <http://www.google.com/search?q=gsl_sf_expint_3&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
133 | expint_3 :: Double -> Double | 169 | expint_3 :: Double -> Double |
134 | expint_3 = gsl_sf_expint_3 | 170 | expint_3 = gsl_sf_expint_3 |
135 | foreign import ccall "expint.h gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Double | 171 | foreign import ccall "expint.h gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Double |
136 | 172 | ||
137 | -- | wrapper for int gsl_sf_Si_e(double x,gsl_sf_result* result); | 173 | -- | wrapper for int gsl_sf_Si_e(double x,gsl_sf_result* result); |
174 | -- | ||
175 | -- <http://www.google.com/search?q=gsl_sf_Si_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
138 | si_e :: Double -> (Double,Double) | 176 | si_e :: Double -> (Double,Double) |
139 | si_e x = createSFR "si_e" $ gsl_sf_Si_e x | 177 | si_e x = createSFR "si_e" $ gsl_sf_Si_e x |
140 | foreign import ccall "expint.h gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr Double -> IO(Int) | 178 | foreign import ccall "expint.h gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr Double -> IO(Int) |
141 | 179 | ||
142 | -- | wrapper for double gsl_sf_Si(double x); | 180 | -- | wrapper for double gsl_sf_Si(double x); |
181 | -- | ||
182 | -- <http://www.google.com/search?q=gsl_sf_Si&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
143 | si :: Double -> Double | 183 | si :: Double -> Double |
144 | si = gsl_sf_Si | 184 | si = gsl_sf_Si |
145 | foreign import ccall "expint.h gsl_sf_Si" gsl_sf_Si :: Double -> Double | 185 | foreign import ccall "expint.h gsl_sf_Si" gsl_sf_Si :: Double -> Double |
146 | 186 | ||
147 | -- | wrapper for int gsl_sf_Ci_e(double x,gsl_sf_result* result); | 187 | -- | wrapper for int gsl_sf_Ci_e(double x,gsl_sf_result* result); |
188 | -- | ||
189 | -- <http://www.google.com/search?q=gsl_sf_Ci_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
148 | ci_e :: Double -> (Double,Double) | 190 | ci_e :: Double -> (Double,Double) |
149 | ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x | 191 | ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x |
150 | foreign import ccall "expint.h gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr Double -> IO(Int) | 192 | foreign import ccall "expint.h gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr Double -> IO(Int) |
151 | 193 | ||
152 | -- | wrapper for double gsl_sf_Ci(double x); | 194 | -- | wrapper for double gsl_sf_Ci(double x); |
195 | -- | ||
196 | -- <http://www.google.com/search?q=gsl_sf_Ci&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
153 | ci :: Double -> Double | 197 | ci :: Double -> Double |
154 | ci = gsl_sf_Ci | 198 | ci = gsl_sf_Ci |
155 | foreign import ccall "expint.h gsl_sf_Ci" gsl_sf_Ci :: Double -> Double | 199 | foreign import ccall "expint.h gsl_sf_Ci" gsl_sf_Ci :: Double -> Double |
156 | 200 | ||
157 | -- | wrapper for int gsl_sf_atanint_e(double x,gsl_sf_result* result); | 201 | -- | wrapper for int gsl_sf_atanint_e(double x,gsl_sf_result* result); |
202 | -- | ||
203 | -- <http://www.google.com/search?q=gsl_sf_atanint_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
158 | atanint_e :: Double -> (Double,Double) | 204 | atanint_e :: Double -> (Double,Double) |
159 | atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x | 205 | atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x |
160 | foreign import ccall "expint.h gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr Double -> IO(Int) | 206 | foreign import ccall "expint.h gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr Double -> IO(Int) |
161 | 207 | ||
162 | -- | wrapper for double gsl_sf_atanint(double x); | 208 | -- | wrapper for double gsl_sf_atanint(double x); |
209 | -- | ||
210 | -- <http://www.google.com/search?q=gsl_sf_atanint&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
163 | atanint :: Double -> Double | 211 | atanint :: Double -> Double |
164 | atanint = gsl_sf_atanint | 212 | atanint = gsl_sf_atanint |
165 | foreign import ccall "expint.h gsl_sf_atanint" gsl_sf_atanint :: Double -> Double | 213 | foreign import ccall "expint.h gsl_sf_atanint" gsl_sf_atanint :: Double -> Double |
diff --git a/lib/GSL/Special/Fermi_dirac.hs b/lib/GSL/Special/Fermi_dirac.hs index 454ce1c..18dc3b2 100644 --- a/lib/GSL/Special/Fermi_dirac.hs +++ b/lib/GSL/Special/Fermi_dirac.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Fermi_002dDirac-Function.html> | 12 | <http://www.google.com/search?q=gsl_sf_fermi_dirac.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -39,91 +39,127 @@ import Foreign(Ptr) | |||
39 | import GSL.Special.Internal | 39 | import GSL.Special.Internal |
40 | 40 | ||
41 | -- | wrapper for int gsl_sf_fermi_dirac_m1_e(double x,gsl_sf_result* result); | 41 | -- | wrapper for int gsl_sf_fermi_dirac_m1_e(double x,gsl_sf_result* result); |
42 | -- | ||
43 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_m1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
42 | fermi_dirac_m1_e :: Double -> (Double,Double) | 44 | fermi_dirac_m1_e :: Double -> (Double,Double) |
43 | fermi_dirac_m1_e x = createSFR "fermi_dirac_m1_e" $ gsl_sf_fermi_dirac_m1_e x | 45 | fermi_dirac_m1_e x = createSFR "fermi_dirac_m1_e" $ gsl_sf_fermi_dirac_m1_e x |
44 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_m1_e" gsl_sf_fermi_dirac_m1_e :: Double -> Ptr Double -> IO(Int) | 46 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_m1_e" gsl_sf_fermi_dirac_m1_e :: Double -> Ptr Double -> IO(Int) |
45 | 47 | ||
46 | -- | wrapper for double gsl_sf_fermi_dirac_m1(double x); | 48 | -- | wrapper for double gsl_sf_fermi_dirac_m1(double x); |
49 | -- | ||
50 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_m1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
47 | fermi_dirac_m1 :: Double -> Double | 51 | fermi_dirac_m1 :: Double -> Double |
48 | fermi_dirac_m1 = gsl_sf_fermi_dirac_m1 | 52 | fermi_dirac_m1 = gsl_sf_fermi_dirac_m1 |
49 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_m1" gsl_sf_fermi_dirac_m1 :: Double -> Double | 53 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_m1" gsl_sf_fermi_dirac_m1 :: Double -> Double |
50 | 54 | ||
51 | -- | wrapper for int gsl_sf_fermi_dirac_0_e(double x,gsl_sf_result* result); | 55 | -- | wrapper for int gsl_sf_fermi_dirac_0_e(double x,gsl_sf_result* result); |
56 | -- | ||
57 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
52 | fermi_dirac_0_e :: Double -> (Double,Double) | 58 | fermi_dirac_0_e :: Double -> (Double,Double) |
53 | fermi_dirac_0_e x = createSFR "fermi_dirac_0_e" $ gsl_sf_fermi_dirac_0_e x | 59 | fermi_dirac_0_e x = createSFR "fermi_dirac_0_e" $ gsl_sf_fermi_dirac_0_e x |
54 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_0_e" gsl_sf_fermi_dirac_0_e :: Double -> Ptr Double -> IO(Int) | 60 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_0_e" gsl_sf_fermi_dirac_0_e :: Double -> Ptr Double -> IO(Int) |
55 | 61 | ||
56 | -- | wrapper for double gsl_sf_fermi_dirac_0(double x); | 62 | -- | wrapper for double gsl_sf_fermi_dirac_0(double x); |
63 | -- | ||
64 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
57 | fermi_dirac_0 :: Double -> Double | 65 | fermi_dirac_0 :: Double -> Double |
58 | fermi_dirac_0 = gsl_sf_fermi_dirac_0 | 66 | fermi_dirac_0 = gsl_sf_fermi_dirac_0 |
59 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_0" gsl_sf_fermi_dirac_0 :: Double -> Double | 67 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_0" gsl_sf_fermi_dirac_0 :: Double -> Double |
60 | 68 | ||
61 | -- | wrapper for int gsl_sf_fermi_dirac_1_e(double x,gsl_sf_result* result); | 69 | -- | wrapper for int gsl_sf_fermi_dirac_1_e(double x,gsl_sf_result* result); |
70 | -- | ||
71 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
62 | fermi_dirac_1_e :: Double -> (Double,Double) | 72 | fermi_dirac_1_e :: Double -> (Double,Double) |
63 | fermi_dirac_1_e x = createSFR "fermi_dirac_1_e" $ gsl_sf_fermi_dirac_1_e x | 73 | fermi_dirac_1_e x = createSFR "fermi_dirac_1_e" $ gsl_sf_fermi_dirac_1_e x |
64 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_1_e" gsl_sf_fermi_dirac_1_e :: Double -> Ptr Double -> IO(Int) | 74 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_1_e" gsl_sf_fermi_dirac_1_e :: Double -> Ptr Double -> IO(Int) |
65 | 75 | ||
66 | -- | wrapper for double gsl_sf_fermi_dirac_1(double x); | 76 | -- | wrapper for double gsl_sf_fermi_dirac_1(double x); |
77 | -- | ||
78 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
67 | fermi_dirac_1 :: Double -> Double | 79 | fermi_dirac_1 :: Double -> Double |
68 | fermi_dirac_1 = gsl_sf_fermi_dirac_1 | 80 | fermi_dirac_1 = gsl_sf_fermi_dirac_1 |
69 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_1" gsl_sf_fermi_dirac_1 :: Double -> Double | 81 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_1" gsl_sf_fermi_dirac_1 :: Double -> Double |
70 | 82 | ||
71 | -- | wrapper for int gsl_sf_fermi_dirac_2_e(double x,gsl_sf_result* result); | 83 | -- | wrapper for int gsl_sf_fermi_dirac_2_e(double x,gsl_sf_result* result); |
84 | -- | ||
85 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
72 | fermi_dirac_2_e :: Double -> (Double,Double) | 86 | fermi_dirac_2_e :: Double -> (Double,Double) |
73 | fermi_dirac_2_e x = createSFR "fermi_dirac_2_e" $ gsl_sf_fermi_dirac_2_e x | 87 | fermi_dirac_2_e x = createSFR "fermi_dirac_2_e" $ gsl_sf_fermi_dirac_2_e x |
74 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_2_e" gsl_sf_fermi_dirac_2_e :: Double -> Ptr Double -> IO(Int) | 88 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_2_e" gsl_sf_fermi_dirac_2_e :: Double -> Ptr Double -> IO(Int) |
75 | 89 | ||
76 | -- | wrapper for double gsl_sf_fermi_dirac_2(double x); | 90 | -- | wrapper for double gsl_sf_fermi_dirac_2(double x); |
91 | -- | ||
92 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
77 | fermi_dirac_2 :: Double -> Double | 93 | fermi_dirac_2 :: Double -> Double |
78 | fermi_dirac_2 = gsl_sf_fermi_dirac_2 | 94 | fermi_dirac_2 = gsl_sf_fermi_dirac_2 |
79 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_2" gsl_sf_fermi_dirac_2 :: Double -> Double | 95 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_2" gsl_sf_fermi_dirac_2 :: Double -> Double |
80 | 96 | ||
81 | -- | wrapper for int gsl_sf_fermi_dirac_int_e(int j,double x,gsl_sf_result* result); | 97 | -- | wrapper for int gsl_sf_fermi_dirac_int_e(int j,double x,gsl_sf_result* result); |
98 | -- | ||
99 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
82 | fermi_dirac_int_e :: Int -> Double -> (Double,Double) | 100 | fermi_dirac_int_e :: Int -> Double -> (Double,Double) |
83 | fermi_dirac_int_e j x = createSFR "fermi_dirac_int_e" $ gsl_sf_fermi_dirac_int_e j x | 101 | fermi_dirac_int_e j x = createSFR "fermi_dirac_int_e" $ gsl_sf_fermi_dirac_int_e j x |
84 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_int_e" gsl_sf_fermi_dirac_int_e :: Int -> Double -> Ptr Double -> IO(Int) | 102 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_int_e" gsl_sf_fermi_dirac_int_e :: Int -> Double -> Ptr Double -> IO(Int) |
85 | 103 | ||
86 | -- | wrapper for double gsl_sf_fermi_dirac_int(int j,double x); | 104 | -- | wrapper for double gsl_sf_fermi_dirac_int(int j,double x); |
105 | -- | ||
106 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
87 | fermi_dirac_int :: Int -> Double -> Double | 107 | fermi_dirac_int :: Int -> Double -> Double |
88 | fermi_dirac_int = gsl_sf_fermi_dirac_int | 108 | fermi_dirac_int = gsl_sf_fermi_dirac_int |
89 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_int" gsl_sf_fermi_dirac_int :: Int -> Double -> Double | 109 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_int" gsl_sf_fermi_dirac_int :: Int -> Double -> Double |
90 | 110 | ||
91 | -- | wrapper for int gsl_sf_fermi_dirac_mhalf_e(double x,gsl_sf_result* result); | 111 | -- | wrapper for int gsl_sf_fermi_dirac_mhalf_e(double x,gsl_sf_result* result); |
112 | -- | ||
113 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_mhalf_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
92 | fermi_dirac_mhalf_e :: Double -> (Double,Double) | 114 | fermi_dirac_mhalf_e :: Double -> (Double,Double) |
93 | fermi_dirac_mhalf_e x = createSFR "fermi_dirac_mhalf_e" $ gsl_sf_fermi_dirac_mhalf_e x | 115 | fermi_dirac_mhalf_e x = createSFR "fermi_dirac_mhalf_e" $ gsl_sf_fermi_dirac_mhalf_e x |
94 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_mhalf_e" gsl_sf_fermi_dirac_mhalf_e :: Double -> Ptr Double -> IO(Int) | 116 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_mhalf_e" gsl_sf_fermi_dirac_mhalf_e :: Double -> Ptr Double -> IO(Int) |
95 | 117 | ||
96 | -- | wrapper for double gsl_sf_fermi_dirac_mhalf(double x); | 118 | -- | wrapper for double gsl_sf_fermi_dirac_mhalf(double x); |
119 | -- | ||
120 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_mhalf&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
97 | fermi_dirac_mhalf :: Double -> Double | 121 | fermi_dirac_mhalf :: Double -> Double |
98 | fermi_dirac_mhalf = gsl_sf_fermi_dirac_mhalf | 122 | fermi_dirac_mhalf = gsl_sf_fermi_dirac_mhalf |
99 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_mhalf" gsl_sf_fermi_dirac_mhalf :: Double -> Double | 123 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_mhalf" gsl_sf_fermi_dirac_mhalf :: Double -> Double |
100 | 124 | ||
101 | -- | wrapper for int gsl_sf_fermi_dirac_half_e(double x,gsl_sf_result* result); | 125 | -- | wrapper for int gsl_sf_fermi_dirac_half_e(double x,gsl_sf_result* result); |
126 | -- | ||
127 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_half_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
102 | fermi_dirac_half_e :: Double -> (Double,Double) | 128 | fermi_dirac_half_e :: Double -> (Double,Double) |
103 | fermi_dirac_half_e x = createSFR "fermi_dirac_half_e" $ gsl_sf_fermi_dirac_half_e x | 129 | fermi_dirac_half_e x = createSFR "fermi_dirac_half_e" $ gsl_sf_fermi_dirac_half_e x |
104 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_half_e" gsl_sf_fermi_dirac_half_e :: Double -> Ptr Double -> IO(Int) | 130 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_half_e" gsl_sf_fermi_dirac_half_e :: Double -> Ptr Double -> IO(Int) |
105 | 131 | ||
106 | -- | wrapper for double gsl_sf_fermi_dirac_half(double x); | 132 | -- | wrapper for double gsl_sf_fermi_dirac_half(double x); |
133 | -- | ||
134 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_half&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
107 | fermi_dirac_half :: Double -> Double | 135 | fermi_dirac_half :: Double -> Double |
108 | fermi_dirac_half = gsl_sf_fermi_dirac_half | 136 | fermi_dirac_half = gsl_sf_fermi_dirac_half |
109 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_half" gsl_sf_fermi_dirac_half :: Double -> Double | 137 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_half" gsl_sf_fermi_dirac_half :: Double -> Double |
110 | 138 | ||
111 | -- | wrapper for int gsl_sf_fermi_dirac_3half_e(double x,gsl_sf_result* result); | 139 | -- | wrapper for int gsl_sf_fermi_dirac_3half_e(double x,gsl_sf_result* result); |
140 | -- | ||
141 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_3half_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
112 | fermi_dirac_3half_e :: Double -> (Double,Double) | 142 | fermi_dirac_3half_e :: Double -> (Double,Double) |
113 | fermi_dirac_3half_e x = createSFR "fermi_dirac_3half_e" $ gsl_sf_fermi_dirac_3half_e x | 143 | fermi_dirac_3half_e x = createSFR "fermi_dirac_3half_e" $ gsl_sf_fermi_dirac_3half_e x |
114 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_3half_e" gsl_sf_fermi_dirac_3half_e :: Double -> Ptr Double -> IO(Int) | 144 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_3half_e" gsl_sf_fermi_dirac_3half_e :: Double -> Ptr Double -> IO(Int) |
115 | 145 | ||
116 | -- | wrapper for double gsl_sf_fermi_dirac_3half(double x); | 146 | -- | wrapper for double gsl_sf_fermi_dirac_3half(double x); |
147 | -- | ||
148 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_3half&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
117 | fermi_dirac_3half :: Double -> Double | 149 | fermi_dirac_3half :: Double -> Double |
118 | fermi_dirac_3half = gsl_sf_fermi_dirac_3half | 150 | fermi_dirac_3half = gsl_sf_fermi_dirac_3half |
119 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_3half" gsl_sf_fermi_dirac_3half :: Double -> Double | 151 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_3half" gsl_sf_fermi_dirac_3half :: Double -> Double |
120 | 152 | ||
121 | -- | wrapper for int gsl_sf_fermi_dirac_inc_0_e(double x,double b,gsl_sf_result* result); | 153 | -- | wrapper for int gsl_sf_fermi_dirac_inc_0_e(double x,double b,gsl_sf_result* result); |
154 | -- | ||
155 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_inc_0_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
122 | fermi_dirac_inc_0_e :: Double -> Double -> (Double,Double) | 156 | fermi_dirac_inc_0_e :: Double -> Double -> (Double,Double) |
123 | fermi_dirac_inc_0_e x b = createSFR "fermi_dirac_inc_0_e" $ gsl_sf_fermi_dirac_inc_0_e x b | 157 | fermi_dirac_inc_0_e x b = createSFR "fermi_dirac_inc_0_e" $ gsl_sf_fermi_dirac_inc_0_e x b |
124 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_inc_0_e" gsl_sf_fermi_dirac_inc_0_e :: Double -> Double -> Ptr Double -> IO(Int) | 158 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_inc_0_e" gsl_sf_fermi_dirac_inc_0_e :: Double -> Double -> Ptr Double -> IO(Int) |
125 | 159 | ||
126 | -- | wrapper for double gsl_sf_fermi_dirac_inc_0(double x,double b); | 160 | -- | wrapper for double gsl_sf_fermi_dirac_inc_0(double x,double b); |
161 | -- | ||
162 | -- <http://www.google.com/search?q=gsl_sf_fermi_dirac_inc_0&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
127 | fermi_dirac_inc_0 :: Double -> Double -> Double | 163 | fermi_dirac_inc_0 :: Double -> Double -> Double |
128 | fermi_dirac_inc_0 = gsl_sf_fermi_dirac_inc_0 | 164 | fermi_dirac_inc_0 = gsl_sf_fermi_dirac_inc_0 |
129 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_inc_0" gsl_sf_fermi_dirac_inc_0 :: Double -> Double -> Double | 165 | foreign import ccall "fermi_dirac.h gsl_sf_fermi_dirac_inc_0" gsl_sf_fermi_dirac_inc_0 :: Double -> Double -> Double |
diff --git a/lib/GSL/Special/Gamma.hs b/lib/GSL/Special/Gamma.hs index 4586cb5..ae5010d 100644 --- a/lib/GSL/Special/Gamma.hs +++ b/lib/GSL/Special/Gamma.hs | |||
@@ -9,8 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Gamma-and-Beta-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_gamma.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | |||
14 | 13 | ||
15 | -} | 14 | -} |
16 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -62,216 +61,302 @@ import Foreign(Ptr) | |||
62 | import GSL.Special.Internal | 61 | import GSL.Special.Internal |
63 | 62 | ||
64 | -- | wrapper for int gsl_sf_lngamma_e(double x,gsl_sf_result* result); | 63 | -- | wrapper for int gsl_sf_lngamma_e(double x,gsl_sf_result* result); |
64 | -- | ||
65 | -- <http://www.google.com/search?q=gsl_sf_lngamma_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
65 | lngamma_e :: Double -> (Double,Double) | 66 | lngamma_e :: Double -> (Double,Double) |
66 | lngamma_e x = createSFR "lngamma_e" $ gsl_sf_lngamma_e x | 67 | lngamma_e x = createSFR "lngamma_e" $ gsl_sf_lngamma_e x |
67 | foreign import ccall "gamma.h gsl_sf_lngamma_e" gsl_sf_lngamma_e :: Double -> Ptr Double -> IO(Int) | 68 | foreign import ccall "gamma.h gsl_sf_lngamma_e" gsl_sf_lngamma_e :: Double -> Ptr Double -> IO(Int) |
68 | 69 | ||
69 | -- | wrapper for double gsl_sf_lngamma(double x); | 70 | -- | wrapper for double gsl_sf_lngamma(double x); |
71 | -- | ||
72 | -- <http://www.google.com/search?q=gsl_sf_lngamma&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
70 | lngamma :: Double -> Double | 73 | lngamma :: Double -> Double |
71 | lngamma = gsl_sf_lngamma | 74 | lngamma = gsl_sf_lngamma |
72 | foreign import ccall "gamma.h gsl_sf_lngamma" gsl_sf_lngamma :: Double -> Double | 75 | foreign import ccall "gamma.h gsl_sf_lngamma" gsl_sf_lngamma :: Double -> Double |
73 | 76 | ||
74 | -- | wrapper for int gsl_sf_lngamma_sgn_e(double x,gsl_sf_result* result_lg,double* sgn); | 77 | -- | wrapper for int gsl_sf_lngamma_sgn_e(double x,gsl_sf_result* result_lg,double* sgn); |
78 | -- | ||
79 | -- <http://www.google.com/search?q=gsl_sf_lngamma_sgn_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
75 | lngamma_sgn_e :: Double -> Ptr Double -> Ptr Double -> Int | 80 | lngamma_sgn_e :: Double -> Ptr Double -> Ptr Double -> Int |
76 | lngamma_sgn_e = gsl_sf_lngamma_sgn_e | 81 | lngamma_sgn_e = gsl_sf_lngamma_sgn_e |
77 | foreign import ccall "gamma.h gsl_sf_lngamma_sgn_e" gsl_sf_lngamma_sgn_e :: Double -> Ptr Double -> Ptr Double -> Int | 82 | foreign import ccall "gamma.h gsl_sf_lngamma_sgn_e" gsl_sf_lngamma_sgn_e :: Double -> Ptr Double -> Ptr Double -> Int |
78 | 83 | ||
79 | -- | wrapper for int gsl_sf_gamma_e(double x,gsl_sf_result* result); | 84 | -- | wrapper for int gsl_sf_gamma_e(double x,gsl_sf_result* result); |
85 | -- | ||
86 | -- <http://www.google.com/search?q=gsl_sf_gamma_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
80 | gamma_e :: Double -> (Double,Double) | 87 | gamma_e :: Double -> (Double,Double) |
81 | gamma_e x = createSFR "gamma_e" $ gsl_sf_gamma_e x | 88 | gamma_e x = createSFR "gamma_e" $ gsl_sf_gamma_e x |
82 | foreign import ccall "gamma.h gsl_sf_gamma_e" gsl_sf_gamma_e :: Double -> Ptr Double -> IO(Int) | 89 | foreign import ccall "gamma.h gsl_sf_gamma_e" gsl_sf_gamma_e :: Double -> Ptr Double -> IO(Int) |
83 | 90 | ||
84 | -- | wrapper for double gsl_sf_gamma(double x); | 91 | -- | wrapper for double gsl_sf_gamma(double x); |
92 | -- | ||
93 | -- <http://www.google.com/search?q=gsl_sf_gamma&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
85 | gamma :: Double -> Double | 94 | gamma :: Double -> Double |
86 | gamma = gsl_sf_gamma | 95 | gamma = gsl_sf_gamma |
87 | foreign import ccall "gamma.h gsl_sf_gamma" gsl_sf_gamma :: Double -> Double | 96 | foreign import ccall "gamma.h gsl_sf_gamma" gsl_sf_gamma :: Double -> Double |
88 | 97 | ||
89 | -- | wrapper for int gsl_sf_gammastar_e(double x,gsl_sf_result* result); | 98 | -- | wrapper for int gsl_sf_gammastar_e(double x,gsl_sf_result* result); |
99 | -- | ||
100 | -- <http://www.google.com/search?q=gsl_sf_gammastar_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
90 | gammastar_e :: Double -> (Double,Double) | 101 | gammastar_e :: Double -> (Double,Double) |
91 | gammastar_e x = createSFR "gammastar_e" $ gsl_sf_gammastar_e x | 102 | gammastar_e x = createSFR "gammastar_e" $ gsl_sf_gammastar_e x |
92 | foreign import ccall "gamma.h gsl_sf_gammastar_e" gsl_sf_gammastar_e :: Double -> Ptr Double -> IO(Int) | 103 | foreign import ccall "gamma.h gsl_sf_gammastar_e" gsl_sf_gammastar_e :: Double -> Ptr Double -> IO(Int) |
93 | 104 | ||
94 | -- | wrapper for double gsl_sf_gammastar(double x); | 105 | -- | wrapper for double gsl_sf_gammastar(double x); |
106 | -- | ||
107 | -- <http://www.google.com/search?q=gsl_sf_gammastar&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
95 | gammastar :: Double -> Double | 108 | gammastar :: Double -> Double |
96 | gammastar = gsl_sf_gammastar | 109 | gammastar = gsl_sf_gammastar |
97 | foreign import ccall "gamma.h gsl_sf_gammastar" gsl_sf_gammastar :: Double -> Double | 110 | foreign import ccall "gamma.h gsl_sf_gammastar" gsl_sf_gammastar :: Double -> Double |
98 | 111 | ||
99 | -- | wrapper for int gsl_sf_gammainv_e(double x,gsl_sf_result* result); | 112 | -- | wrapper for int gsl_sf_gammainv_e(double x,gsl_sf_result* result); |
113 | -- | ||
114 | -- <http://www.google.com/search?q=gsl_sf_gammainv_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
100 | gammainv_e :: Double -> (Double,Double) | 115 | gammainv_e :: Double -> (Double,Double) |
101 | gammainv_e x = createSFR "gammainv_e" $ gsl_sf_gammainv_e x | 116 | gammainv_e x = createSFR "gammainv_e" $ gsl_sf_gammainv_e x |
102 | foreign import ccall "gamma.h gsl_sf_gammainv_e" gsl_sf_gammainv_e :: Double -> Ptr Double -> IO(Int) | 117 | foreign import ccall "gamma.h gsl_sf_gammainv_e" gsl_sf_gammainv_e :: Double -> Ptr Double -> IO(Int) |
103 | 118 | ||
104 | -- | wrapper for double gsl_sf_gammainv(double x); | 119 | -- | wrapper for double gsl_sf_gammainv(double x); |
120 | -- | ||
121 | -- <http://www.google.com/search?q=gsl_sf_gammainv&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
105 | gammainv :: Double -> Double | 122 | gammainv :: Double -> Double |
106 | gammainv = gsl_sf_gammainv | 123 | gammainv = gsl_sf_gammainv |
107 | foreign import ccall "gamma.h gsl_sf_gammainv" gsl_sf_gammainv :: Double -> Double | 124 | foreign import ccall "gamma.h gsl_sf_gammainv" gsl_sf_gammainv :: Double -> Double |
108 | 125 | ||
109 | -- | wrapper for int gsl_sf_lngamma_complex_e(double zr,double zi,gsl_sf_result* lnr,gsl_sf_result* arg); | 126 | -- | wrapper for int gsl_sf_lngamma_complex_e(double zr,double zi,gsl_sf_result* lnr,gsl_sf_result* arg); |
127 | -- | ||
128 | -- <http://www.google.com/search?q=gsl_sf_lngamma_complex_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
110 | lngamma_complex_e :: Double -> Double -> Ptr Double -> (Double,Double) | 129 | lngamma_complex_e :: Double -> Double -> Ptr Double -> (Double,Double) |
111 | lngamma_complex_e zr zi lnr = createSFR "lngamma_complex_e" $ gsl_sf_lngamma_complex_e zr zi lnr | 130 | lngamma_complex_e zr zi lnr = createSFR "lngamma_complex_e" $ gsl_sf_lngamma_complex_e zr zi lnr |
112 | foreign import ccall "gamma.h gsl_sf_lngamma_complex_e" gsl_sf_lngamma_complex_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) | 131 | foreign import ccall "gamma.h gsl_sf_lngamma_complex_e" gsl_sf_lngamma_complex_e :: Double -> Double -> Ptr Double -> Ptr Double -> IO(Int) |
113 | 132 | ||
114 | -- | wrapper for int gsl_sf_taylorcoeff_e(int n,double x,gsl_sf_result* result); | 133 | -- | wrapper for int gsl_sf_taylorcoeff_e(int n,double x,gsl_sf_result* result); |
134 | -- | ||
135 | -- <http://www.google.com/search?q=gsl_sf_taylorcoeff_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
115 | taylorcoeff_e :: Int -> Double -> (Double,Double) | 136 | taylorcoeff_e :: Int -> Double -> (Double,Double) |
116 | taylorcoeff_e n x = createSFR "taylorcoeff_e" $ gsl_sf_taylorcoeff_e n x | 137 | taylorcoeff_e n x = createSFR "taylorcoeff_e" $ gsl_sf_taylorcoeff_e n x |
117 | foreign import ccall "gamma.h gsl_sf_taylorcoeff_e" gsl_sf_taylorcoeff_e :: Int -> Double -> Ptr Double -> IO(Int) | 138 | foreign import ccall "gamma.h gsl_sf_taylorcoeff_e" gsl_sf_taylorcoeff_e :: Int -> Double -> Ptr Double -> IO(Int) |
118 | 139 | ||
119 | -- | wrapper for double gsl_sf_taylorcoeff(int n,double x); | 140 | -- | wrapper for double gsl_sf_taylorcoeff(int n,double x); |
141 | -- | ||
142 | -- <http://www.google.com/search?q=gsl_sf_taylorcoeff&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
120 | taylorcoeff :: Int -> Double -> Double | 143 | taylorcoeff :: Int -> Double -> Double |
121 | taylorcoeff = gsl_sf_taylorcoeff | 144 | taylorcoeff = gsl_sf_taylorcoeff |
122 | foreign import ccall "gamma.h gsl_sf_taylorcoeff" gsl_sf_taylorcoeff :: Int -> Double -> Double | 145 | foreign import ccall "gamma.h gsl_sf_taylorcoeff" gsl_sf_taylorcoeff :: Int -> Double -> Double |
123 | 146 | ||
124 | -- | wrapper for int gsl_sf_fact_e(int n,gsl_sf_result* result); | 147 | -- | wrapper for int gsl_sf_fact_e(int n,gsl_sf_result* result); |
148 | -- | ||
149 | -- <http://www.google.com/search?q=gsl_sf_fact_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
125 | fact_e :: Int -> (Double,Double) | 150 | fact_e :: Int -> (Double,Double) |
126 | fact_e n = createSFR "fact_e" $ gsl_sf_fact_e n | 151 | fact_e n = createSFR "fact_e" $ gsl_sf_fact_e n |
127 | foreign import ccall "gamma.h gsl_sf_fact_e" gsl_sf_fact_e :: Int -> Ptr Double -> IO(Int) | 152 | foreign import ccall "gamma.h gsl_sf_fact_e" gsl_sf_fact_e :: Int -> Ptr Double -> IO(Int) |
128 | 153 | ||
129 | -- | wrapper for double gsl_sf_fact(int n); | 154 | -- | wrapper for double gsl_sf_fact(int n); |
155 | -- | ||
156 | -- <http://www.google.com/search?q=gsl_sf_fact&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
130 | fact :: Int -> Double | 157 | fact :: Int -> Double |
131 | fact = gsl_sf_fact | 158 | fact = gsl_sf_fact |
132 | foreign import ccall "gamma.h gsl_sf_fact" gsl_sf_fact :: Int -> Double | 159 | foreign import ccall "gamma.h gsl_sf_fact" gsl_sf_fact :: Int -> Double |
133 | 160 | ||
134 | -- | wrapper for int gsl_sf_doublefact_e(int n,gsl_sf_result* result); | 161 | -- | wrapper for int gsl_sf_doublefact_e(int n,gsl_sf_result* result); |
162 | -- | ||
163 | -- <http://www.google.com/search?q=gsl_sf_doublefact_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
135 | doublefact_e :: Int -> (Double,Double) | 164 | doublefact_e :: Int -> (Double,Double) |
136 | doublefact_e n = createSFR "doublefact_e" $ gsl_sf_doublefact_e n | 165 | doublefact_e n = createSFR "doublefact_e" $ gsl_sf_doublefact_e n |
137 | foreign import ccall "gamma.h gsl_sf_doublefact_e" gsl_sf_doublefact_e :: Int -> Ptr Double -> IO(Int) | 166 | foreign import ccall "gamma.h gsl_sf_doublefact_e" gsl_sf_doublefact_e :: Int -> Ptr Double -> IO(Int) |
138 | 167 | ||
139 | -- | wrapper for double gsl_sf_doublefact(int n); | 168 | -- | wrapper for double gsl_sf_doublefact(int n); |
169 | -- | ||
170 | -- <http://www.google.com/search?q=gsl_sf_doublefact&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
140 | doublefact :: Int -> Double | 171 | doublefact :: Int -> Double |
141 | doublefact = gsl_sf_doublefact | 172 | doublefact = gsl_sf_doublefact |
142 | foreign import ccall "gamma.h gsl_sf_doublefact" gsl_sf_doublefact :: Int -> Double | 173 | foreign import ccall "gamma.h gsl_sf_doublefact" gsl_sf_doublefact :: Int -> Double |
143 | 174 | ||
144 | -- | wrapper for int gsl_sf_lnfact_e(int n,gsl_sf_result* result); | 175 | -- | wrapper for int gsl_sf_lnfact_e(int n,gsl_sf_result* result); |
176 | -- | ||
177 | -- <http://www.google.com/search?q=gsl_sf_lnfact_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
145 | lnfact_e :: Int -> (Double,Double) | 178 | lnfact_e :: Int -> (Double,Double) |
146 | lnfact_e n = createSFR "lnfact_e" $ gsl_sf_lnfact_e n | 179 | lnfact_e n = createSFR "lnfact_e" $ gsl_sf_lnfact_e n |
147 | foreign import ccall "gamma.h gsl_sf_lnfact_e" gsl_sf_lnfact_e :: Int -> Ptr Double -> IO(Int) | 180 | foreign import ccall "gamma.h gsl_sf_lnfact_e" gsl_sf_lnfact_e :: Int -> Ptr Double -> IO(Int) |
148 | 181 | ||
149 | -- | wrapper for double gsl_sf_lnfact(int n); | 182 | -- | wrapper for double gsl_sf_lnfact(int n); |
183 | -- | ||
184 | -- <http://www.google.com/search?q=gsl_sf_lnfact&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
150 | lnfact :: Int -> Double | 185 | lnfact :: Int -> Double |
151 | lnfact = gsl_sf_lnfact | 186 | lnfact = gsl_sf_lnfact |
152 | foreign import ccall "gamma.h gsl_sf_lnfact" gsl_sf_lnfact :: Int -> Double | 187 | foreign import ccall "gamma.h gsl_sf_lnfact" gsl_sf_lnfact :: Int -> Double |
153 | 188 | ||
154 | -- | wrapper for int gsl_sf_lndoublefact_e(int n,gsl_sf_result* result); | 189 | -- | wrapper for int gsl_sf_lndoublefact_e(int n,gsl_sf_result* result); |
190 | -- | ||
191 | -- <http://www.google.com/search?q=gsl_sf_lndoublefact_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
155 | lndoublefact_e :: Int -> (Double,Double) | 192 | lndoublefact_e :: Int -> (Double,Double) |
156 | lndoublefact_e n = createSFR "lndoublefact_e" $ gsl_sf_lndoublefact_e n | 193 | lndoublefact_e n = createSFR "lndoublefact_e" $ gsl_sf_lndoublefact_e n |
157 | foreign import ccall "gamma.h gsl_sf_lndoublefact_e" gsl_sf_lndoublefact_e :: Int -> Ptr Double -> IO(Int) | 194 | foreign import ccall "gamma.h gsl_sf_lndoublefact_e" gsl_sf_lndoublefact_e :: Int -> Ptr Double -> IO(Int) |
158 | 195 | ||
159 | -- | wrapper for double gsl_sf_lndoublefact(int n); | 196 | -- | wrapper for double gsl_sf_lndoublefact(int n); |
197 | -- | ||
198 | -- <http://www.google.com/search?q=gsl_sf_lndoublefact&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
160 | lndoublefact :: Int -> Double | 199 | lndoublefact :: Int -> Double |
161 | lndoublefact = gsl_sf_lndoublefact | 200 | lndoublefact = gsl_sf_lndoublefact |
162 | foreign import ccall "gamma.h gsl_sf_lndoublefact" gsl_sf_lndoublefact :: Int -> Double | 201 | foreign import ccall "gamma.h gsl_sf_lndoublefact" gsl_sf_lndoublefact :: Int -> Double |
163 | 202 | ||
164 | -- | wrapper for int gsl_sf_lnchoose_e(int n,int m,gsl_sf_result* result); | 203 | -- | wrapper for int gsl_sf_lnchoose_e(int n,int m,gsl_sf_result* result); |
204 | -- | ||
205 | -- <http://www.google.com/search?q=gsl_sf_lnchoose_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
165 | lnchoose_e :: Int -> Int -> (Double,Double) | 206 | lnchoose_e :: Int -> Int -> (Double,Double) |
166 | lnchoose_e n m = createSFR "lnchoose_e" $ gsl_sf_lnchoose_e n m | 207 | lnchoose_e n m = createSFR "lnchoose_e" $ gsl_sf_lnchoose_e n m |
167 | foreign import ccall "gamma.h gsl_sf_lnchoose_e" gsl_sf_lnchoose_e :: Int -> Int -> Ptr Double -> IO(Int) | 208 | foreign import ccall "gamma.h gsl_sf_lnchoose_e" gsl_sf_lnchoose_e :: Int -> Int -> Ptr Double -> IO(Int) |
168 | 209 | ||
169 | -- | wrapper for double gsl_sf_lnchoose(int n,int m); | 210 | -- | wrapper for double gsl_sf_lnchoose(int n,int m); |
211 | -- | ||
212 | -- <http://www.google.com/search?q=gsl_sf_lnchoose&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
170 | lnchoose :: Int -> Int -> Double | 213 | lnchoose :: Int -> Int -> Double |
171 | lnchoose = gsl_sf_lnchoose | 214 | lnchoose = gsl_sf_lnchoose |
172 | foreign import ccall "gamma.h gsl_sf_lnchoose" gsl_sf_lnchoose :: Int -> Int -> Double | 215 | foreign import ccall "gamma.h gsl_sf_lnchoose" gsl_sf_lnchoose :: Int -> Int -> Double |
173 | 216 | ||
174 | -- | wrapper for int gsl_sf_choose_e(int n,int m,gsl_sf_result* result); | 217 | -- | wrapper for int gsl_sf_choose_e(int n,int m,gsl_sf_result* result); |
218 | -- | ||
219 | -- <http://www.google.com/search?q=gsl_sf_choose_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
175 | choose_e :: Int -> Int -> (Double,Double) | 220 | choose_e :: Int -> Int -> (Double,Double) |
176 | choose_e n m = createSFR "choose_e" $ gsl_sf_choose_e n m | 221 | choose_e n m = createSFR "choose_e" $ gsl_sf_choose_e n m |
177 | foreign import ccall "gamma.h gsl_sf_choose_e" gsl_sf_choose_e :: Int -> Int -> Ptr Double -> IO(Int) | 222 | foreign import ccall "gamma.h gsl_sf_choose_e" gsl_sf_choose_e :: Int -> Int -> Ptr Double -> IO(Int) |
178 | 223 | ||
179 | -- | wrapper for double gsl_sf_choose(int n,int m); | 224 | -- | wrapper for double gsl_sf_choose(int n,int m); |
225 | -- | ||
226 | -- <http://www.google.com/search?q=gsl_sf_choose&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
180 | choose :: Int -> Int -> Double | 227 | choose :: Int -> Int -> Double |
181 | choose = gsl_sf_choose | 228 | choose = gsl_sf_choose |
182 | foreign import ccall "gamma.h gsl_sf_choose" gsl_sf_choose :: Int -> Int -> Double | 229 | foreign import ccall "gamma.h gsl_sf_choose" gsl_sf_choose :: Int -> Int -> Double |
183 | 230 | ||
184 | -- | wrapper for int gsl_sf_lnpoch_e(double a,double x,gsl_sf_result* result); | 231 | -- | wrapper for int gsl_sf_lnpoch_e(double a,double x,gsl_sf_result* result); |
232 | -- | ||
233 | -- <http://www.google.com/search?q=gsl_sf_lnpoch_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
185 | lnpoch_e :: Double -> Double -> (Double,Double) | 234 | lnpoch_e :: Double -> Double -> (Double,Double) |
186 | lnpoch_e a x = createSFR "lnpoch_e" $ gsl_sf_lnpoch_e a x | 235 | lnpoch_e a x = createSFR "lnpoch_e" $ gsl_sf_lnpoch_e a x |
187 | foreign import ccall "gamma.h gsl_sf_lnpoch_e" gsl_sf_lnpoch_e :: Double -> Double -> Ptr Double -> IO(Int) | 236 | foreign import ccall "gamma.h gsl_sf_lnpoch_e" gsl_sf_lnpoch_e :: Double -> Double -> Ptr Double -> IO(Int) |
188 | 237 | ||
189 | -- | wrapper for double gsl_sf_lnpoch(double a,double x); | 238 | -- | wrapper for double gsl_sf_lnpoch(double a,double x); |
239 | -- | ||
240 | -- <http://www.google.com/search?q=gsl_sf_lnpoch&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
190 | lnpoch :: Double -> Double -> Double | 241 | lnpoch :: Double -> Double -> Double |
191 | lnpoch = gsl_sf_lnpoch | 242 | lnpoch = gsl_sf_lnpoch |
192 | foreign import ccall "gamma.h gsl_sf_lnpoch" gsl_sf_lnpoch :: Double -> Double -> Double | 243 | foreign import ccall "gamma.h gsl_sf_lnpoch" gsl_sf_lnpoch :: Double -> Double -> Double |
193 | 244 | ||
194 | -- | wrapper for int gsl_sf_lnpoch_sgn_e(double a,double x,gsl_sf_result* result,double* sgn); | 245 | -- | wrapper for int gsl_sf_lnpoch_sgn_e(double a,double x,gsl_sf_result* result,double* sgn); |
246 | -- | ||
247 | -- <http://www.google.com/search?q=gsl_sf_lnpoch_sgn_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
195 | lnpoch_sgn_e :: Double -> Double -> Ptr Double -> Ptr Double -> Int | 248 | lnpoch_sgn_e :: Double -> Double -> Ptr Double -> Ptr Double -> Int |
196 | lnpoch_sgn_e = gsl_sf_lnpoch_sgn_e | 249 | lnpoch_sgn_e = gsl_sf_lnpoch_sgn_e |
197 | foreign import ccall "gamma.h gsl_sf_lnpoch_sgn_e" gsl_sf_lnpoch_sgn_e :: Double -> Double -> Ptr Double -> Ptr Double -> Int | 250 | foreign import ccall "gamma.h gsl_sf_lnpoch_sgn_e" gsl_sf_lnpoch_sgn_e :: Double -> Double -> Ptr Double -> Ptr Double -> Int |
198 | 251 | ||
199 | -- | wrapper for int gsl_sf_poch_e(double a,double x,gsl_sf_result* result); | 252 | -- | wrapper for int gsl_sf_poch_e(double a,double x,gsl_sf_result* result); |
253 | -- | ||
254 | -- <http://www.google.com/search?q=gsl_sf_poch_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
200 | poch_e :: Double -> Double -> (Double,Double) | 255 | poch_e :: Double -> Double -> (Double,Double) |
201 | poch_e a x = createSFR "poch_e" $ gsl_sf_poch_e a x | 256 | poch_e a x = createSFR "poch_e" $ gsl_sf_poch_e a x |
202 | foreign import ccall "gamma.h gsl_sf_poch_e" gsl_sf_poch_e :: Double -> Double -> Ptr Double -> IO(Int) | 257 | foreign import ccall "gamma.h gsl_sf_poch_e" gsl_sf_poch_e :: Double -> Double -> Ptr Double -> IO(Int) |
203 | 258 | ||
204 | -- | wrapper for double gsl_sf_poch(double a,double x); | 259 | -- | wrapper for double gsl_sf_poch(double a,double x); |
260 | -- | ||
261 | -- <http://www.google.com/search?q=gsl_sf_poch&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
205 | poch :: Double -> Double -> Double | 262 | poch :: Double -> Double -> Double |
206 | poch = gsl_sf_poch | 263 | poch = gsl_sf_poch |
207 | foreign import ccall "gamma.h gsl_sf_poch" gsl_sf_poch :: Double -> Double -> Double | 264 | foreign import ccall "gamma.h gsl_sf_poch" gsl_sf_poch :: Double -> Double -> Double |
208 | 265 | ||
209 | -- | wrapper for int gsl_sf_pochrel_e(double a,double x,gsl_sf_result* result); | 266 | -- | wrapper for int gsl_sf_pochrel_e(double a,double x,gsl_sf_result* result); |
267 | -- | ||
268 | -- <http://www.google.com/search?q=gsl_sf_pochrel_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
210 | pochrel_e :: Double -> Double -> (Double,Double) | 269 | pochrel_e :: Double -> Double -> (Double,Double) |
211 | pochrel_e a x = createSFR "pochrel_e" $ gsl_sf_pochrel_e a x | 270 | pochrel_e a x = createSFR "pochrel_e" $ gsl_sf_pochrel_e a x |
212 | foreign import ccall "gamma.h gsl_sf_pochrel_e" gsl_sf_pochrel_e :: Double -> Double -> Ptr Double -> IO(Int) | 271 | foreign import ccall "gamma.h gsl_sf_pochrel_e" gsl_sf_pochrel_e :: Double -> Double -> Ptr Double -> IO(Int) |
213 | 272 | ||
214 | -- | wrapper for double gsl_sf_pochrel(double a,double x); | 273 | -- | wrapper for double gsl_sf_pochrel(double a,double x); |
274 | -- | ||
275 | -- <http://www.google.com/search?q=gsl_sf_pochrel&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
215 | pochrel :: Double -> Double -> Double | 276 | pochrel :: Double -> Double -> Double |
216 | pochrel = gsl_sf_pochrel | 277 | pochrel = gsl_sf_pochrel |
217 | foreign import ccall "gamma.h gsl_sf_pochrel" gsl_sf_pochrel :: Double -> Double -> Double | 278 | foreign import ccall "gamma.h gsl_sf_pochrel" gsl_sf_pochrel :: Double -> Double -> Double |
218 | 279 | ||
219 | -- | wrapper for int gsl_sf_gamma_inc_Q_e(double a,double x,gsl_sf_result* result); | 280 | -- | wrapper for int gsl_sf_gamma_inc_Q_e(double a,double x,gsl_sf_result* result); |
281 | -- | ||
282 | -- <http://www.google.com/search?q=gsl_sf_gamma_inc_Q_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
220 | gamma_inc_Q_e :: Double -> Double -> (Double,Double) | 283 | gamma_inc_Q_e :: Double -> Double -> (Double,Double) |
221 | gamma_inc_Q_e a x = createSFR "gamma_inc_Q_e" $ gsl_sf_gamma_inc_Q_e a x | 284 | gamma_inc_Q_e a x = createSFR "gamma_inc_Q_e" $ gsl_sf_gamma_inc_Q_e a x |
222 | foreign import ccall "gamma.h gsl_sf_gamma_inc_Q_e" gsl_sf_gamma_inc_Q_e :: Double -> Double -> Ptr Double -> IO(Int) | 285 | foreign import ccall "gamma.h gsl_sf_gamma_inc_Q_e" gsl_sf_gamma_inc_Q_e :: Double -> Double -> Ptr Double -> IO(Int) |
223 | 286 | ||
224 | -- | wrapper for double gsl_sf_gamma_inc_Q(double a,double x); | 287 | -- | wrapper for double gsl_sf_gamma_inc_Q(double a,double x); |
288 | -- | ||
289 | -- <http://www.google.com/search?q=gsl_sf_gamma_inc_Q&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
225 | gamma_inc_Q :: Double -> Double -> Double | 290 | gamma_inc_Q :: Double -> Double -> Double |
226 | gamma_inc_Q = gsl_sf_gamma_inc_Q | 291 | gamma_inc_Q = gsl_sf_gamma_inc_Q |
227 | foreign import ccall "gamma.h gsl_sf_gamma_inc_Q" gsl_sf_gamma_inc_Q :: Double -> Double -> Double | 292 | foreign import ccall "gamma.h gsl_sf_gamma_inc_Q" gsl_sf_gamma_inc_Q :: Double -> Double -> Double |
228 | 293 | ||
229 | -- | wrapper for int gsl_sf_gamma_inc_P_e(double a,double x,gsl_sf_result* result); | 294 | -- | wrapper for int gsl_sf_gamma_inc_P_e(double a,double x,gsl_sf_result* result); |
295 | -- | ||
296 | -- <http://www.google.com/search?q=gsl_sf_gamma_inc_P_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
230 | gamma_inc_P_e :: Double -> Double -> (Double,Double) | 297 | gamma_inc_P_e :: Double -> Double -> (Double,Double) |
231 | gamma_inc_P_e a x = createSFR "gamma_inc_P_e" $ gsl_sf_gamma_inc_P_e a x | 298 | gamma_inc_P_e a x = createSFR "gamma_inc_P_e" $ gsl_sf_gamma_inc_P_e a x |
232 | foreign import ccall "gamma.h gsl_sf_gamma_inc_P_e" gsl_sf_gamma_inc_P_e :: Double -> Double -> Ptr Double -> IO(Int) | 299 | foreign import ccall "gamma.h gsl_sf_gamma_inc_P_e" gsl_sf_gamma_inc_P_e :: Double -> Double -> Ptr Double -> IO(Int) |
233 | 300 | ||
234 | -- | wrapper for double gsl_sf_gamma_inc_P(double a,double x); | 301 | -- | wrapper for double gsl_sf_gamma_inc_P(double a,double x); |
302 | -- | ||
303 | -- <http://www.google.com/search?q=gsl_sf_gamma_inc_P&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
235 | gamma_inc_P :: Double -> Double -> Double | 304 | gamma_inc_P :: Double -> Double -> Double |
236 | gamma_inc_P = gsl_sf_gamma_inc_P | 305 | gamma_inc_P = gsl_sf_gamma_inc_P |
237 | foreign import ccall "gamma.h gsl_sf_gamma_inc_P" gsl_sf_gamma_inc_P :: Double -> Double -> Double | 306 | foreign import ccall "gamma.h gsl_sf_gamma_inc_P" gsl_sf_gamma_inc_P :: Double -> Double -> Double |
238 | 307 | ||
239 | -- | wrapper for int gsl_sf_gamma_inc_e(double a,double x,gsl_sf_result* result); | 308 | -- | wrapper for int gsl_sf_gamma_inc_e(double a,double x,gsl_sf_result* result); |
309 | -- | ||
310 | -- <http://www.google.com/search?q=gsl_sf_gamma_inc_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
240 | gamma_inc_e :: Double -> Double -> (Double,Double) | 311 | gamma_inc_e :: Double -> Double -> (Double,Double) |
241 | gamma_inc_e a x = createSFR "gamma_inc_e" $ gsl_sf_gamma_inc_e a x | 312 | gamma_inc_e a x = createSFR "gamma_inc_e" $ gsl_sf_gamma_inc_e a x |
242 | foreign import ccall "gamma.h gsl_sf_gamma_inc_e" gsl_sf_gamma_inc_e :: Double -> Double -> Ptr Double -> IO(Int) | 313 | foreign import ccall "gamma.h gsl_sf_gamma_inc_e" gsl_sf_gamma_inc_e :: Double -> Double -> Ptr Double -> IO(Int) |
243 | 314 | ||
244 | -- | wrapper for double gsl_sf_gamma_inc(double a,double x); | 315 | -- | wrapper for double gsl_sf_gamma_inc(double a,double x); |
316 | -- | ||
317 | -- <http://www.google.com/search?q=gsl_sf_gamma_inc&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
245 | gamma_inc :: Double -> Double -> Double | 318 | gamma_inc :: Double -> Double -> Double |
246 | gamma_inc = gsl_sf_gamma_inc | 319 | gamma_inc = gsl_sf_gamma_inc |
247 | foreign import ccall "gamma.h gsl_sf_gamma_inc" gsl_sf_gamma_inc :: Double -> Double -> Double | 320 | foreign import ccall "gamma.h gsl_sf_gamma_inc" gsl_sf_gamma_inc :: Double -> Double -> Double |
248 | 321 | ||
249 | -- | wrapper for int gsl_sf_lnbeta_e(double a,double b,gsl_sf_result* result); | 322 | -- | wrapper for int gsl_sf_lnbeta_e(double a,double b,gsl_sf_result* result); |
323 | -- | ||
324 | -- <http://www.google.com/search?q=gsl_sf_lnbeta_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
250 | lnbeta_e :: Double -> Double -> (Double,Double) | 325 | lnbeta_e :: Double -> Double -> (Double,Double) |
251 | lnbeta_e a b = createSFR "lnbeta_e" $ gsl_sf_lnbeta_e a b | 326 | lnbeta_e a b = createSFR "lnbeta_e" $ gsl_sf_lnbeta_e a b |
252 | foreign import ccall "gamma.h gsl_sf_lnbeta_e" gsl_sf_lnbeta_e :: Double -> Double -> Ptr Double -> IO(Int) | 327 | foreign import ccall "gamma.h gsl_sf_lnbeta_e" gsl_sf_lnbeta_e :: Double -> Double -> Ptr Double -> IO(Int) |
253 | 328 | ||
254 | -- | wrapper for double gsl_sf_lnbeta(double a,double b); | 329 | -- | wrapper for double gsl_sf_lnbeta(double a,double b); |
330 | -- | ||
331 | -- <http://www.google.com/search?q=gsl_sf_lnbeta&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
255 | lnbeta :: Double -> Double -> Double | 332 | lnbeta :: Double -> Double -> Double |
256 | lnbeta = gsl_sf_lnbeta | 333 | lnbeta = gsl_sf_lnbeta |
257 | foreign import ccall "gamma.h gsl_sf_lnbeta" gsl_sf_lnbeta :: Double -> Double -> Double | 334 | foreign import ccall "gamma.h gsl_sf_lnbeta" gsl_sf_lnbeta :: Double -> Double -> Double |
258 | 335 | ||
259 | -- | wrapper for int gsl_sf_beta_e(double a,double b,gsl_sf_result* result); | 336 | -- | wrapper for int gsl_sf_beta_e(double a,double b,gsl_sf_result* result); |
337 | -- | ||
338 | -- <http://www.google.com/search?q=gsl_sf_beta_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
260 | beta_e :: Double -> Double -> (Double,Double) | 339 | beta_e :: Double -> Double -> (Double,Double) |
261 | beta_e a b = createSFR "beta_e" $ gsl_sf_beta_e a b | 340 | beta_e a b = createSFR "beta_e" $ gsl_sf_beta_e a b |
262 | foreign import ccall "gamma.h gsl_sf_beta_e" gsl_sf_beta_e :: Double -> Double -> Ptr Double -> IO(Int) | 341 | foreign import ccall "gamma.h gsl_sf_beta_e" gsl_sf_beta_e :: Double -> Double -> Ptr Double -> IO(Int) |
263 | 342 | ||
264 | -- | wrapper for double gsl_sf_beta(double a,double b); | 343 | -- | wrapper for double gsl_sf_beta(double a,double b); |
344 | -- | ||
345 | -- <http://www.google.com/search?q=gsl_sf_beta&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
265 | beta :: Double -> Double -> Double | 346 | beta :: Double -> Double -> Double |
266 | beta = gsl_sf_beta | 347 | beta = gsl_sf_beta |
267 | foreign import ccall "gamma.h gsl_sf_beta" gsl_sf_beta :: Double -> Double -> Double | 348 | foreign import ccall "gamma.h gsl_sf_beta" gsl_sf_beta :: Double -> Double -> Double |
268 | 349 | ||
269 | -- | wrapper for int gsl_sf_beta_inc_e(double a,double b,double x,gsl_sf_result* result); | 350 | -- | wrapper for int gsl_sf_beta_inc_e(double a,double b,double x,gsl_sf_result* result); |
351 | -- | ||
352 | -- <http://www.google.com/search?q=gsl_sf_beta_inc_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
270 | beta_inc_e :: Double -> Double -> Double -> (Double,Double) | 353 | beta_inc_e :: Double -> Double -> Double -> (Double,Double) |
271 | beta_inc_e a b x = createSFR "beta_inc_e" $ gsl_sf_beta_inc_e a b x | 354 | beta_inc_e a b x = createSFR "beta_inc_e" $ gsl_sf_beta_inc_e a b x |
272 | foreign import ccall "gamma.h gsl_sf_beta_inc_e" gsl_sf_beta_inc_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) | 355 | foreign import ccall "gamma.h gsl_sf_beta_inc_e" gsl_sf_beta_inc_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) |
273 | 356 | ||
274 | -- | wrapper for double gsl_sf_beta_inc(double a,double b,double x); | 357 | -- | wrapper for double gsl_sf_beta_inc(double a,double b,double x); |
358 | -- | ||
359 | -- <http://www.google.com/search?q=gsl_sf_beta_inc&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
275 | beta_inc :: Double -> Double -> Double -> Double | 360 | beta_inc :: Double -> Double -> Double -> Double |
276 | beta_inc = gsl_sf_beta_inc | 361 | beta_inc = gsl_sf_beta_inc |
277 | foreign import ccall "gamma.h gsl_sf_beta_inc" gsl_sf_beta_inc :: Double -> Double -> Double -> Double | 362 | foreign import ccall "gamma.h gsl_sf_beta_inc" gsl_sf_beta_inc :: Double -> Double -> Double -> Double |
diff --git a/lib/GSL/Special/Gegenbauer.hs b/lib/GSL/Special/Gegenbauer.hs index d4309db..9667042 100644 --- a/lib/GSL/Special/Gegenbauer.hs +++ b/lib/GSL/Special/Gegenbauer.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Gegenbauer-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_gegenbauer.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -29,46 +29,64 @@ import Foreign(Ptr) | |||
29 | import GSL.Special.Internal | 29 | import GSL.Special.Internal |
30 | 30 | ||
31 | -- | wrapper for int gsl_sf_gegenpoly_1_e(double lambda,double x,gsl_sf_result* result); | 31 | -- | wrapper for int gsl_sf_gegenpoly_1_e(double lambda,double x,gsl_sf_result* result); |
32 | -- | ||
33 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
32 | gegenpoly_1_e :: Double -> Double -> (Double,Double) | 34 | gegenpoly_1_e :: Double -> Double -> (Double,Double) |
33 | gegenpoly_1_e lambda x = createSFR "gegenpoly_1_e" $ gsl_sf_gegenpoly_1_e lambda x | 35 | gegenpoly_1_e lambda x = createSFR "gegenpoly_1_e" $ gsl_sf_gegenpoly_1_e lambda x |
34 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_1_e" gsl_sf_gegenpoly_1_e :: Double -> Double -> Ptr Double -> IO(Int) | 36 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_1_e" gsl_sf_gegenpoly_1_e :: Double -> Double -> Ptr Double -> IO(Int) |
35 | 37 | ||
36 | -- | wrapper for int gsl_sf_gegenpoly_2_e(double lambda,double x,gsl_sf_result* result); | 38 | -- | wrapper for int gsl_sf_gegenpoly_2_e(double lambda,double x,gsl_sf_result* result); |
39 | -- | ||
40 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
37 | gegenpoly_2_e :: Double -> Double -> (Double,Double) | 41 | gegenpoly_2_e :: Double -> Double -> (Double,Double) |
38 | gegenpoly_2_e lambda x = createSFR "gegenpoly_2_e" $ gsl_sf_gegenpoly_2_e lambda x | 42 | gegenpoly_2_e lambda x = createSFR "gegenpoly_2_e" $ gsl_sf_gegenpoly_2_e lambda x |
39 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_2_e" gsl_sf_gegenpoly_2_e :: Double -> Double -> Ptr Double -> IO(Int) | 43 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_2_e" gsl_sf_gegenpoly_2_e :: Double -> Double -> Ptr Double -> IO(Int) |
40 | 44 | ||
41 | -- | wrapper for int gsl_sf_gegenpoly_3_e(double lambda,double x,gsl_sf_result* result); | 45 | -- | wrapper for int gsl_sf_gegenpoly_3_e(double lambda,double x,gsl_sf_result* result); |
46 | -- | ||
47 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
42 | gegenpoly_3_e :: Double -> Double -> (Double,Double) | 48 | gegenpoly_3_e :: Double -> Double -> (Double,Double) |
43 | gegenpoly_3_e lambda x = createSFR "gegenpoly_3_e" $ gsl_sf_gegenpoly_3_e lambda x | 49 | gegenpoly_3_e lambda x = createSFR "gegenpoly_3_e" $ gsl_sf_gegenpoly_3_e lambda x |
44 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_3_e" gsl_sf_gegenpoly_3_e :: Double -> Double -> Ptr Double -> IO(Int) | 50 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_3_e" gsl_sf_gegenpoly_3_e :: Double -> Double -> Ptr Double -> IO(Int) |
45 | 51 | ||
46 | -- | wrapper for double gsl_sf_gegenpoly_1(double lambda,double x); | 52 | -- | wrapper for double gsl_sf_gegenpoly_1(double lambda,double x); |
53 | -- | ||
54 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
47 | gegenpoly_1 :: Double -> Double -> Double | 55 | gegenpoly_1 :: Double -> Double -> Double |
48 | gegenpoly_1 = gsl_sf_gegenpoly_1 | 56 | gegenpoly_1 = gsl_sf_gegenpoly_1 |
49 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_1" gsl_sf_gegenpoly_1 :: Double -> Double -> Double | 57 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_1" gsl_sf_gegenpoly_1 :: Double -> Double -> Double |
50 | 58 | ||
51 | -- | wrapper for double gsl_sf_gegenpoly_2(double lambda,double x); | 59 | -- | wrapper for double gsl_sf_gegenpoly_2(double lambda,double x); |
60 | -- | ||
61 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
52 | gegenpoly_2 :: Double -> Double -> Double | 62 | gegenpoly_2 :: Double -> Double -> Double |
53 | gegenpoly_2 = gsl_sf_gegenpoly_2 | 63 | gegenpoly_2 = gsl_sf_gegenpoly_2 |
54 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_2" gsl_sf_gegenpoly_2 :: Double -> Double -> Double | 64 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_2" gsl_sf_gegenpoly_2 :: Double -> Double -> Double |
55 | 65 | ||
56 | -- | wrapper for double gsl_sf_gegenpoly_3(double lambda,double x); | 66 | -- | wrapper for double gsl_sf_gegenpoly_3(double lambda,double x); |
67 | -- | ||
68 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_3&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
57 | gegenpoly_3 :: Double -> Double -> Double | 69 | gegenpoly_3 :: Double -> Double -> Double |
58 | gegenpoly_3 = gsl_sf_gegenpoly_3 | 70 | gegenpoly_3 = gsl_sf_gegenpoly_3 |
59 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_3" gsl_sf_gegenpoly_3 :: Double -> Double -> Double | 71 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_3" gsl_sf_gegenpoly_3 :: Double -> Double -> Double |
60 | 72 | ||
61 | -- | wrapper for int gsl_sf_gegenpoly_n_e(int n,double lambda,double x,gsl_sf_result* result); | 73 | -- | wrapper for int gsl_sf_gegenpoly_n_e(int n,double lambda,double x,gsl_sf_result* result); |
74 | -- | ||
75 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_n_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
62 | gegenpoly_n_e :: Int -> Double -> Double -> (Double,Double) | 76 | gegenpoly_n_e :: Int -> Double -> Double -> (Double,Double) |
63 | gegenpoly_n_e n lambda x = createSFR "gegenpoly_n_e" $ gsl_sf_gegenpoly_n_e n lambda x | 77 | gegenpoly_n_e n lambda x = createSFR "gegenpoly_n_e" $ gsl_sf_gegenpoly_n_e n lambda x |
64 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_n_e" gsl_sf_gegenpoly_n_e :: Int -> Double -> Double -> Ptr Double -> IO(Int) | 78 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_n_e" gsl_sf_gegenpoly_n_e :: Int -> Double -> Double -> Ptr Double -> IO(Int) |
65 | 79 | ||
66 | -- | wrapper for double gsl_sf_gegenpoly_n(int n,double lambda,double x); | 80 | -- | wrapper for double gsl_sf_gegenpoly_n(int n,double lambda,double x); |
81 | -- | ||
82 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_n&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
67 | gegenpoly_n :: Int -> Double -> Double -> Double | 83 | gegenpoly_n :: Int -> Double -> Double -> Double |
68 | gegenpoly_n = gsl_sf_gegenpoly_n | 84 | gegenpoly_n = gsl_sf_gegenpoly_n |
69 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_n" gsl_sf_gegenpoly_n :: Int -> Double -> Double -> Double | 85 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_n" gsl_sf_gegenpoly_n :: Int -> Double -> Double -> Double |
70 | 86 | ||
71 | -- | wrapper for int gsl_sf_gegenpoly_array(int nmax,double lambda,double x,double* result_array); | 87 | -- | wrapper for int gsl_sf_gegenpoly_array(int nmax,double lambda,double x,double* result_array); |
88 | -- | ||
89 | -- <http://www.google.com/search?q=gsl_sf_gegenpoly_array&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
72 | gegenpoly_array :: Int -> Double -> Double -> Ptr Double -> Int | 90 | gegenpoly_array :: Int -> Double -> Double -> Ptr Double -> Int |
73 | gegenpoly_array = gsl_sf_gegenpoly_array | 91 | gegenpoly_array = gsl_sf_gegenpoly_array |
74 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_array" gsl_sf_gegenpoly_array :: Int -> Double -> Double -> Ptr Double -> Int | 92 | foreign import ccall "gegenbauer.h gsl_sf_gegenpoly_array" gsl_sf_gegenpoly_array :: Int -> Double -> Double -> Ptr Double -> Int |
diff --git a/lib/GSL/Special/Hyperg.hs b/lib/GSL/Special/Hyperg.hs index afe60e6..f9551eb 100644 --- a/lib/GSL/Special/Hyperg.hs +++ b/lib/GSL/Special/Hyperg.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Hypergeometric-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_hyperg.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -43,111 +43,155 @@ import Foreign(Ptr) | |||
43 | import GSL.Special.Internal | 43 | import GSL.Special.Internal |
44 | 44 | ||
45 | -- | wrapper for int gsl_sf_hyperg_0F1_e(double c,double x,gsl_sf_result* result); | 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> | ||
46 | hyperg_0F1_e :: Double -> Double -> (Double,Double) | 48 | hyperg_0F1_e :: Double -> Double -> (Double,Double) |
47 | hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x | 49 | hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x |
48 | foreign import ccall "hyperg.h gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr Double -> IO(Int) | 50 | foreign import ccall "hyperg.h gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr Double -> IO(Int) |
49 | 51 | ||
50 | -- | wrapper for double gsl_sf_hyperg_0F1(double c,double x); | 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> | ||
51 | hyperg_0F1 :: Double -> Double -> Double | 55 | hyperg_0F1 :: Double -> Double -> Double |
52 | hyperg_0F1 = gsl_sf_hyperg_0F1 | 56 | hyperg_0F1 = gsl_sf_hyperg_0F1 |
53 | foreign import ccall "hyperg.h gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double | 57 | foreign import ccall "hyperg.h gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double |
54 | 58 | ||
55 | -- | wrapper for int gsl_sf_hyperg_1F1_int_e(int m,int n,double x,gsl_sf_result* result); | 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> | ||
56 | hyperg_1F1_int_e :: Int -> Int -> Double -> (Double,Double) | 62 | hyperg_1F1_int_e :: Int -> Int -> Double -> (Double,Double) |
57 | hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x | 63 | hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x |
58 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: Int -> Int -> Double -> Ptr Double -> IO(Int) | 64 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: Int -> Int -> Double -> Ptr Double -> IO(Int) |
59 | 65 | ||
60 | -- | wrapper for double gsl_sf_hyperg_1F1_int(int m,int n,double x); | 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> | ||
61 | hyperg_1F1_int :: Int -> Int -> Double -> Double | 69 | hyperg_1F1_int :: Int -> Int -> Double -> Double |
62 | hyperg_1F1_int = gsl_sf_hyperg_1F1_int | 70 | hyperg_1F1_int = gsl_sf_hyperg_1F1_int |
63 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: Int -> Int -> Double -> Double | 71 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: Int -> Int -> Double -> Double |
64 | 72 | ||
65 | -- | wrapper for int gsl_sf_hyperg_1F1_e(double a,double b,double x,gsl_sf_result* result); | 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> | ||
66 | hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double) | 76 | hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double) |
67 | hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x | 77 | hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x |
68 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) | 78 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) |
69 | 79 | ||
70 | -- | wrapper for double gsl_sf_hyperg_1F1(double a,double b,double x); | 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> | ||
71 | hyperg_1F1 :: Double -> Double -> Double -> Double | 83 | hyperg_1F1 :: Double -> Double -> Double -> Double |
72 | hyperg_1F1 = gsl_sf_hyperg_1F1 | 84 | hyperg_1F1 = gsl_sf_hyperg_1F1 |
73 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double | 85 | foreign import ccall "hyperg.h gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double |
74 | 86 | ||
75 | -- | wrapper for int gsl_sf_hyperg_U_int_e(int m,int n,double x,gsl_sf_result* result); | 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> | ||
76 | hyperg_U_int_e :: Int -> Int -> Double -> (Double,Double) | 90 | hyperg_U_int_e :: Int -> Int -> Double -> (Double,Double) |
77 | hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x | 91 | hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x |
78 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: Int -> Int -> Double -> Ptr Double -> IO(Int) | 92 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: Int -> Int -> Double -> Ptr Double -> IO(Int) |
79 | 93 | ||
80 | -- | wrapper for double gsl_sf_hyperg_U_int(int m,int n,double x); | 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> | ||
81 | hyperg_U_int :: Int -> Int -> Double -> Double | 97 | hyperg_U_int :: Int -> Int -> Double -> Double |
82 | hyperg_U_int = gsl_sf_hyperg_U_int | 98 | hyperg_U_int = gsl_sf_hyperg_U_int |
83 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: Int -> Int -> Double -> Double | 99 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: Int -> Int -> Double -> Double |
84 | 100 | ||
85 | -- | wrapper for int gsl_sf_hyperg_U_int_e10_e(int m,int n,double x,gsl_sf_result_e10* result); | 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> | ||
86 | hyperg_U_int_e10_e :: Int -> Int -> Double -> (Double,Int,Double) | 104 | hyperg_U_int_e10_e :: Int -> Int -> Double -> (Double,Int,Double) |
87 | hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x | 105 | hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x |
88 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: Int -> Int -> Double -> Ptr () -> IO(Int) | 106 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: Int -> Int -> Double -> Ptr () -> IO(Int) |
89 | 107 | ||
90 | -- | wrapper for int gsl_sf_hyperg_U_e(double a,double b,double x,gsl_sf_result* result); | 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> | ||
91 | hyperg_U_e :: Double -> Double -> Double -> (Double,Double) | 111 | hyperg_U_e :: Double -> Double -> Double -> (Double,Double) |
92 | hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x | 112 | hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x |
93 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) | 113 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) |
94 | 114 | ||
95 | -- | wrapper for double gsl_sf_hyperg_U(double a,double b,double x); | 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> | ||
96 | hyperg_U :: Double -> Double -> Double -> Double | 118 | hyperg_U :: Double -> Double -> Double -> Double |
97 | hyperg_U = gsl_sf_hyperg_U | 119 | hyperg_U = gsl_sf_hyperg_U |
98 | foreign import ccall "hyperg.h gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double | 120 | foreign import ccall "hyperg.h gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double |
99 | 121 | ||
100 | -- | wrapper for int gsl_sf_hyperg_U_e10_e(double a,double b,double x,gsl_sf_result_e10* result); | 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> | ||
101 | hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double) | 125 | hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double) |
102 | hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x | 126 | hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x |
103 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO(Int) | 127 | foreign import ccall "hyperg.h gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO(Int) |
104 | 128 | ||
105 | -- | wrapper for int gsl_sf_hyperg_2F1_e(double a,double b,double c,double x,gsl_sf_result* result); | 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> | ||
106 | hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double) | 132 | hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double) |
107 | hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x | 133 | hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x |
108 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) | 134 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) |
109 | 135 | ||
110 | -- | wrapper for double gsl_sf_hyperg_2F1(double a,double b,double c,double x); | 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> | ||
111 | hyperg_2F1 :: Double -> Double -> Double -> Double -> Double | 139 | hyperg_2F1 :: Double -> Double -> Double -> Double -> Double |
112 | hyperg_2F1 = gsl_sf_hyperg_2F1 | 140 | hyperg_2F1 = gsl_sf_hyperg_2F1 |
113 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double | 141 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double |
114 | 142 | ||
115 | -- | wrapper for int gsl_sf_hyperg_2F1_conj_e(double aR,double aI,double c,double x,gsl_sf_result* result); | 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> | ||
116 | hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double) | 146 | hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double) |
117 | hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x | 147 | hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x |
118 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) | 148 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) |
119 | 149 | ||
120 | -- | wrapper for double gsl_sf_hyperg_2F1_conj(double aR,double aI,double c,double x); | 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> | ||
121 | hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double | 153 | hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double |
122 | hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj | 154 | hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj |
123 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double | 155 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double |
124 | 156 | ||
125 | -- | wrapper for int gsl_sf_hyperg_2F1_renorm_e(double a,double b,double c,double x,gsl_sf_result* result); | 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> | ||
126 | hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) | 160 | hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) |
127 | hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x | 161 | hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x |
128 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) | 162 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr Double -> IO(Int) |
129 | 163 | ||
130 | -- | wrapper for double gsl_sf_hyperg_2F1_renorm(double a,double b,double c,double x); | 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> | ||
131 | hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double | 167 | hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double |
132 | hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm | 168 | hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm |
133 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double | 169 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double |
134 | 170 | ||
135 | -- | wrapper for int gsl_sf_hyperg_2F1_conj_renorm_e(double aR,double aI,double c,double x,gsl_sf_result* result); | 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> | ||
136 | hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) | 174 | hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) |
137 | hyperg_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 | 175 | hyperg_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 |
138 | foreign 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) | 176 | foreign 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) |
139 | 177 | ||
140 | -- | wrapper for double gsl_sf_hyperg_2F1_conj_renorm(double aR,double aI,double c,double x); | 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> | ||
141 | hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double | 181 | hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double |
142 | hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm | 182 | hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm |
143 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double | 183 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double |
144 | 184 | ||
145 | -- | wrapper for int gsl_sf_hyperg_2F0_e(double a,double b,double x,gsl_sf_result* result); | 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> | ||
146 | hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double) | 188 | hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double) |
147 | hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x | 189 | hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x |
148 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) | 190 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr Double -> IO(Int) |
149 | 191 | ||
150 | -- | wrapper for double gsl_sf_hyperg_2F0(double a,double b,double x); | 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> | ||
151 | hyperg_2F0 :: Double -> Double -> Double -> Double | 195 | hyperg_2F0 :: Double -> Double -> Double -> Double |
152 | hyperg_2F0 = gsl_sf_hyperg_2F0 | 196 | hyperg_2F0 = gsl_sf_hyperg_2F0 |
153 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double | 197 | foreign import ccall "hyperg.h gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double |
diff --git a/lib/GSL/Special/Internal.hs b/lib/GSL/Special/Internal.hs index ad1aaa2..8d81c72 100644 --- a/lib/GSL/Special/Internal.hs +++ b/lib/GSL/Special/Internal.hs | |||
@@ -20,6 +20,7 @@ module GSL.Special.Internal ( | |||
20 | createSFR_E10, | 20 | createSFR_E10, |
21 | Precision(..), | 21 | Precision(..), |
22 | Gsl_mode_t, | 22 | Gsl_mode_t, |
23 | Size_t, | ||
23 | precCode | 24 | precCode |
24 | ) | 25 | ) |
25 | where | 26 | where |
@@ -37,6 +38,8 @@ precCode PrecApprox = 2 | |||
37 | 38 | ||
38 | type Gsl_mode_t = Int | 39 | type Gsl_mode_t = Int |
39 | 40 | ||
41 | type Size_t = Int | ||
42 | |||
40 | ---------------------------------------------------------------- | 43 | ---------------------------------------------------------------- |
41 | -- | access to a sf_result | 44 | -- | access to a sf_result |
42 | createSFR :: Storable a => String -> (Ptr a -> IO Int) -> (a, a) | 45 | createSFR :: Storable a => String -> (Ptr a -> IO Int) -> (a, a) |
diff --git a/lib/GSL/Special/Laguerre.hs b/lib/GSL/Special/Laguerre.hs index 61f366b..f5ab85e 100644 --- a/lib/GSL/Special/Laguerre.hs +++ b/lib/GSL/Special/Laguerre.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Laguerre-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_laguerre.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -29,41 +29,57 @@ import Foreign(Ptr) | |||
29 | import GSL.Special.Internal | 29 | import GSL.Special.Internal |
30 | 30 | ||
31 | -- | wrapper for int gsl_sf_laguerre_1_e(double a,double x,gsl_sf_result* result); | 31 | -- | wrapper for int gsl_sf_laguerre_1_e(double a,double x,gsl_sf_result* result); |
32 | -- | ||
33 | -- <http://www.google.com/search?q=gsl_sf_laguerre_1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
32 | laguerre_1_e :: Double -> Double -> (Double,Double) | 34 | laguerre_1_e :: Double -> Double -> (Double,Double) |
33 | laguerre_1_e a x = createSFR "laguerre_1_e" $ gsl_sf_laguerre_1_e a x | 35 | laguerre_1_e a x = createSFR "laguerre_1_e" $ gsl_sf_laguerre_1_e a x |
34 | foreign import ccall "laguerre.h gsl_sf_laguerre_1_e" gsl_sf_laguerre_1_e :: Double -> Double -> Ptr Double -> IO(Int) | 36 | foreign import ccall "laguerre.h gsl_sf_laguerre_1_e" gsl_sf_laguerre_1_e :: Double -> Double -> Ptr Double -> IO(Int) |
35 | 37 | ||
36 | -- | wrapper for int gsl_sf_laguerre_2_e(double a,double x,gsl_sf_result* result); | 38 | -- | wrapper for int gsl_sf_laguerre_2_e(double a,double x,gsl_sf_result* result); |
39 | -- | ||
40 | -- <http://www.google.com/search?q=gsl_sf_laguerre_2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
37 | laguerre_2_e :: Double -> Double -> (Double,Double) | 41 | laguerre_2_e :: Double -> Double -> (Double,Double) |
38 | laguerre_2_e a x = createSFR "laguerre_2_e" $ gsl_sf_laguerre_2_e a x | 42 | laguerre_2_e a x = createSFR "laguerre_2_e" $ gsl_sf_laguerre_2_e a x |
39 | foreign import ccall "laguerre.h gsl_sf_laguerre_2_e" gsl_sf_laguerre_2_e :: Double -> Double -> Ptr Double -> IO(Int) | 43 | foreign import ccall "laguerre.h gsl_sf_laguerre_2_e" gsl_sf_laguerre_2_e :: Double -> Double -> Ptr Double -> IO(Int) |
40 | 44 | ||
41 | -- | wrapper for int gsl_sf_laguerre_3_e(double a,double x,gsl_sf_result* result); | 45 | -- | wrapper for int gsl_sf_laguerre_3_e(double a,double x,gsl_sf_result* result); |
46 | -- | ||
47 | -- <http://www.google.com/search?q=gsl_sf_laguerre_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
42 | laguerre_3_e :: Double -> Double -> (Double,Double) | 48 | laguerre_3_e :: Double -> Double -> (Double,Double) |
43 | laguerre_3_e a x = createSFR "laguerre_3_e" $ gsl_sf_laguerre_3_e a x | 49 | laguerre_3_e a x = createSFR "laguerre_3_e" $ gsl_sf_laguerre_3_e a x |
44 | foreign import ccall "laguerre.h gsl_sf_laguerre_3_e" gsl_sf_laguerre_3_e :: Double -> Double -> Ptr Double -> IO(Int) | 50 | foreign import ccall "laguerre.h gsl_sf_laguerre_3_e" gsl_sf_laguerre_3_e :: Double -> Double -> Ptr Double -> IO(Int) |
45 | 51 | ||
46 | -- | wrapper for double gsl_sf_laguerre_1(double a,double x); | 52 | -- | wrapper for double gsl_sf_laguerre_1(double a,double x); |
53 | -- | ||
54 | -- <http://www.google.com/search?q=gsl_sf_laguerre_1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
47 | laguerre_1 :: Double -> Double -> Double | 55 | laguerre_1 :: Double -> Double -> Double |
48 | laguerre_1 = gsl_sf_laguerre_1 | 56 | laguerre_1 = gsl_sf_laguerre_1 |
49 | foreign import ccall "laguerre.h gsl_sf_laguerre_1" gsl_sf_laguerre_1 :: Double -> Double -> Double | 57 | foreign import ccall "laguerre.h gsl_sf_laguerre_1" gsl_sf_laguerre_1 :: Double -> Double -> Double |
50 | 58 | ||
51 | -- | wrapper for double gsl_sf_laguerre_2(double a,double x); | 59 | -- | wrapper for double gsl_sf_laguerre_2(double a,double x); |
60 | -- | ||
61 | -- <http://www.google.com/search?q=gsl_sf_laguerre_2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
52 | laguerre_2 :: Double -> Double -> Double | 62 | laguerre_2 :: Double -> Double -> Double |
53 | laguerre_2 = gsl_sf_laguerre_2 | 63 | laguerre_2 = gsl_sf_laguerre_2 |
54 | foreign import ccall "laguerre.h gsl_sf_laguerre_2" gsl_sf_laguerre_2 :: Double -> Double -> Double | 64 | foreign import ccall "laguerre.h gsl_sf_laguerre_2" gsl_sf_laguerre_2 :: Double -> Double -> Double |
55 | 65 | ||
56 | -- | wrapper for double gsl_sf_laguerre_3(double a,double x); | 66 | -- | wrapper for double gsl_sf_laguerre_3(double a,double x); |
67 | -- | ||
68 | -- <http://www.google.com/search?q=gsl_sf_laguerre_3&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
57 | laguerre_3 :: Double -> Double -> Double | 69 | laguerre_3 :: Double -> Double -> Double |
58 | laguerre_3 = gsl_sf_laguerre_3 | 70 | laguerre_3 = gsl_sf_laguerre_3 |
59 | foreign import ccall "laguerre.h gsl_sf_laguerre_3" gsl_sf_laguerre_3 :: Double -> Double -> Double | 71 | foreign import ccall "laguerre.h gsl_sf_laguerre_3" gsl_sf_laguerre_3 :: Double -> Double -> Double |
60 | 72 | ||
61 | -- | wrapper for int gsl_sf_laguerre_n_e(int n,double a,double x,gsl_sf_result* result); | 73 | -- | wrapper for int gsl_sf_laguerre_n_e(int n,double a,double x,gsl_sf_result* result); |
74 | -- | ||
75 | -- <http://www.google.com/search?q=gsl_sf_laguerre_n_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
62 | laguerre_n_e :: Int -> Double -> Double -> (Double,Double) | 76 | laguerre_n_e :: Int -> Double -> Double -> (Double,Double) |
63 | laguerre_n_e n a x = createSFR "laguerre_n_e" $ gsl_sf_laguerre_n_e n a x | 77 | laguerre_n_e n a x = createSFR "laguerre_n_e" $ gsl_sf_laguerre_n_e n a x |
64 | foreign import ccall "laguerre.h gsl_sf_laguerre_n_e" gsl_sf_laguerre_n_e :: Int -> Double -> Double -> Ptr Double -> IO(Int) | 78 | foreign import ccall "laguerre.h gsl_sf_laguerre_n_e" gsl_sf_laguerre_n_e :: Int -> Double -> Double -> Ptr Double -> IO(Int) |
65 | 79 | ||
66 | -- | wrapper for double gsl_sf_laguerre_n(int n,double a,double x); | 80 | -- | wrapper for double gsl_sf_laguerre_n(int n,double a,double x); |
81 | -- | ||
82 | -- <http://www.google.com/search?q=gsl_sf_laguerre_n&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
67 | laguerre_n :: Int -> Double -> Double -> Double | 83 | laguerre_n :: Int -> Double -> Double -> Double |
68 | laguerre_n = gsl_sf_laguerre_n | 84 | laguerre_n = gsl_sf_laguerre_n |
69 | foreign import ccall "laguerre.h gsl_sf_laguerre_n" gsl_sf_laguerre_n :: Int -> Double -> Double -> Double | 85 | foreign import ccall "laguerre.h gsl_sf_laguerre_n" gsl_sf_laguerre_n :: Int -> Double -> Double -> Double |
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 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers 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) | |||
25 | import GSL.Special.Internal | 25 | import 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> | ||
28 | lambert_W0_e :: Double -> (Double,Double) | 30 | lambert_W0_e :: Double -> (Double,Double) |
29 | lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x | 31 | lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x |
30 | foreign import ccall "lambert.h gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr Double -> IO(Int) | 32 | foreign 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> | ||
33 | lambert_W0 :: Double -> Double | 37 | lambert_W0 :: Double -> Double |
34 | lambert_W0 = gsl_sf_lambert_W0 | 38 | lambert_W0 = gsl_sf_lambert_W0 |
35 | foreign import ccall "lambert.h gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double | 39 | foreign 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> | ||
38 | lambert_Wm1_e :: Double -> (Double,Double) | 44 | lambert_Wm1_e :: Double -> (Double,Double) |
39 | lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x | 45 | lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x |
40 | foreign import ccall "lambert.h gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr Double -> IO(Int) | 46 | foreign 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> | ||
43 | lambert_Wm1 :: Double -> Double | 51 | lambert_Wm1 :: Double -> Double |
44 | lambert_Wm1 = gsl_sf_lambert_Wm1 | 52 | lambert_Wm1 = gsl_sf_lambert_Wm1 |
45 | foreign import ccall "lambert.h gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double | 53 | foreign import ccall "lambert.h gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double |
diff --git a/lib/GSL/Special/Pow_int.hs b/lib/GSL/Special/Pow_int.hs index b476a92..4142c5b 100644 --- a/lib/GSL/Special/Pow_int.hs +++ b/lib/GSL/Special/Pow_int.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Power-Function.html> | 12 | <http://www.google.com/search?q=gsl_sf_pow_int.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -23,11 +23,15 @@ import Foreign(Ptr) | |||
23 | import GSL.Special.Internal | 23 | import GSL.Special.Internal |
24 | 24 | ||
25 | -- | wrapper for int gsl_sf_pow_int_e(double x,int n,gsl_sf_result* result); | 25 | -- | wrapper for int gsl_sf_pow_int_e(double x,int n,gsl_sf_result* result); |
26 | -- | ||
27 | -- <http://www.google.com/search?q=gsl_sf_pow_int_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
26 | pow_int_e :: Double -> Int -> (Double,Double) | 28 | pow_int_e :: Double -> Int -> (Double,Double) |
27 | pow_int_e x n = createSFR "pow_int_e" $ gsl_sf_pow_int_e x n | 29 | pow_int_e x n = createSFR "pow_int_e" $ gsl_sf_pow_int_e x n |
28 | foreign import ccall "pow_int.h gsl_sf_pow_int_e" gsl_sf_pow_int_e :: Double -> Int -> Ptr Double -> IO(Int) | 30 | foreign import ccall "pow_int.h gsl_sf_pow_int_e" gsl_sf_pow_int_e :: Double -> Int -> Ptr Double -> IO(Int) |
29 | 31 | ||
30 | -- | wrapper for double gsl_sf_pow_int(double x,int n); | 32 | -- | wrapper for double gsl_sf_pow_int(double x,int n); |
33 | -- | ||
34 | -- <http://www.google.com/search?q=gsl_sf_pow_int&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
31 | pow_int :: Double -> Int -> Double | 35 | pow_int :: Double -> Int -> Double |
32 | pow_int = gsl_sf_pow_int | 36 | pow_int = gsl_sf_pow_int |
33 | foreign import ccall "pow_int.h gsl_sf_pow_int" gsl_sf_pow_int :: Double -> Int -> Double | 37 | foreign import ccall "pow_int.h gsl_sf_pow_int" gsl_sf_pow_int :: Double -> Int -> Double |
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 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers 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) | |||
33 | import GSL.Special.Internal | 33 | import 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> | ||
36 | psi_int_e :: Int -> (Double,Double) | 38 | psi_int_e :: Int -> (Double,Double) |
37 | psi_int_e n = createSFR "psi_int_e" $ gsl_sf_psi_int_e n | 39 | psi_int_e n = createSFR "psi_int_e" $ gsl_sf_psi_int_e n |
38 | foreign import ccall "psi.h gsl_sf_psi_int_e" gsl_sf_psi_int_e :: Int -> Ptr Double -> IO(Int) | 40 | foreign 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> | ||
41 | psi_int :: Int -> Double | 45 | psi_int :: Int -> Double |
42 | psi_int = gsl_sf_psi_int | 46 | psi_int = gsl_sf_psi_int |
43 | foreign import ccall "psi.h gsl_sf_psi_int" gsl_sf_psi_int :: Int -> Double | 47 | foreign 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> | ||
46 | psi_e :: Double -> (Double,Double) | 52 | psi_e :: Double -> (Double,Double) |
47 | psi_e x = createSFR "psi_e" $ gsl_sf_psi_e x | 53 | psi_e x = createSFR "psi_e" $ gsl_sf_psi_e x |
48 | foreign import ccall "psi.h gsl_sf_psi_e" gsl_sf_psi_e :: Double -> Ptr Double -> IO(Int) | 54 | foreign 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> | ||
51 | psi :: Double -> Double | 59 | psi :: Double -> Double |
52 | psi = gsl_sf_psi | 60 | psi = gsl_sf_psi |
53 | foreign import ccall "psi.h gsl_sf_psi" gsl_sf_psi :: Double -> Double | 61 | foreign 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> | ||
56 | psi_1piy_e :: Double -> (Double,Double) | 66 | psi_1piy_e :: Double -> (Double,Double) |
57 | psi_1piy_e y = createSFR "psi_1piy_e" $ gsl_sf_psi_1piy_e y | 67 | psi_1piy_e y = createSFR "psi_1piy_e" $ gsl_sf_psi_1piy_e y |
58 | foreign import ccall "psi.h gsl_sf_psi_1piy_e" gsl_sf_psi_1piy_e :: Double -> Ptr Double -> IO(Int) | 68 | foreign 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> | ||
61 | psi_1piy :: Double -> Double | 73 | psi_1piy :: Double -> Double |
62 | psi_1piy = gsl_sf_psi_1piy | 74 | psi_1piy = gsl_sf_psi_1piy |
63 | foreign import ccall "psi.h gsl_sf_psi_1piy" gsl_sf_psi_1piy :: Double -> Double | 75 | foreign 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> | ||
66 | psi_1_int_e :: Int -> (Double,Double) | 80 | psi_1_int_e :: Int -> (Double,Double) |
67 | psi_1_int_e n = createSFR "psi_1_int_e" $ gsl_sf_psi_1_int_e n | 81 | psi_1_int_e n = createSFR "psi_1_int_e" $ gsl_sf_psi_1_int_e n |
68 | foreign import ccall "psi.h gsl_sf_psi_1_int_e" gsl_sf_psi_1_int_e :: Int -> Ptr Double -> IO(Int) | 82 | foreign 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> | ||
71 | psi_1_int :: Int -> Double | 87 | psi_1_int :: Int -> Double |
72 | psi_1_int = gsl_sf_psi_1_int | 88 | psi_1_int = gsl_sf_psi_1_int |
73 | foreign import ccall "psi.h gsl_sf_psi_1_int" gsl_sf_psi_1_int :: Int -> Double | 89 | foreign 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> | ||
76 | psi_1_e :: Double -> (Double,Double) | 94 | psi_1_e :: Double -> (Double,Double) |
77 | psi_1_e x = createSFR "psi_1_e" $ gsl_sf_psi_1_e x | 95 | psi_1_e x = createSFR "psi_1_e" $ gsl_sf_psi_1_e x |
78 | foreign import ccall "psi.h gsl_sf_psi_1_e" gsl_sf_psi_1_e :: Double -> Ptr Double -> IO(Int) | 96 | foreign 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> | ||
81 | psi_1 :: Double -> Double | 101 | psi_1 :: Double -> Double |
82 | psi_1 = gsl_sf_psi_1 | 102 | psi_1 = gsl_sf_psi_1 |
83 | foreign import ccall "psi.h gsl_sf_psi_1" gsl_sf_psi_1 :: Double -> Double | 103 | foreign 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> | ||
86 | psi_n_e :: Int -> Double -> (Double,Double) | 108 | psi_n_e :: Int -> Double -> (Double,Double) |
87 | psi_n_e n x = createSFR "psi_n_e" $ gsl_sf_psi_n_e n x | 109 | psi_n_e n x = createSFR "psi_n_e" $ gsl_sf_psi_n_e n x |
88 | foreign import ccall "psi.h gsl_sf_psi_n_e" gsl_sf_psi_n_e :: Int -> Double -> Ptr Double -> IO(Int) | 110 | foreign 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> | ||
91 | psi_n :: Int -> Double -> Double | 115 | psi_n :: Int -> Double -> Double |
92 | psi_n = gsl_sf_psi_n | 116 | psi_n = gsl_sf_psi_n |
93 | foreign import ccall "psi.h gsl_sf_psi_n" gsl_sf_psi_n :: Int -> Double -> Double | 117 | foreign import ccall "psi.h gsl_sf_psi_n" gsl_sf_psi_n :: Int -> Double -> Double |
diff --git a/lib/GSL/Special/Synchrotron.hs b/lib/GSL/Special/Synchrotron.hs index 7cec281..2ed484b 100644 --- a/lib/GSL/Special/Synchrotron.hs +++ b/lib/GSL/Special/Synchrotron.hs | |||
@@ -9,7 +9,7 @@ Portability : uses ffi | |||
9 | 9 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers for selected functions described at: |
11 | 11 | ||
12 | <http://www.gnu.org/software/gsl/manual/html_node/Synchrotron-Functions.html> | 12 | <http://www.google.com/search?q=gsl_sf_synchrotron.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
13 | 13 | ||
14 | -} | 14 | -} |
15 | ------------------------------------------------------------ | 15 | ------------------------------------------------------------ |
@@ -25,21 +25,29 @@ import Foreign(Ptr) | |||
25 | import GSL.Special.Internal | 25 | import GSL.Special.Internal |
26 | 26 | ||
27 | -- | wrapper for int gsl_sf_synchrotron_1_e(double x,gsl_sf_result* result); | 27 | -- | wrapper for int gsl_sf_synchrotron_1_e(double x,gsl_sf_result* result); |
28 | -- | ||
29 | -- <http://www.google.com/search?q=gsl_sf_synchrotron_1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
28 | synchrotron_1_e :: Double -> (Double,Double) | 30 | synchrotron_1_e :: Double -> (Double,Double) |
29 | synchrotron_1_e x = createSFR "synchrotron_1_e" $ gsl_sf_synchrotron_1_e x | 31 | synchrotron_1_e x = createSFR "synchrotron_1_e" $ gsl_sf_synchrotron_1_e x |
30 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_1_e" gsl_sf_synchrotron_1_e :: Double -> Ptr Double -> IO(Int) | 32 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_1_e" gsl_sf_synchrotron_1_e :: Double -> Ptr Double -> IO(Int) |
31 | 33 | ||
32 | -- | wrapper for double gsl_sf_synchrotron_1(double x); | 34 | -- | wrapper for double gsl_sf_synchrotron_1(double x); |
35 | -- | ||
36 | -- <http://www.google.com/search?q=gsl_sf_synchrotron_1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
33 | synchrotron_1 :: Double -> Double | 37 | synchrotron_1 :: Double -> Double |
34 | synchrotron_1 = gsl_sf_synchrotron_1 | 38 | synchrotron_1 = gsl_sf_synchrotron_1 |
35 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_1" gsl_sf_synchrotron_1 :: Double -> Double | 39 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_1" gsl_sf_synchrotron_1 :: Double -> Double |
36 | 40 | ||
37 | -- | wrapper for int gsl_sf_synchrotron_2_e(double x,gsl_sf_result* result); | 41 | -- | wrapper for int gsl_sf_synchrotron_2_e(double x,gsl_sf_result* result); |
42 | -- | ||
43 | -- <http://www.google.com/search?q=gsl_sf_synchrotron_2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
38 | synchrotron_2_e :: Double -> (Double,Double) | 44 | synchrotron_2_e :: Double -> (Double,Double) |
39 | synchrotron_2_e x = createSFR "synchrotron_2_e" $ gsl_sf_synchrotron_2_e x | 45 | synchrotron_2_e x = createSFR "synchrotron_2_e" $ gsl_sf_synchrotron_2_e x |
40 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_2_e" gsl_sf_synchrotron_2_e :: Double -> Ptr Double -> IO(Int) | 46 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_2_e" gsl_sf_synchrotron_2_e :: Double -> Ptr Double -> IO(Int) |
41 | 47 | ||
42 | -- | wrapper for double gsl_sf_synchrotron_2(double x); | 48 | -- | wrapper for double gsl_sf_synchrotron_2(double x); |
49 | -- | ||
50 | -- <http://www.google.com/search?q=gsl_sf_synchrotron_2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
43 | synchrotron_2 :: Double -> Double | 51 | synchrotron_2 :: Double -> Double |
44 | synchrotron_2 = gsl_sf_synchrotron_2 | 52 | synchrotron_2 = gsl_sf_synchrotron_2 |
45 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_2" gsl_sf_synchrotron_2 :: Double -> Double | 53 | foreign import ccall "synchrotron.h gsl_sf_synchrotron_2" gsl_sf_synchrotron_2 :: Double -> Double |
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 | ||
10 | Wrappers for selected functions described at: | 10 | Wrappers 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) | |||
35 | import GSL.Special.Internal | 35 | import 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> | ||
38 | zeta_int_e :: Int -> (Double,Double) | 40 | zeta_int_e :: Int -> (Double,Double) |
39 | zeta_int_e n = createSFR "zeta_int_e" $ gsl_sf_zeta_int_e n | 41 | zeta_int_e n = createSFR "zeta_int_e" $ gsl_sf_zeta_int_e n |
40 | foreign import ccall "zeta.h gsl_sf_zeta_int_e" gsl_sf_zeta_int_e :: Int -> Ptr Double -> IO(Int) | 42 | foreign 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> | ||
43 | zeta_int :: Int -> Double | 47 | zeta_int :: Int -> Double |
44 | zeta_int = gsl_sf_zeta_int | 48 | zeta_int = gsl_sf_zeta_int |
45 | foreign import ccall "zeta.h gsl_sf_zeta_int" gsl_sf_zeta_int :: Int -> Double | 49 | foreign 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> | ||
48 | zeta_e :: Double -> (Double,Double) | 54 | zeta_e :: Double -> (Double,Double) |
49 | zeta_e s = createSFR "zeta_e" $ gsl_sf_zeta_e s | 55 | zeta_e s = createSFR "zeta_e" $ gsl_sf_zeta_e s |
50 | foreign import ccall "zeta.h gsl_sf_zeta_e" gsl_sf_zeta_e :: Double -> Ptr Double -> IO(Int) | 56 | foreign 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> | ||
53 | zeta :: Double -> Double | 61 | zeta :: Double -> Double |
54 | zeta = gsl_sf_zeta | 62 | zeta = gsl_sf_zeta |
55 | foreign import ccall "zeta.h gsl_sf_zeta" gsl_sf_zeta :: Double -> Double | 63 | foreign 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> | ||
58 | zetam1_e :: Double -> (Double,Double) | 68 | zetam1_e :: Double -> (Double,Double) |
59 | zetam1_e s = createSFR "zetam1_e" $ gsl_sf_zetam1_e s | 69 | zetam1_e s = createSFR "zetam1_e" $ gsl_sf_zetam1_e s |
60 | foreign import ccall "zeta.h gsl_sf_zetam1_e" gsl_sf_zetam1_e :: Double -> Ptr Double -> IO(Int) | 70 | foreign 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> | ||
63 | zetam1 :: Double -> Double | 75 | zetam1 :: Double -> Double |
64 | zetam1 = gsl_sf_zetam1 | 76 | zetam1 = gsl_sf_zetam1 |
65 | foreign import ccall "zeta.h gsl_sf_zetam1" gsl_sf_zetam1 :: Double -> Double | 77 | foreign 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> | ||
68 | zetam1_int_e :: Int -> (Double,Double) | 82 | zetam1_int_e :: Int -> (Double,Double) |
69 | zetam1_int_e s = createSFR "zetam1_int_e" $ gsl_sf_zetam1_int_e s | 83 | zetam1_int_e s = createSFR "zetam1_int_e" $ gsl_sf_zetam1_int_e s |
70 | foreign import ccall "zeta.h gsl_sf_zetam1_int_e" gsl_sf_zetam1_int_e :: Int -> Ptr Double -> IO(Int) | 84 | foreign 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> | ||
73 | zetam1_int :: Int -> Double | 89 | zetam1_int :: Int -> Double |
74 | zetam1_int = gsl_sf_zetam1_int | 90 | zetam1_int = gsl_sf_zetam1_int |
75 | foreign import ccall "zeta.h gsl_sf_zetam1_int" gsl_sf_zetam1_int :: Int -> Double | 91 | foreign 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> | ||
78 | hzeta_e :: Double -> Double -> (Double,Double) | 96 | hzeta_e :: Double -> Double -> (Double,Double) |
79 | hzeta_e s q = createSFR "hzeta_e" $ gsl_sf_hzeta_e s q | 97 | hzeta_e s q = createSFR "hzeta_e" $ gsl_sf_hzeta_e s q |
80 | foreign import ccall "zeta.h gsl_sf_hzeta_e" gsl_sf_hzeta_e :: Double -> Double -> Ptr Double -> IO(Int) | 98 | foreign 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> | ||
83 | hzeta :: Double -> Double -> Double | 103 | hzeta :: Double -> Double -> Double |
84 | hzeta = gsl_sf_hzeta | 104 | hzeta = gsl_sf_hzeta |
85 | foreign import ccall "zeta.h gsl_sf_hzeta" gsl_sf_hzeta :: Double -> Double -> Double | 105 | foreign 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> | ||
88 | eta_int_e :: Int -> (Double,Double) | 110 | eta_int_e :: Int -> (Double,Double) |
89 | eta_int_e n = createSFR "eta_int_e" $ gsl_sf_eta_int_e n | 111 | eta_int_e n = createSFR "eta_int_e" $ gsl_sf_eta_int_e n |
90 | foreign import ccall "zeta.h gsl_sf_eta_int_e" gsl_sf_eta_int_e :: Int -> Ptr Double -> IO(Int) | 112 | foreign 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> | ||
93 | eta_int :: Int -> Double | 117 | eta_int :: Int -> Double |
94 | eta_int = gsl_sf_eta_int | 118 | eta_int = gsl_sf_eta_int |
95 | foreign import ccall "zeta.h gsl_sf_eta_int" gsl_sf_eta_int :: Int -> Double | 119 | foreign 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> | ||
98 | eta_e :: Double -> (Double,Double) | 124 | eta_e :: Double -> (Double,Double) |
99 | eta_e s = createSFR "eta_e" $ gsl_sf_eta_e s | 125 | eta_e s = createSFR "eta_e" $ gsl_sf_eta_e s |
100 | foreign import ccall "zeta.h gsl_sf_eta_e" gsl_sf_eta_e :: Double -> Ptr Double -> IO(Int) | 126 | foreign 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> | ||
103 | eta :: Double -> Double | 131 | eta :: Double -> Double |
104 | eta = gsl_sf_eta | 132 | eta = gsl_sf_eta |
105 | foreign import ccall "zeta.h gsl_sf_eta" gsl_sf_eta :: Double -> Double | 133 | foreign import ccall "zeta.h gsl_sf_eta" gsl_sf_eta :: Double -> Double |
diff --git a/lib/GSL/Special/auto.hs b/lib/GSL/Special/auto.hs index a6a0f9a..0ef7d0a 100644 --- a/lib/GSL/Special/auto.hs +++ b/lib/GSL/Special/auto.hs | |||
@@ -42,9 +42,14 @@ fixC s = rep ("gsl_mode_t","int") $ rep ("gsl_sf_result","double") $ rep ("gsl_s | |||
42 | 42 | ||
43 | main = do | 43 | main = do |
44 | args <- getArgs | 44 | args <- getArgs |
45 | file <- readFile (args!!1) | ||
46 | let name = args!!0 | 45 | let name = args!!0 |
47 | putStrLn (args!!1) | 46 | headerfile = |
47 | case args of | ||
48 | [n] -> "/usr/include/gsl/gsl_sf_"++n++".h" | ||
49 | [_,f] -> f | ||
50 | file <- readFile headerfile | ||
51 | |||
52 | putStrLn headerfile | ||
48 | --mapM_ print (headers $ fixlong file) | 53 | --mapM_ print (headers $ fixlong file) |
49 | let parsed = (headers $ fixlong file) | 54 | let parsed = (headers $ fixlong file) |
50 | writeFile (name ++".h") (fixC $ unlines $ map showC parsed) | 55 | writeFile (name ++".h") (fixC $ unlines $ map showC parsed) |
@@ -60,6 +65,10 @@ main = do | |||
60 | writeFile (upperFirst name ++ ".hs") mod | 65 | writeFile (upperFirst name ++ ".hs") mod |
61 | 66 | ||
62 | 67 | ||
68 | google name = "<http://www.google.com/search?q=" | ||
69 | ++name | ||
70 | ++"&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>" | ||
71 | |||
63 | modhead name = replicate 60 '-' ++ "\n" | 72 | modhead name = replicate 60 '-' ++ "\n" |
64 | ++"{- |\n" | 73 | ++"{- |\n" |
65 | ++"Module : GSL.Special."++upperFirst name++"\n" | 74 | ++"Module : GSL.Special."++upperFirst name++"\n" |
@@ -68,7 +77,9 @@ modhead name = replicate 60 '-' ++ "\n" | |||
68 | ++"Maintainer : Alberto Ruiz (aruiz at um dot es)\n" | 77 | ++"Maintainer : Alberto Ruiz (aruiz at um dot es)\n" |
69 | ++"Stability : provisional\n" | 78 | ++"Stability : provisional\n" |
70 | ++"Portability : uses ffi\n" | 79 | ++"Portability : uses ffi\n" |
71 | ++"\n\n\n-}\n" | 80 | ++"\nWrappers for selected functions described at:\n\n" |
81 | ++ google ( "gsl_sf_"++name++".h") | ||
82 | ++"\n\n-}\n" | ||
72 | ++ replicate 60 '-' ++ "\n\n" | 83 | ++ replicate 60 '-' ++ "\n\n" |
73 | 84 | ||
74 | upperFirst (x:xs) = toUpper x : xs | 85 | upperFirst (x:xs) = toUpper x : xs |
@@ -176,7 +187,10 @@ showHt (Pointer (s:ss)) = "Ptr "++toUpper s : ss | |||
176 | 187 | ||
177 | showHa (t,a) = showHt t | 188 | showHa (t,a) = showHt t |
178 | 189 | ||
179 | showFull hc h@(Header t n args) = "\n-- | wrapper for "++showC h++"\n"++ boiler h ++"\n" ++showH hc h | 190 | showFull hc h@(Header t n args) = "\n-- | wrapper for "++showC h |
191 | ++"\n--\n-- "++google n ++"\n" | ||
192 | ++ boiler h ++"\n" | ||
193 | ++showH hc h | ||
180 | 194 | ||
181 | fixmd1 = rep ("Gsl_mode_t","Precision") | 195 | fixmd1 = rep ("Gsl_mode_t","Precision") |
182 | fixmd2 = rep ("mode"," (precCode mode)") | 196 | fixmd2 = rep ("mode"," (precCode mode)") |
diff --git a/lib/GSL/Special/autoall.sh b/lib/GSL/Special/autoall.sh new file mode 100644 index 0000000..cb45957 --- /dev/null +++ b/lib/GSL/Special/autoall.sh | |||
@@ -0,0 +1,41 @@ | |||
1 | #!/bin/bash | ||
2 | |||
3 | #Airy.hs | ||
4 | # include Precision (..) in the export list | ||
5 | #Exp.hs | ||
6 | # remove extern inline definition, qualify name | ||
7 | #Coupling | ||
8 | # remove deprecated INCORRECT | ||
9 | #Trig.hs | ||
10 | # qualify names | ||
11 | #Legendre.hs | ||
12 | # remove extern inline | ||
13 | #Log.hs | ||
14 | # remove extern inline, qualify name | ||
15 | |||
16 | #runhaskell auto airy | ||
17 | runhaskell auto bessel | ||
18 | runhaskell auto clausen | ||
19 | runhaskell auto coulomb | ||
20 | #runhaskell auto coupling | ||
21 | runhaskell auto dawson | ||
22 | runhaskell auto debye | ||
23 | runhaskell auto dilog | ||
24 | runhaskell auto elementary | ||
25 | runhaskell auto ellint | ||
26 | runhaskell auto erf | ||
27 | #runhaskell auto exp | ||
28 | runhaskell auto expint | ||
29 | runhaskell auto fermi_dirac | ||
30 | runhaskell auto gamma | ||
31 | runhaskell auto gegenbauer | ||
32 | runhaskell auto hyperg | ||
33 | runhaskell auto laguerre | ||
34 | runhaskell auto lambert | ||
35 | #runhaskell auto legendre | ||
36 | #runhaskell auto log | ||
37 | runhaskell auto pow_int | ||
38 | runhaskell auto psi | ||
39 | runhaskell auto synchrotron | ||
40 | #runhaskell auto trig | ||
41 | runhaskell auto zeta \ No newline at end of file | ||
diff --git a/lib/GSL/Special/bessel.h b/lib/GSL/Special/bessel.h index fa166d1..5a2445d 100644 --- a/lib/GSL/Special/bessel.h +++ b/lib/GSL/Special/bessel.h | |||
@@ -81,6 +81,7 @@ int gsl_sf_bessel_Jnu_e(double nu,double x,double* result); | |||
81 | double gsl_sf_bessel_Jnu(double nu,double x); | 81 | double gsl_sf_bessel_Jnu(double nu,double x); |
82 | int gsl_sf_bessel_Ynu_e(double nu,double x,double* result); | 82 | int gsl_sf_bessel_Ynu_e(double nu,double x,double* result); |
83 | double gsl_sf_bessel_Ynu(double nu,double x); | 83 | double gsl_sf_bessel_Ynu(double nu,double x); |
84 | int gsl_sf_bessel_sequence_Jnu_e(double nu,int mode,size_t size,double* v); | ||
84 | int gsl_sf_bessel_Inu_scaled_e(double nu,double x,double* result); | 85 | int gsl_sf_bessel_Inu_scaled_e(double nu,double x,double* result); |
85 | double gsl_sf_bessel_Inu_scaled(double nu,double x); | 86 | double gsl_sf_bessel_Inu_scaled(double nu,double x); |
86 | int gsl_sf_bessel_Inu_e(double nu,double x,double* result); | 87 | int gsl_sf_bessel_Inu_e(double nu,double x,double* result); |
diff --git a/lib/GSL/Special/manual.txt b/lib/GSL/Special/manual.txt deleted file mode 100644 index 1391d06..0000000 --- a/lib/GSL/Special/manual.txt +++ /dev/null | |||
@@ -1,12 +0,0 @@ | |||
1 | Airy.hs | ||
2 | include Precision (..) in the export list | ||
3 | Exp.hs | ||
4 | remove extern inline definition, qualify name | ||
5 | Coupling | ||
6 | remove deprecated INCORRECT | ||
7 | Trig.hs | ||
8 | qualify names | ||
9 | Legendre.hs | ||
10 | remove extern inline | ||
11 | Log.hs | ||
12 | remove extern inline, qualify name | ||