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.hs25
1 files changed, 13 insertions, 12 deletions
diff --git a/lib/Numeric/GSL/Special/Expint.hs b/lib/Numeric/GSL/Special/Expint.hs
index 9882d09..fd92216 100644
--- a/lib/Numeric/GSL/Special/Expint.hs
+++ b/lib/Numeric/GSL/Special/Expint.hs
@@ -42,6 +42,7 @@ module Numeric.GSL.Special.Expint(
42) where 42) where
43 43
44import Foreign(Ptr) 44import Foreign(Ptr)
45import Foreign.C.Types(CInt)
45import Numeric.GSL.Special.Internal 46import Numeric.GSL.Special.Internal
46 47
47-- | wrapper for int gsl_sf_expint_E1_e(double x,gsl_sf_result* result); 48-- | wrapper for int gsl_sf_expint_E1_e(double x,gsl_sf_result* result);
@@ -49,7 +50,7 @@ import Numeric.GSL.Special.Internal
49-- <http://www.google.com/search?q=gsl_sf_expint_E1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 50-- <http://www.google.com/search?q=gsl_sf_expint_E1_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
50expint_E1_e :: Double -> (Double,Double) 51expint_E1_e :: Double -> (Double,Double)
51expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x 52expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x
52foreign import ccall "expint.h gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr Double -> IO(Int) 53foreign import ccall "expint.h gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr () -> IO CInt
53 54
54-- | wrapper for double gsl_sf_expint_E1(double x); 55-- | wrapper for double gsl_sf_expint_E1(double x);
55-- 56--
@@ -63,7 +64,7 @@ foreign import ccall "expint.h gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> D
63-- <http://www.google.com/search?q=gsl_sf_expint_E2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 64-- <http://www.google.com/search?q=gsl_sf_expint_E2_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
64expint_E2_e :: Double -> (Double,Double) 65expint_E2_e :: Double -> (Double,Double)
65expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x 66expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x
66foreign import ccall "expint.h gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr Double -> IO(Int) 67foreign import ccall "expint.h gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr () -> IO CInt
67 68
68-- | wrapper for double gsl_sf_expint_E2(double x); 69-- | wrapper for double gsl_sf_expint_E2(double x);
69-- 70--
@@ -77,7 +78,7 @@ foreign import ccall "expint.h gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> D
77-- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 78-- <http://www.google.com/search?q=gsl_sf_expint_E1_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
78expint_E1_scaled_e :: Double -> (Double,Double) 79expint_E1_scaled_e :: Double -> (Double,Double)
79expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x 80expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x
80foreign import ccall "expint.h gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr Double -> IO(Int) 81foreign import ccall "expint.h gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr () -> IO CInt
81 82
82-- | wrapper for double gsl_sf_expint_E1_scaled(double x); 83-- | wrapper for double gsl_sf_expint_E1_scaled(double x);
83-- 84--
@@ -91,7 +92,7 @@ foreign import ccall "expint.h gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled
91-- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 92-- <http://www.google.com/search?q=gsl_sf_expint_E2_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
92expint_E2_scaled_e :: Double -> (Double,Double) 93expint_E2_scaled_e :: Double -> (Double,Double)
93expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x 94expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x
94foreign import ccall "expint.h gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr Double -> IO(Int) 95foreign import ccall "expint.h gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr () -> IO CInt
95 96
96-- | wrapper for double gsl_sf_expint_E2_scaled(double x); 97-- | wrapper for double gsl_sf_expint_E2_scaled(double x);
97-- 98--
@@ -105,7 +106,7 @@ foreign import ccall "expint.h gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled
105-- <http://www.google.com/search?q=gsl_sf_expint_Ei_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 106-- <http://www.google.com/search?q=gsl_sf_expint_Ei_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
106expint_Ei_e :: Double -> (Double,Double) 107expint_Ei_e :: Double -> (Double,Double)
107expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x 108expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x
108foreign import ccall "expint.h gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr Double -> IO(Int) 109foreign import ccall "expint.h gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr () -> IO CInt
109 110
110-- | wrapper for double gsl_sf_expint_Ei(double x); 111-- | wrapper for double gsl_sf_expint_Ei(double x);
111-- 112--
@@ -119,7 +120,7 @@ foreign import ccall "expint.h gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> D
119-- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 120-- <http://www.google.com/search?q=gsl_sf_expint_Ei_scaled_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
120expint_Ei_scaled_e :: Double -> (Double,Double) 121expint_Ei_scaled_e :: Double -> (Double,Double)
121expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x 122expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x
122foreign import ccall "expint.h gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr Double -> IO(Int) 123foreign import ccall "expint.h gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr () -> IO CInt
123 124
124-- | wrapper for double gsl_sf_expint_Ei_scaled(double x); 125-- | wrapper for double gsl_sf_expint_Ei_scaled(double x);
125-- 126--
@@ -133,7 +134,7 @@ foreign import ccall "expint.h gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled
133-- <http://www.google.com/search?q=gsl_sf_Shi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 134-- <http://www.google.com/search?q=gsl_sf_Shi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
134shi_e :: Double -> (Double,Double) 135shi_e :: Double -> (Double,Double)
135shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x 136shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x
136foreign import ccall "expint.h gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr Double -> IO(Int) 137foreign import ccall "expint.h gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr () -> IO CInt
137 138
138-- | wrapper for double gsl_sf_Shi(double x); 139-- | wrapper for double gsl_sf_Shi(double x);
139-- 140--
@@ -147,7 +148,7 @@ foreign import ccall "expint.h gsl_sf_Shi" gsl_sf_Shi :: Double -> Double
147-- <http://www.google.com/search?q=gsl_sf_Chi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 148-- <http://www.google.com/search?q=gsl_sf_Chi_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
148chi_e :: Double -> (Double,Double) 149chi_e :: Double -> (Double,Double)
149chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x 150chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x
150foreign import ccall "expint.h gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr Double -> IO(Int) 151foreign import ccall "expint.h gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr () -> IO CInt
151 152
152-- | wrapper for double gsl_sf_Chi(double x); 153-- | wrapper for double gsl_sf_Chi(double x);
153-- 154--
@@ -161,7 +162,7 @@ foreign import ccall "expint.h gsl_sf_Chi" gsl_sf_Chi :: Double -> Double
161-- <http://www.google.com/search?q=gsl_sf_expint_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 162-- <http://www.google.com/search?q=gsl_sf_expint_3_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
162expint_3_e :: Double -> (Double,Double) 163expint_3_e :: Double -> (Double,Double)
163expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x 164expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x
164foreign import ccall "expint.h gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr Double -> IO(Int) 165foreign import ccall "expint.h gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr () -> IO CInt
165 166
166-- | wrapper for double gsl_sf_expint_3(double x); 167-- | wrapper for double gsl_sf_expint_3(double x);
167-- 168--
@@ -175,7 +176,7 @@ foreign import ccall "expint.h gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Dou
175-- <http://www.google.com/search?q=gsl_sf_Si_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 176-- <http://www.google.com/search?q=gsl_sf_Si_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
176si_e :: Double -> (Double,Double) 177si_e :: Double -> (Double,Double)
177si_e x = createSFR "si_e" $ gsl_sf_Si_e x 178si_e x = createSFR "si_e" $ gsl_sf_Si_e x
178foreign import ccall "expint.h gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr Double -> IO(Int) 179foreign import ccall "expint.h gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr () -> IO CInt
179 180
180-- | wrapper for double gsl_sf_Si(double x); 181-- | wrapper for double gsl_sf_Si(double x);
181-- 182--
@@ -189,7 +190,7 @@ foreign import ccall "expint.h gsl_sf_Si" gsl_sf_Si :: Double -> Double
189-- <http://www.google.com/search?q=gsl_sf_Ci_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 190-- <http://www.google.com/search?q=gsl_sf_Ci_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
190ci_e :: Double -> (Double,Double) 191ci_e :: Double -> (Double,Double)
191ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x 192ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x
192foreign import ccall "expint.h gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr Double -> IO(Int) 193foreign import ccall "expint.h gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr () -> IO CInt
193 194
194-- | wrapper for double gsl_sf_Ci(double x); 195-- | wrapper for double gsl_sf_Ci(double x);
195-- 196--
@@ -203,7 +204,7 @@ foreign import ccall "expint.h gsl_sf_Ci" gsl_sf_Ci :: Double -> Double
203-- <http://www.google.com/search?q=gsl_sf_atanint_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 204-- <http://www.google.com/search?q=gsl_sf_atanint_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
204atanint_e :: Double -> (Double,Double) 205atanint_e :: Double -> (Double,Double)
205atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x 206atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x
206foreign import ccall "expint.h gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr Double -> IO(Int) 207foreign import ccall "expint.h gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr () -> IO CInt
207 208
208-- | wrapper for double gsl_sf_atanint(double x); 209-- | wrapper for double gsl_sf_atanint(double x);
209-- 210--
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-09 21:10:17 +0000