summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Expint.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Expint.hs')
-rw-r--r--lib/Numeric/GSL/Special/Expint.hs80
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>
51expint_E1_e :: Double -> (Double,Double) 55expint_E1_e :: Double -> (Double,Double)
52expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x 56expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x
53foreign import ccall "expint.h gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr () -> IO CInt 57foreign 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>
58expint_E1 :: Double -> Double 62expint_E1 :: Double -> Double
59expint_E1 = gsl_sf_expint_E1 63expint_E1 = gsl_sf_expint_E1
60foreign import ccall "expint.h gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> Double 64foreign 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>
65expint_E2_e :: Double -> (Double,Double) 69expint_E2_e :: Double -> (Double,Double)
66expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x 70expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x
67foreign import ccall "expint.h gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr () -> IO CInt 71foreign 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>
72expint_E2 :: Double -> Double 76expint_E2 :: Double -> Double
73expint_E2 = gsl_sf_expint_E2 77expint_E2 = gsl_sf_expint_E2
74foreign import ccall "expint.h gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> Double 78foreign 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>
83expint_En_e :: CInt -> Double -> (Double,Double)
84expint_En_e n x = createSFR "expint_En_e" $ gsl_sf_expint_En_e n x
85foreign 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>
90expint_En :: CInt -> Double -> Double
91expint_En = gsl_sf_expint_En
92foreign 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>
79expint_E1_scaled_e :: Double -> (Double,Double) 97expint_E1_scaled_e :: Double -> (Double,Double)
80expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x 98expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x
81foreign import ccall "expint.h gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr () -> IO CInt 99foreign 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>
86expint_E1_scaled :: Double -> Double 104expint_E1_scaled :: Double -> Double
87expint_E1_scaled = gsl_sf_expint_E1_scaled 105expint_E1_scaled = gsl_sf_expint_E1_scaled
88foreign import ccall "expint.h gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled :: Double -> Double 106foreign 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>
93expint_E2_scaled_e :: Double -> (Double,Double) 111expint_E2_scaled_e :: Double -> (Double,Double)
94expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x 112expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x
95foreign import ccall "expint.h gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr () -> IO CInt 113foreign 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>
100expint_E2_scaled :: Double -> Double 118expint_E2_scaled :: Double -> Double
101expint_E2_scaled = gsl_sf_expint_E2_scaled 119expint_E2_scaled = gsl_sf_expint_E2_scaled
102foreign import ccall "expint.h gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled :: Double -> Double 120foreign 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>
125expint_En_scaled_e :: CInt -> Double -> (Double,Double)
126expint_En_scaled_e n x = createSFR "expint_En_scaled_e" $ gsl_sf_expint_En_scaled_e n x
127foreign 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>
132expint_En_scaled :: CInt -> Double -> Double
133expint_En_scaled = gsl_sf_expint_En_scaled
134foreign 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>
107expint_Ei_e :: Double -> (Double,Double) 139expint_Ei_e :: Double -> (Double,Double)
108expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x 140expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x
109foreign import ccall "expint.h gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr () -> IO CInt 141foreign 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>
114expint_Ei :: Double -> Double 146expint_Ei :: Double -> Double
115expint_Ei = gsl_sf_expint_Ei 147expint_Ei = gsl_sf_expint_Ei
116foreign import ccall "expint.h gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> Double 148foreign 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>
121expint_Ei_scaled_e :: Double -> (Double,Double) 153expint_Ei_scaled_e :: Double -> (Double,Double)
122expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x 154expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x
123foreign import ccall "expint.h gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr () -> IO CInt 155foreign 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>
128expint_Ei_scaled :: Double -> Double 160expint_Ei_scaled :: Double -> Double
129expint_Ei_scaled = gsl_sf_expint_Ei_scaled 161expint_Ei_scaled = gsl_sf_expint_Ei_scaled
130foreign import ccall "expint.h gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled :: Double -> Double 162foreign 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>
135shi_e :: Double -> (Double,Double) 167shi_e :: Double -> (Double,Double)
136shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x 168shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x
137foreign import ccall "expint.h gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr () -> IO CInt 169foreign 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>
142shi :: Double -> Double 174shi :: Double -> Double
143shi = gsl_sf_Shi 175shi = gsl_sf_Shi
144foreign import ccall "expint.h gsl_sf_Shi" gsl_sf_Shi :: Double -> Double 176foreign 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>
149chi_e :: Double -> (Double,Double) 181chi_e :: Double -> (Double,Double)
150chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x 182chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x
151foreign import ccall "expint.h gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr () -> IO CInt 183foreign 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>
156chi :: Double -> Double 188chi :: Double -> Double
157chi = gsl_sf_Chi 189chi = gsl_sf_Chi
158foreign import ccall "expint.h gsl_sf_Chi" gsl_sf_Chi :: Double -> Double 190foreign 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>
163expint_3_e :: Double -> (Double,Double) 195expint_3_e :: Double -> (Double,Double)
164expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x 196expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x
165foreign import ccall "expint.h gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr () -> IO CInt 197foreign 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>
170expint_3 :: Double -> Double 202expint_3 :: Double -> Double
171expint_3 = gsl_sf_expint_3 203expint_3 = gsl_sf_expint_3
172foreign import ccall "expint.h gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Double 204foreign 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>
177si_e :: Double -> (Double,Double) 209si_e :: Double -> (Double,Double)
178si_e x = createSFR "si_e" $ gsl_sf_Si_e x 210si_e x = createSFR "si_e" $ gsl_sf_Si_e x
179foreign import ccall "expint.h gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr () -> IO CInt 211foreign 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>
184si :: Double -> Double 216si :: Double -> Double
185si = gsl_sf_Si 217si = gsl_sf_Si
186foreign import ccall "expint.h gsl_sf_Si" gsl_sf_Si :: Double -> Double 218foreign 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>
191ci_e :: Double -> (Double,Double) 223ci_e :: Double -> (Double,Double)
192ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x 224ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x
193foreign import ccall "expint.h gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr () -> IO CInt 225foreign 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>
198ci :: Double -> Double 230ci :: Double -> Double
199ci = gsl_sf_Ci 231ci = gsl_sf_Ci
200foreign import ccall "expint.h gsl_sf_Ci" gsl_sf_Ci :: Double -> Double 232foreign 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>
205atanint_e :: Double -> (Double,Double) 237atanint_e :: Double -> (Double,Double)
206atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x 238atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x
207foreign import ccall "expint.h gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr () -> IO CInt 239foreign 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>
212atanint :: Double -> Double 244atanint :: Double -> Double
213atanint = gsl_sf_atanint 245atanint = gsl_sf_atanint
214foreign import ccall "expint.h gsl_sf_atanint" gsl_sf_atanint :: Double -> Double 246foreign import ccall "gsl_sf_atanint" gsl_sf_atanint :: Double -> Double