diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Expint.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Expint.hs | 80 |
1 files changed, 56 insertions, 24 deletions
diff --git a/lib/Numeric/GSL/Special/Expint.hs b/lib/Numeric/GSL/Special/Expint.hs index fd92216..c70d28a 100644 --- a/lib/Numeric/GSL/Special/Expint.hs +++ b/lib/Numeric/GSL/Special/Expint.hs | |||
@@ -19,10 +19,14 @@ module Numeric.GSL.Special.Expint( | |||
19 | , expint_E1 | 19 | , expint_E1 |
20 | , expint_E2_e | 20 | , expint_E2_e |
21 | , expint_E2 | 21 | , expint_E2 |
22 | , expint_En_e | ||
23 | , expint_En | ||
22 | , expint_E1_scaled_e | 24 | , expint_E1_scaled_e |
23 | , expint_E1_scaled | 25 | , expint_E1_scaled |
24 | , expint_E2_scaled_e | 26 | , expint_E2_scaled_e |
25 | , expint_E2_scaled | 27 | , expint_E2_scaled |
28 | , expint_En_scaled_e | ||
29 | , expint_En_scaled | ||
26 | , expint_Ei_e | 30 | , expint_Ei_e |
27 | , expint_Ei | 31 | , expint_Ei |
28 | , expint_Ei_scaled_e | 32 | , expint_Ei_scaled_e |
@@ -50,165 +54,193 @@ import Numeric.GSL.Special.Internal | |||
50 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 54 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
51 | expint_E1_e :: Double -> (Double,Double) | 55 | expint_E1_e :: Double -> (Double,Double) |
52 | expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x | 56 | expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x |
53 | foreign import ccall "expint.h gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr () -> IO CInt | 57 | foreign import ccall "gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr () -> IO CInt |
54 | 58 | ||
55 | -- | wrapper for double gsl_sf_expint_E1(double x); | 59 | -- | wrapper for double gsl_sf_expint_E1(double x); |
56 | -- | 60 | -- |
57 | -- <http://www.google.com/search?q=gsl_sf_expint_E1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 61 | -- <http://www.google.com/search?q=gsl_sf_expint_E1&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
58 | expint_E1 :: Double -> Double | 62 | expint_E1 :: Double -> Double |
59 | expint_E1 = gsl_sf_expint_E1 | 63 | expint_E1 = gsl_sf_expint_E1 |
60 | foreign import ccall "expint.h gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> Double | 64 | foreign import ccall "gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> Double |
61 | 65 | ||
62 | -- | wrapper for int gsl_sf_expint_E2_e(double x,gsl_sf_result* result); | 66 | -- | wrapper for int gsl_sf_expint_E2_e(double x,gsl_sf_result* result); |
63 | -- | 67 | -- |
64 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 68 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
65 | expint_E2_e :: Double -> (Double,Double) | 69 | expint_E2_e :: Double -> (Double,Double) |
66 | expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x | 70 | expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x |
67 | foreign import ccall "expint.h gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr () -> IO CInt | 71 | foreign import ccall "gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr () -> IO CInt |
68 | 72 | ||
69 | -- | wrapper for double gsl_sf_expint_E2(double x); | 73 | -- | wrapper for double gsl_sf_expint_E2(double x); |
70 | -- | 74 | -- |
71 | -- <http://www.google.com/search?q=gsl_sf_expint_E2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 75 | -- <http://www.google.com/search?q=gsl_sf_expint_E2&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
72 | expint_E2 :: Double -> Double | 76 | expint_E2 :: Double -> Double |
73 | expint_E2 = gsl_sf_expint_E2 | 77 | expint_E2 = gsl_sf_expint_E2 |
74 | foreign import ccall "expint.h gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> Double | 78 | foreign import ccall "gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> Double |
79 | |||
80 | -- | wrapper for int gsl_sf_expint_En_e(int n,double x,gsl_sf_result* result); | ||
81 | -- | ||
82 | -- <http://www.google.com/search?q=gsl_sf_expint_En_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
83 | expint_En_e :: CInt -> Double -> (Double,Double) | ||
84 | expint_En_e n x = createSFR "expint_En_e" $ gsl_sf_expint_En_e n x | ||
85 | foreign import ccall "gsl_sf_expint_En_e" gsl_sf_expint_En_e :: CInt -> Double -> Ptr () -> IO CInt | ||
86 | |||
87 | -- | wrapper for double gsl_sf_expint_En(int n,double x); | ||
88 | -- | ||
89 | -- <http://www.google.com/search?q=gsl_sf_expint_En&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
90 | expint_En :: CInt -> Double -> Double | ||
91 | expint_En = gsl_sf_expint_En | ||
92 | foreign import ccall "gsl_sf_expint_En" gsl_sf_expint_En :: CInt -> Double -> Double | ||
75 | 93 | ||
76 | -- | wrapper for int gsl_sf_expint_E1_scaled_e(double x,gsl_sf_result* result); | 94 | -- | wrapper for int gsl_sf_expint_E1_scaled_e(double x,gsl_sf_result* result); |
77 | -- | 95 | -- |
78 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 96 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
79 | expint_E1_scaled_e :: Double -> (Double,Double) | 97 | expint_E1_scaled_e :: Double -> (Double,Double) |
80 | expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x | 98 | expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x |
81 | foreign import ccall "expint.h gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr () -> IO CInt | 99 | foreign import ccall "gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr () -> IO CInt |
82 | 100 | ||
83 | -- | wrapper for double gsl_sf_expint_E1_scaled(double x); | 101 | -- | wrapper for double gsl_sf_expint_E1_scaled(double x); |
84 | -- | 102 | -- |
85 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 103 | -- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
86 | expint_E1_scaled :: Double -> Double | 104 | expint_E1_scaled :: Double -> Double |
87 | expint_E1_scaled = gsl_sf_expint_E1_scaled | 105 | expint_E1_scaled = gsl_sf_expint_E1_scaled |
88 | foreign import ccall "expint.h gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled :: Double -> Double | 106 | foreign import ccall "gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled :: Double -> Double |
89 | 107 | ||
90 | -- | wrapper for int gsl_sf_expint_E2_scaled_e(double x,gsl_sf_result* result); | 108 | -- | wrapper for int gsl_sf_expint_E2_scaled_e(double x,gsl_sf_result* result); |
91 | -- | 109 | -- |
92 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 110 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
93 | expint_E2_scaled_e :: Double -> (Double,Double) | 111 | expint_E2_scaled_e :: Double -> (Double,Double) |
94 | expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x | 112 | expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x |
95 | foreign import ccall "expint.h gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr () -> IO CInt | 113 | foreign import ccall "gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr () -> IO CInt |
96 | 114 | ||
97 | -- | wrapper for double gsl_sf_expint_E2_scaled(double x); | 115 | -- | wrapper for double gsl_sf_expint_E2_scaled(double x); |
98 | -- | 116 | -- |
99 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 117 | -- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
100 | expint_E2_scaled :: Double -> Double | 118 | expint_E2_scaled :: Double -> Double |
101 | expint_E2_scaled = gsl_sf_expint_E2_scaled | 119 | expint_E2_scaled = gsl_sf_expint_E2_scaled |
102 | foreign import ccall "expint.h gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled :: Double -> Double | 120 | foreign import ccall "gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled :: Double -> Double |
121 | |||
122 | -- | wrapper for int gsl_sf_expint_En_scaled_e(int n,double x,gsl_sf_result* result); | ||
123 | -- | ||
124 | -- <http://www.google.com/search?q=gsl_sf_expint_En_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
125 | expint_En_scaled_e :: CInt -> Double -> (Double,Double) | ||
126 | expint_En_scaled_e n x = createSFR "expint_En_scaled_e" $ gsl_sf_expint_En_scaled_e n x | ||
127 | foreign import ccall "gsl_sf_expint_En_scaled_e" gsl_sf_expint_En_scaled_e :: CInt -> Double -> Ptr () -> IO CInt | ||
128 | |||
129 | -- | wrapper for double gsl_sf_expint_En_scaled(int n,double x); | ||
130 | -- | ||
131 | -- <http://www.google.com/search?q=gsl_sf_expint_En_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
132 | expint_En_scaled :: CInt -> Double -> Double | ||
133 | expint_En_scaled = gsl_sf_expint_En_scaled | ||
134 | foreign import ccall "gsl_sf_expint_En_scaled" gsl_sf_expint_En_scaled :: CInt -> Double -> Double | ||
103 | 135 | ||
104 | -- | wrapper for int gsl_sf_expint_Ei_e(double x,gsl_sf_result* result); | 136 | -- | wrapper for int gsl_sf_expint_Ei_e(double x,gsl_sf_result* result); |
105 | -- | 137 | -- |
106 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 138 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
107 | expint_Ei_e :: Double -> (Double,Double) | 139 | expint_Ei_e :: Double -> (Double,Double) |
108 | expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x | 140 | expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x |
109 | foreign import ccall "expint.h gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr () -> IO CInt | 141 | foreign import ccall "gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr () -> IO CInt |
110 | 142 | ||
111 | -- | wrapper for double gsl_sf_expint_Ei(double x); | 143 | -- | wrapper for double gsl_sf_expint_Ei(double x); |
112 | -- | 144 | -- |
113 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 145 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
114 | expint_Ei :: Double -> Double | 146 | expint_Ei :: Double -> Double |
115 | expint_Ei = gsl_sf_expint_Ei | 147 | expint_Ei = gsl_sf_expint_Ei |
116 | foreign import ccall "expint.h gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> Double | 148 | foreign import ccall "gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> Double |
117 | 149 | ||
118 | -- | wrapper for int gsl_sf_expint_Ei_scaled_e(double x,gsl_sf_result* result); | 150 | -- | wrapper for int gsl_sf_expint_Ei_scaled_e(double x,gsl_sf_result* result); |
119 | -- | 151 | -- |
120 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 152 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
121 | expint_Ei_scaled_e :: Double -> (Double,Double) | 153 | expint_Ei_scaled_e :: Double -> (Double,Double) |
122 | expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x | 154 | expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x |
123 | foreign import ccall "expint.h gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr () -> IO CInt | 155 | foreign import ccall "gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr () -> IO CInt |
124 | 156 | ||
125 | -- | wrapper for double gsl_sf_expint_Ei_scaled(double x); | 157 | -- | wrapper for double gsl_sf_expint_Ei_scaled(double x); |
126 | -- | 158 | -- |
127 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 159 | -- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
128 | expint_Ei_scaled :: Double -> Double | 160 | expint_Ei_scaled :: Double -> Double |
129 | expint_Ei_scaled = gsl_sf_expint_Ei_scaled | 161 | expint_Ei_scaled = gsl_sf_expint_Ei_scaled |
130 | foreign import ccall "expint.h gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled :: Double -> Double | 162 | foreign import ccall "gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled :: Double -> Double |
131 | 163 | ||
132 | -- | wrapper for int gsl_sf_Shi_e(double x,gsl_sf_result* result); | 164 | -- | wrapper for int gsl_sf_Shi_e(double x,gsl_sf_result* result); |
133 | -- | 165 | -- |
134 | -- <http://www.google.com/search?q=gsl_sf_Shi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 166 | -- <http://www.google.com/search?q=gsl_sf_Shi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
135 | shi_e :: Double -> (Double,Double) | 167 | shi_e :: Double -> (Double,Double) |
136 | shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x | 168 | shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x |
137 | foreign import ccall "expint.h gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr () -> IO CInt | 169 | foreign import ccall "gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr () -> IO CInt |
138 | 170 | ||
139 | -- | wrapper for double gsl_sf_Shi(double x); | 171 | -- | wrapper for double gsl_sf_Shi(double x); |
140 | -- | 172 | -- |
141 | -- <http://www.google.com/search?q=gsl_sf_Shi&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 173 | -- <http://www.google.com/search?q=gsl_sf_Shi&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
142 | shi :: Double -> Double | 174 | shi :: Double -> Double |
143 | shi = gsl_sf_Shi | 175 | shi = gsl_sf_Shi |
144 | foreign import ccall "expint.h gsl_sf_Shi" gsl_sf_Shi :: Double -> Double | 176 | foreign import ccall "gsl_sf_Shi" gsl_sf_Shi :: Double -> Double |
145 | 177 | ||
146 | -- | wrapper for int gsl_sf_Chi_e(double x,gsl_sf_result* result); | 178 | -- | wrapper for int gsl_sf_Chi_e(double x,gsl_sf_result* result); |
147 | -- | 179 | -- |
148 | -- <http://www.google.com/search?q=gsl_sf_Chi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 180 | -- <http://www.google.com/search?q=gsl_sf_Chi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
149 | chi_e :: Double -> (Double,Double) | 181 | chi_e :: Double -> (Double,Double) |
150 | chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x | 182 | chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x |
151 | foreign import ccall "expint.h gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr () -> IO CInt | 183 | foreign import ccall "gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr () -> IO CInt |
152 | 184 | ||
153 | -- | wrapper for double gsl_sf_Chi(double x); | 185 | -- | wrapper for double gsl_sf_Chi(double x); |
154 | -- | 186 | -- |
155 | -- <http://www.google.com/search?q=gsl_sf_Chi&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 187 | -- <http://www.google.com/search?q=gsl_sf_Chi&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
156 | chi :: Double -> Double | 188 | chi :: Double -> Double |
157 | chi = gsl_sf_Chi | 189 | chi = gsl_sf_Chi |
158 | foreign import ccall "expint.h gsl_sf_Chi" gsl_sf_Chi :: Double -> Double | 190 | foreign import ccall "gsl_sf_Chi" gsl_sf_Chi :: Double -> Double |
159 | 191 | ||
160 | -- | wrapper for int gsl_sf_expint_3_e(double x,gsl_sf_result* result); | 192 | -- | wrapper for int gsl_sf_expint_3_e(double x,gsl_sf_result* result); |
161 | -- | 193 | -- |
162 | -- <http://www.google.com/search?q=gsl_sf_expint_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 194 | -- <http://www.google.com/search?q=gsl_sf_expint_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
163 | expint_3_e :: Double -> (Double,Double) | 195 | expint_3_e :: Double -> (Double,Double) |
164 | expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x | 196 | expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x |
165 | foreign import ccall "expint.h gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr () -> IO CInt | 197 | foreign import ccall "gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr () -> IO CInt |
166 | 198 | ||
167 | -- | wrapper for double gsl_sf_expint_3(double x); | 199 | -- | wrapper for double gsl_sf_expint_3(double x); |
168 | -- | 200 | -- |
169 | -- <http://www.google.com/search?q=gsl_sf_expint_3&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 201 | -- <http://www.google.com/search?q=gsl_sf_expint_3&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
170 | expint_3 :: Double -> Double | 202 | expint_3 :: Double -> Double |
171 | expint_3 = gsl_sf_expint_3 | 203 | expint_3 = gsl_sf_expint_3 |
172 | foreign import ccall "expint.h gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Double | 204 | foreign import ccall "gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Double |
173 | 205 | ||
174 | -- | wrapper for int gsl_sf_Si_e(double x,gsl_sf_result* result); | 206 | -- | wrapper for int gsl_sf_Si_e(double x,gsl_sf_result* result); |
175 | -- | 207 | -- |
176 | -- <http://www.google.com/search?q=gsl_sf_Si_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 208 | -- <http://www.google.com/search?q=gsl_sf_Si_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
177 | si_e :: Double -> (Double,Double) | 209 | si_e :: Double -> (Double,Double) |
178 | si_e x = createSFR "si_e" $ gsl_sf_Si_e x | 210 | si_e x = createSFR "si_e" $ gsl_sf_Si_e x |
179 | foreign import ccall "expint.h gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr () -> IO CInt | 211 | foreign import ccall "gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr () -> IO CInt |
180 | 212 | ||
181 | -- | wrapper for double gsl_sf_Si(double x); | 213 | -- | wrapper for double gsl_sf_Si(double x); |
182 | -- | 214 | -- |
183 | -- <http://www.google.com/search?q=gsl_sf_Si&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 215 | -- <http://www.google.com/search?q=gsl_sf_Si&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
184 | si :: Double -> Double | 216 | si :: Double -> Double |
185 | si = gsl_sf_Si | 217 | si = gsl_sf_Si |
186 | foreign import ccall "expint.h gsl_sf_Si" gsl_sf_Si :: Double -> Double | 218 | foreign import ccall "gsl_sf_Si" gsl_sf_Si :: Double -> Double |
187 | 219 | ||
188 | -- | wrapper for int gsl_sf_Ci_e(double x,gsl_sf_result* result); | 220 | -- | wrapper for int gsl_sf_Ci_e(double x,gsl_sf_result* result); |
189 | -- | 221 | -- |
190 | -- <http://www.google.com/search?q=gsl_sf_Ci_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 222 | -- <http://www.google.com/search?q=gsl_sf_Ci_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
191 | ci_e :: Double -> (Double,Double) | 223 | ci_e :: Double -> (Double,Double) |
192 | ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x | 224 | ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x |
193 | foreign import ccall "expint.h gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr () -> IO CInt | 225 | foreign import ccall "gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr () -> IO CInt |
194 | 226 | ||
195 | -- | wrapper for double gsl_sf_Ci(double x); | 227 | -- | wrapper for double gsl_sf_Ci(double x); |
196 | -- | 228 | -- |
197 | -- <http://www.google.com/search?q=gsl_sf_Ci&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 229 | -- <http://www.google.com/search?q=gsl_sf_Ci&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
198 | ci :: Double -> Double | 230 | ci :: Double -> Double |
199 | ci = gsl_sf_Ci | 231 | ci = gsl_sf_Ci |
200 | foreign import ccall "expint.h gsl_sf_Ci" gsl_sf_Ci :: Double -> Double | 232 | foreign import ccall "gsl_sf_Ci" gsl_sf_Ci :: Double -> Double |
201 | 233 | ||
202 | -- | wrapper for int gsl_sf_atanint_e(double x,gsl_sf_result* result); | 234 | -- | wrapper for int gsl_sf_atanint_e(double x,gsl_sf_result* result); |
203 | -- | 235 | -- |
204 | -- <http://www.google.com/search?q=gsl_sf_atanint_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 236 | -- <http://www.google.com/search?q=gsl_sf_atanint_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
205 | atanint_e :: Double -> (Double,Double) | 237 | atanint_e :: Double -> (Double,Double) |
206 | atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x | 238 | atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x |
207 | foreign import ccall "expint.h gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr () -> IO CInt | 239 | foreign import ccall "gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr () -> IO CInt |
208 | 240 | ||
209 | -- | wrapper for double gsl_sf_atanint(double x); | 241 | -- | wrapper for double gsl_sf_atanint(double x); |
210 | -- | 242 | -- |
211 | -- <http://www.google.com/search?q=gsl_sf_atanint&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 243 | -- <http://www.google.com/search?q=gsl_sf_atanint&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
212 | atanint :: Double -> Double | 244 | atanint :: Double -> Double |
213 | atanint = gsl_sf_atanint | 245 | atanint = gsl_sf_atanint |
214 | foreign import ccall "expint.h gsl_sf_atanint" gsl_sf_atanint :: Double -> Double | 246 | foreign import ccall "gsl_sf_atanint" gsl_sf_atanint :: Double -> Double |