summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--examples/devel/ej1/wrappers.hs4
-rw-r--r--examples/devel/ej2/wrappers.hs2
-rw-r--r--lib/Data/Packed/Internal/Common.hs4
-rw-r--r--lib/Data/Packed/Internal/Matrix.hs22
-rw-r--r--lib/Data/Packed/Internal/Vector.hs24
-rw-r--r--lib/Numeric/GSL.hs2
-rw-r--r--lib/Numeric/GSL/Differentiation.hs4
-rw-r--r--lib/Numeric/GSL/Fitting.hs2
-rw-r--r--lib/Numeric/GSL/Fourier.hs2
-rw-r--r--lib/Numeric/GSL/Integration.hs12
-rw-r--r--lib/Numeric/GSL/Internal.hs10
-rw-r--r--lib/Numeric/GSL/Minimization.hs4
-rw-r--r--lib/Numeric/GSL/ODE.hs2
-rw-r--r--lib/Numeric/GSL/Polynomials.hs2
-rw-r--r--lib/Numeric/GSL/Root.hs4
-rw-r--r--lib/Numeric/GSL/Vector.hs58
-rw-r--r--lib/Numeric/LinearAlgebra/LAPACK.hs64
-rw-r--r--packages/glpk/lib/Numeric/LinearProgramming.hs2
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Airy.hs48
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Bessel.hs202
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Clausen.hs4
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Coulomb.hs22
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Coupling.hs20
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Dawson.hs4
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Debye.hs24
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Dilog.hs10
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Elementary.hs6
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Ellint.hs48
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Elljac.hs2
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Erf.hs24
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Exp.hs38
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Expint.hs56
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs36
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Gamma.hs88
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Gegenbauer.hs18
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Hyperg.hs44
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Laguerre.hs16
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Lambert.hs8
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Legendre.hs88
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Log.hs18
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Pow_int.hs4
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Psi.hs26
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Synchrotron.hs8
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Transport.hs16
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Trig.hs50
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Zeta.hs28
-rwxr-xr-xpackages/special/lib/Numeric/GSL/Special/auto.hs2
47 files changed, 591 insertions, 591 deletions
diff --git a/examples/devel/ej1/wrappers.hs b/examples/devel/ej1/wrappers.hs
index b329464..a88f74b 100644
--- a/examples/devel/ej1/wrappers.hs
+++ b/examples/devel/ej1/wrappers.hs
@@ -15,7 +15,7 @@ main = do
15 15
16----------------------------------------------------- 16-----------------------------------------------------
17 17
18foreign import ccall "c_scale_vector" 18foreign import ccall unsafe "c_scale_vector"
19 cScaleVector :: Double -- scale 19 cScaleVector :: Double -- scale
20 -> CInt -> Ptr Double -- argument 20 -> CInt -> Ptr Double -- argument
21 -> CInt -> Ptr Double -- result 21 -> CInt -> Ptr Double -- result
@@ -29,7 +29,7 @@ myScale s x = unsafePerformIO $ do
29----------------------------------------------------- 29-----------------------------------------------------
30-- forcing row order 30-- forcing row order
31 31
32foreign import ccall "c_diag" 32foreign import ccall unsafe "c_diag"
33 cDiag :: CInt -> CInt -> Ptr Double -- argument 33 cDiag :: CInt -> CInt -> Ptr Double -- argument
34 -> CInt -> Ptr Double -- result1 34 -> CInt -> Ptr Double -- result1
35 -> CInt -> CInt -> Ptr Double -- result2 35 -> CInt -> CInt -> Ptr Double -- result2
diff --git a/examples/devel/ej2/wrappers.hs b/examples/devel/ej2/wrappers.hs
index 399c5a9..1c02a24 100644
--- a/examples/devel/ej2/wrappers.hs
+++ b/examples/devel/ej2/wrappers.hs
@@ -15,7 +15,7 @@ main = do
15----------------------------------------------------- 15-----------------------------------------------------
16-- arbitrary data order 16-- arbitrary data order
17 17
18foreign import ccall "c_diag" 18foreign import ccall unsafe "c_diag"
19 cDiag :: CInt -- matrix order 19 cDiag :: CInt -- matrix order
20 -> CInt -> CInt -> Ptr Double -- argument 20 -> CInt -> CInt -> Ptr Double -- argument
21 -> CInt -> Ptr Double -- result1 21 -> CInt -> Ptr Double -- result1
diff --git a/lib/Data/Packed/Internal/Common.hs b/lib/Data/Packed/Internal/Common.hs
index a8c3c3e..49f17b0 100644
--- a/lib/Data/Packed/Internal/Common.hs
+++ b/lib/Data/Packed/Internal/Common.hs
@@ -140,7 +140,7 @@ errorCode n = "code "++show n
140 140
141 141
142-- | clear the fpu 142-- | clear the fpu
143foreign import ccall "asm_finit" finit :: IO () 143foreign import ccall unsafe "asm_finit" finit :: IO ()
144 144
145-- | check the error code 145-- | check the error code
146check :: String -> IO CInt -> IO () 146check :: String -> IO CInt -> IO ()
@@ -158,7 +158,7 @@ check msg f = do
158 return () 158 return ()
159 159
160-- | description of GSL error codes 160-- | description of GSL error codes
161foreign import ccall "gsl_strerror" gsl_strerror :: CInt -> IO (Ptr CChar) 161foreign import ccall unsafe "gsl_strerror" gsl_strerror :: CInt -> IO (Ptr CChar)
162 162
163-- | Error capture and conversion to Maybe 163-- | Error capture and conversion to Maybe
164mbCatch :: IO x -> IO (Maybe x) 164mbCatch :: IO x -> IO (Maybe x)
diff --git a/lib/Data/Packed/Internal/Matrix.hs b/lib/Data/Packed/Internal/Matrix.hs
index 257e4fc..b8ed18d 100644
--- a/lib/Data/Packed/Internal/Matrix.hs
+++ b/lib/Data/Packed/Internal/Matrix.hs
@@ -331,11 +331,11 @@ transdataP c1 d c2 =
331 sz = sizeOf (d @> 0) 331 sz = sizeOf (d @> 0)
332 noneed = r1 == 1 || c1 == 1 332 noneed = r1 == 1 || c1 == 1
333 333
334foreign import ccall "transF" ctransF :: TFMFM 334foreign import ccall unsafe "transF" ctransF :: TFMFM
335foreign import ccall "transR" ctransR :: TMM 335foreign import ccall unsafe "transR" ctransR :: TMM
336foreign import ccall "transQ" ctransQ :: TQMQM 336foreign import ccall unsafe "transQ" ctransQ :: TQMQM
337foreign import ccall "transC" ctransC :: TCMCM 337foreign import ccall unsafe "transC" ctransC :: TCMCM
338foreign import ccall "transP" ctransP :: CInt -> CInt -> Ptr () -> CInt -> CInt -> CInt -> Ptr () -> CInt -> IO CInt 338foreign import ccall unsafe "transP" ctransP :: CInt -> CInt -> Ptr () -> CInt -> CInt -> CInt -> Ptr () -> CInt -> IO CInt
339 339
340---------------------------------------------------------------------- 340----------------------------------------------------------------------
341 341
@@ -358,19 +358,19 @@ constantAux fun x n = unsafePerformIO $ do
358 358
359constantF :: Float -> Int -> Vector Float 359constantF :: Float -> Int -> Vector Float
360constantF = constantAux cconstantF 360constantF = constantAux cconstantF
361foreign import ccall "constantF" cconstantF :: Ptr Float -> TF 361foreign import ccall unsafe "constantF" cconstantF :: Ptr Float -> TF
362 362
363constantR :: Double -> Int -> Vector Double 363constantR :: Double -> Int -> Vector Double
364constantR = constantAux cconstantR 364constantR = constantAux cconstantR
365foreign import ccall "constantR" cconstantR :: Ptr Double -> TV 365foreign import ccall unsafe "constantR" cconstantR :: Ptr Double -> TV
366 366
367constantQ :: Complex Float -> Int -> Vector (Complex Float) 367constantQ :: Complex Float -> Int -> Vector (Complex Float)
368constantQ = constantAux cconstantQ 368constantQ = constantAux cconstantQ
369foreign import ccall "constantQ" cconstantQ :: Ptr (Complex Float) -> TQV 369foreign import ccall unsafe "constantQ" cconstantQ :: Ptr (Complex Float) -> TQV
370 370
371constantC :: Complex Double -> Int -> Vector (Complex Double) 371constantC :: Complex Double -> Int -> Vector (Complex Double)
372constantC = constantAux cconstantC 372constantC = constantAux cconstantC
373foreign import ccall "constantC" cconstantC :: Ptr (Complex Double) -> TCV 373foreign import ccall unsafe "constantC" cconstantC :: Ptr (Complex Double) -> TCV
374 374
375constantP :: Storable a => a -> Int -> Vector a 375constantP :: Storable a => a -> Int -> Vector a
376constantP a n = unsafePerformIO $ do 376constantP a n = unsafePerformIO $ do
@@ -381,7 +381,7 @@ constantP a n = unsafePerformIO $ do
381 poke k a 381 poke k a
382 cconstantP (castPtr k) (fi n) (castPtr p) (fi sz) // check "constantP" 382 cconstantP (castPtr k) (fi n) (castPtr p) (fi sz) // check "constantP"
383 return v 383 return v
384foreign import ccall "constantP" cconstantP :: Ptr () -> CInt -> Ptr () -> CInt -> IO CInt 384foreign import ccall unsafe "constantP" cconstantP :: Ptr () -> CInt -> Ptr () -> CInt -> IO CInt
385 385
386---------------------------------------------------------------------- 386----------------------------------------------------------------------
387 387
@@ -427,7 +427,7 @@ saveMatrix filename fmt m = do
427 free charname 427 free charname
428 free charfmt 428 free charfmt
429 429
430foreign import ccall "matrix_fprintf" matrix_fprintf :: Ptr CChar -> Ptr CChar -> CInt -> TM 430foreign import ccall unsafe "matrix_fprintf" matrix_fprintf :: Ptr CChar -> Ptr CChar -> CInt -> TM
431 431
432---------------------------------------------------------------------- 432----------------------------------------------------------------------
433 433
diff --git a/lib/Data/Packed/Internal/Vector.hs b/lib/Data/Packed/Internal/Vector.hs
index 936479d..d3b80ff 100644
--- a/lib/Data/Packed/Internal/Vector.hs
+++ b/lib/Data/Packed/Internal/Vector.hs
@@ -308,8 +308,8 @@ double2FloatV v = unsafePerformIO $ do
308 return r 308 return r
309 309
310 310
311foreign import ccall "float2double" c_float2double:: TFV 311foreign import ccall unsafe "float2double" c_float2double:: TFV
312foreign import ccall "double2float" c_double2float:: TVF 312foreign import ccall unsafe "double2float" c_double2float:: TVF
313 313
314--------------------------------------------------------------- 314---------------------------------------------------------------
315 315
@@ -325,8 +325,8 @@ stepD v = unsafePerformIO $ do
325 app2 c_stepD vec v vec r "stepD" 325 app2 c_stepD vec v vec r "stepD"
326 return r 326 return r
327 327
328foreign import ccall "stepF" c_stepF :: TFF 328foreign import ccall unsafe "stepF" c_stepF :: TFF
329foreign import ccall "stepD" c_stepD :: TVV 329foreign import ccall unsafe "stepD" c_stepD :: TVV
330 330
331--------------------------------------------------------------- 331---------------------------------------------------------------
332 332
@@ -342,8 +342,8 @@ condD x y l e g = unsafePerformIO $ do
342 app6 c_condD vec x vec y vec l vec e vec g vec r "condD" 342 app6 c_condD vec x vec y vec l vec e vec g vec r "condD"
343 return r 343 return r
344 344
345foreign import ccall "condF" c_condF :: CInt -> PF -> CInt -> PF -> CInt -> PF -> TFFF 345foreign import ccall unsafe "condF" c_condF :: CInt -> PF -> CInt -> PF -> CInt -> PF -> TFFF
346foreign import ccall "condD" c_condD :: CInt -> PD -> CInt -> PD -> CInt -> PD -> TVVV 346foreign import ccall unsafe "condD" c_condD :: CInt -> PD -> CInt -> PD -> CInt -> PD -> TVVV
347 347
348-------------------------------------------------------------------------------- 348--------------------------------------------------------------------------------
349 349
@@ -354,11 +354,11 @@ conjugateAux fun x = unsafePerformIO $ do
354 354
355conjugateQ :: Vector (Complex Float) -> Vector (Complex Float) 355conjugateQ :: Vector (Complex Float) -> Vector (Complex Float)
356conjugateQ = conjugateAux c_conjugateQ 356conjugateQ = conjugateAux c_conjugateQ
357foreign import ccall "conjugateQ" c_conjugateQ :: TQVQV 357foreign import ccall unsafe "conjugateQ" c_conjugateQ :: TQVQV
358 358
359conjugateC :: Vector (Complex Double) -> Vector (Complex Double) 359conjugateC :: Vector (Complex Double) -> Vector (Complex Double)
360conjugateC = conjugateAux c_conjugateC 360conjugateC = conjugateAux c_conjugateC
361foreign import ccall "conjugateC" c_conjugateC :: TCVCV 361foreign import ccall unsafe "conjugateC" c_conjugateC :: TCVCV
362 362
363-------------------------------------------------------------------------------- 363--------------------------------------------------------------------------------
364 364
@@ -547,7 +547,7 @@ fscanfVector filename n = do
547 free charname 547 free charname
548 return res 548 return res
549 549
550foreign import ccall "vector_fscanf" gsl_vector_fscanf:: Ptr CChar -> TV 550foreign import ccall unsafe "vector_fscanf" gsl_vector_fscanf:: Ptr CChar -> TV
551 551
552-- | Saves the elements of a vector, with a given format (%f, %e, %g), to an ASCII file. 552-- | Saves the elements of a vector, with a given format (%f, %e, %g), to an ASCII file.
553fprintfVector :: FilePath -> String -> Vector Double -> IO () 553fprintfVector :: FilePath -> String -> Vector Double -> IO ()
@@ -558,7 +558,7 @@ fprintfVector filename fmt v = do
558 free charname 558 free charname
559 free charfmt 559 free charfmt
560 560
561foreign import ccall "vector_fprintf" gsl_vector_fprintf :: Ptr CChar -> Ptr CChar -> TV 561foreign import ccall unsafe "vector_fprintf" gsl_vector_fprintf :: Ptr CChar -> Ptr CChar -> TV
562 562
563-- | Loads a vector from a binary file (the number of elements must be known in advance). 563-- | Loads a vector from a binary file (the number of elements must be known in advance).
564freadVector :: FilePath -> Int -> IO (Vector Double) 564freadVector :: FilePath -> Int -> IO (Vector Double)
@@ -569,7 +569,7 @@ freadVector filename n = do
569 free charname 569 free charname
570 return res 570 return res
571 571
572foreign import ccall "vector_fread" gsl_vector_fread:: Ptr CChar -> TV 572foreign import ccall unsafe "vector_fread" gsl_vector_fread:: Ptr CChar -> TV
573 573
574-- | Saves the elements of a vector to a binary file. 574-- | Saves the elements of a vector to a binary file.
575fwriteVector :: FilePath -> Vector Double -> IO () 575fwriteVector :: FilePath -> Vector Double -> IO ()
@@ -578,5 +578,5 @@ fwriteVector filename v = do
578 app1 (gsl_vector_fwrite charname) vec v "gsl_vector_fwrite" 578 app1 (gsl_vector_fwrite charname) vec v "gsl_vector_fwrite"
579 free charname 579 free charname
580 580
581foreign import ccall "vector_fwrite" gsl_vector_fwrite :: Ptr CChar -> TV 581foreign import ccall unsafe "vector_fwrite" gsl_vector_fwrite :: Ptr CChar -> TV
582 582
diff --git a/lib/Numeric/GSL.hs b/lib/Numeric/GSL.hs
index e53022e..5f39a3e 100644
--- a/lib/Numeric/GSL.hs
+++ b/lib/Numeric/GSL.hs
@@ -40,4 +40,4 @@ import Data.Complex
40 40
41-- | This action removes the GSL default error handler (which aborts the program), so that 41-- | This action removes the GSL default error handler (which aborts the program), so that
42-- GSL errors can be handled by Haskell (using Control.Exception) and ghci doesn't abort. 42-- GSL errors can be handled by Haskell (using Control.Exception) and ghci doesn't abort.
43foreign import ccall "GSL/gsl-aux.h no_abort_on_error" setErrorHandlerOff :: IO () 43foreign import ccall unsafe "GSL/gsl-aux.h no_abort_on_error" setErrorHandlerOff :: IO ()
diff --git a/lib/Numeric/GSL/Differentiation.hs b/lib/Numeric/GSL/Differentiation.hs
index ab5eb50..d2a332c 100644
--- a/lib/Numeric/GSL/Differentiation.hs
+++ b/lib/Numeric/GSL/Differentiation.hs
@@ -48,7 +48,7 @@ derivGen c h f x = unsafePerformIO $ do
48 freeHaskellFunPtr fp 48 freeHaskellFunPtr fp
49 return result 49 return result
50 50
51foreign import ccall "gsl-aux.h deriv" 51foreign import ccall safe "gsl-aux.h deriv"
52 c_deriv :: CInt -> FunPtr (Double -> Ptr () -> Double) -> Double -> Double 52 c_deriv :: CInt -> FunPtr (Double -> Ptr () -> Double) -> Double -> Double
53 -> Ptr Double -> Ptr Double -> IO CInt 53 -> Ptr Double -> Ptr Double -> IO CInt
54 54
@@ -84,4 +84,4 @@ derivBackward = derivGen 2
84 84
85{- | conversion of Haskell functions into function pointers that can be used in the C side 85{- | conversion of Haskell functions into function pointers that can be used in the C side
86-} 86-}
87foreign import ccall "wrapper" mkfun:: (Double -> Ptr() -> Double) -> IO( FunPtr (Double -> Ptr() -> Double)) 87foreign import ccall safe "wrapper" mkfun:: (Double -> Ptr() -> Double) -> IO( FunPtr (Double -> Ptr() -> Double))
diff --git a/lib/Numeric/GSL/Fitting.hs b/lib/Numeric/GSL/Fitting.hs
index 79db23f..6343b76 100644
--- a/lib/Numeric/GSL/Fitting.hs
+++ b/lib/Numeric/GSL/Fitting.hs
@@ -90,7 +90,7 @@ nlFitGen m f jac xiv epsabs epsrel maxit = unsafePerformIO $ do
90 freeHaskellFunPtr jp 90 freeHaskellFunPtr jp
91 return (subVector 2 p sol, path) 91 return (subVector 2 p sol, path)
92 92
93foreign import ccall "nlfit" 93foreign import ccall safe "nlfit"
94 c_nlfit:: CInt -> FunPtr TVV -> FunPtr TVM -> Double -> Double -> CInt -> CInt -> TVM 94 c_nlfit:: CInt -> FunPtr TVV -> FunPtr TVM -> Double -> Double -> CInt -> CInt -> TVM
95 95
96------------------------------------------------------- 96-------------------------------------------------------
diff --git a/lib/Numeric/GSL/Fourier.hs b/lib/Numeric/GSL/Fourier.hs
index 71bc8a1..4ef19b3 100644
--- a/lib/Numeric/GSL/Fourier.hs
+++ b/lib/Numeric/GSL/Fourier.hs
@@ -30,7 +30,7 @@ genfft code v = unsafePerformIO $ do
30 app2 (c_fft code) vec v vec r "fft" 30 app2 (c_fft code) vec v vec r "fft"
31 return r 31 return r
32 32
33foreign import ccall "gsl-aux.h fft" c_fft :: CInt -> TCVCV 33foreign import ccall unsafe "gsl-aux.h fft" c_fft :: CInt -> TCVCV
34 34
35 35
36{- | Fast 1D Fourier transform of a 'Vector' @(@'Complex' 'Double'@)@ using /gsl_fft_complex_forward/. It uses the same scaling conventions as GNU Octave. 36{- | Fast 1D Fourier transform of a 'Vector' @(@'Complex' 'Double'@)@ using /gsl_fft_complex_forward/. It uses the same scaling conventions as GNU Octave.
diff --git a/lib/Numeric/GSL/Integration.hs b/lib/Numeric/GSL/Integration.hs
index 2330fc6..defbf80 100644
--- a/lib/Numeric/GSL/Integration.hs
+++ b/lib/Numeric/GSL/Integration.hs
@@ -32,7 +32,7 @@ import System.IO.Unsafe(unsafePerformIO)
32 32
33{- | conversion of Haskell functions into function pointers that can be used in the C side 33{- | conversion of Haskell functions into function pointers that can be used in the C side
34-} 34-}
35foreign import ccall "wrapper" mkfun:: (Double -> Ptr() -> Double) -> IO( FunPtr (Double -> Ptr() -> Double)) 35foreign import ccall safe "wrapper" mkfun:: (Double -> Ptr() -> Double) -> IO( FunPtr (Double -> Ptr() -> Double))
36 36
37-------------------------------------------------------------------- 37--------------------------------------------------------------------
38{- | Numerical integration using /gsl_integration_qags/ (adaptive integration with singularities). For example: 38{- | Numerical integration using /gsl_integration_qags/ (adaptive integration with singularities). For example:
@@ -63,7 +63,7 @@ integrateQAGS prec n f a b = unsafePerformIO $ do
63 freeHaskellFunPtr fp 63 freeHaskellFunPtr fp
64 return result 64 return result
65 65
66foreign import ccall "gsl-aux.h integrate_qags" 66foreign import ccall safe "gsl-aux.h integrate_qags"
67 c_integrate_qags :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> Double -> CInt 67 c_integrate_qags :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> Double -> CInt
68 -> Ptr Double -> Ptr Double -> IO CInt 68 -> Ptr Double -> Ptr Double -> IO CInt
69 69
@@ -94,7 +94,7 @@ integrateQNG prec f a b = unsafePerformIO $ do
94 freeHaskellFunPtr fp 94 freeHaskellFunPtr fp
95 return result 95 return result
96 96
97foreign import ccall "gsl-aux.h integrate_qng" 97foreign import ccall safe "gsl-aux.h integrate_qng"
98 c_integrate_qng :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> Double 98 c_integrate_qng :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> Double
99 -> Ptr Double -> Ptr Double -> IO CInt 99 -> Ptr Double -> Ptr Double -> IO CInt
100 100
@@ -126,7 +126,7 @@ integrateQAGI prec n f = unsafePerformIO $ do
126 freeHaskellFunPtr fp 126 freeHaskellFunPtr fp
127 return result 127 return result
128 128
129foreign import ccall "gsl-aux.h integrate_qagi" 129foreign import ccall safe "gsl-aux.h integrate_qagi"
130 c_integrate_qagi :: FunPtr (Double-> Ptr() -> Double) -> Double -> CInt 130 c_integrate_qagi :: FunPtr (Double-> Ptr() -> Double) -> Double -> CInt
131 -> Ptr Double -> Ptr Double -> IO CInt 131 -> Ptr Double -> Ptr Double -> IO CInt
132 132
@@ -159,7 +159,7 @@ integrateQAGIU prec n f a = unsafePerformIO $ do
159 freeHaskellFunPtr fp 159 freeHaskellFunPtr fp
160 return result 160 return result
161 161
162foreign import ccall "gsl-aux.h integrate_qagiu" 162foreign import ccall safe "gsl-aux.h integrate_qagiu"
163 c_integrate_qagiu :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> CInt 163 c_integrate_qagiu :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> CInt
164 -> Ptr Double -> Ptr Double -> IO CInt 164 -> Ptr Double -> Ptr Double -> IO CInt
165 165
@@ -192,7 +192,7 @@ integrateQAGIL prec n f b = unsafePerformIO $ do
192 freeHaskellFunPtr fp 192 freeHaskellFunPtr fp
193 return result 193 return result
194 194
195foreign import ccall "gsl-aux.h integrate_qagil" 195foreign import ccall safe "gsl-aux.h integrate_qagil"
196 c_integrate_qagil :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> CInt 196 c_integrate_qagil :: FunPtr (Double-> Ptr() -> Double) -> Double -> Double -> CInt
197 -> Ptr Double -> Ptr Double -> IO CInt 197 -> Ptr Double -> Ptr Double -> IO CInt
198 198
diff --git a/lib/Numeric/GSL/Internal.hs b/lib/Numeric/GSL/Internal.hs
index 303e7e1..84417ce 100644
--- a/lib/Numeric/GSL/Internal.hs
+++ b/lib/Numeric/GSL/Internal.hs
@@ -26,14 +26,14 @@ iv f n p = f (createV (fromIntegral n) copy "iv") where
26 return 0 26 return 0
27 27
28-- | conversion of Haskell functions into function pointers that can be used in the C side 28-- | conversion of Haskell functions into function pointers that can be used in the C side
29foreign import ccall "wrapper" 29foreign import ccall safe "wrapper"
30 mkVecfun :: (CInt -> Ptr Double -> Double) 30 mkVecfun :: (CInt -> Ptr Double -> Double)
31 -> IO( FunPtr (CInt -> Ptr Double -> Double)) 31 -> IO( FunPtr (CInt -> Ptr Double -> Double))
32 32
33foreign import ccall "wrapper" 33foreign import ccall safe "wrapper"
34 mkVecVecfun :: TVV -> IO (FunPtr TVV) 34 mkVecVecfun :: TVV -> IO (FunPtr TVV)
35 35
36foreign import ccall "wrapper" 36foreign import ccall safe "wrapper"
37 mkDoubleVecVecfun :: (Double -> TVV) -> IO (FunPtr (Double -> TVV)) 37 mkDoubleVecVecfun :: (Double -> TVV) -> IO (FunPtr (Double -> TVV))
38 38
39aux_vTov :: (Vector Double -> Vector Double) -> TVV 39aux_vTov :: (Vector Double -> Vector Double) -> TVV
@@ -46,10 +46,10 @@ aux_vTov f n p nr r = g where
46 g = do unsafeWith v $ \p' -> copyArray r p' (fromIntegral nr) 46 g = do unsafeWith v $ \p' -> copyArray r p' (fromIntegral nr)
47 return 0 47 return 0
48 48
49foreign import ccall "wrapper" 49foreign import ccall safe "wrapper"
50 mkVecMatfun :: TVM -> IO (FunPtr TVM) 50 mkVecMatfun :: TVM -> IO (FunPtr TVM)
51 51
52foreign import ccall "wrapper" 52foreign import ccall safe "wrapper"
53 mkDoubleVecMatfun :: (Double -> TVM) -> IO (FunPtr (Double -> TVM)) 53 mkDoubleVecMatfun :: (Double -> TVM) -> IO (FunPtr (Double -> TVM))
54 54
55aux_vTom :: (Vector Double -> Matrix Double) -> TVM 55aux_vTom :: (Vector Double -> Matrix Double) -> TVM
diff --git a/lib/Numeric/GSL/Minimization.hs b/lib/Numeric/GSL/Minimization.hs
index 88acfac..af85135 100644
--- a/lib/Numeric/GSL/Minimization.hs
+++ b/lib/Numeric/GSL/Minimization.hs
@@ -122,7 +122,7 @@ minimizeV method eps maxit szv f xiv = unsafePerformIO $ do
122 return (sol, path) 122 return (sol, path)
123 123
124 124
125foreign import ccall "gsl-aux.h minimize" 125foreign import ccall safe "gsl-aux.h minimize"
126 c_minimize:: CInt -> FunPtr (CInt -> Ptr Double -> Double) -> Double -> CInt -> TVVM 126 c_minimize:: CInt -> FunPtr (CInt -> Ptr Double -> Double) -> Double -> CInt -> TVVM
127 127
128---------------------------------------------------------------------------------- 128----------------------------------------------------------------------------------
@@ -179,7 +179,7 @@ minimizeVD method eps maxit istep tol f df xiv = unsafePerformIO $ do
179 freeHaskellFunPtr dfp 179 freeHaskellFunPtr dfp
180 return (sol,path) 180 return (sol,path)
181 181
182foreign import ccall "gsl-aux.h minimizeD" 182foreign import ccall safe "gsl-aux.h minimizeD"
183 c_minimizeD :: CInt 183 c_minimizeD :: CInt
184 -> FunPtr (CInt -> Ptr Double -> Double) 184 -> FunPtr (CInt -> Ptr Double -> Double)
185 -> FunPtr TVV 185 -> FunPtr TVV
diff --git a/lib/Numeric/GSL/ODE.hs b/lib/Numeric/GSL/ODE.hs
index c243f4b..3994210 100644
--- a/lib/Numeric/GSL/ODE.hs
+++ b/lib/Numeric/GSL/ODE.hs
@@ -116,7 +116,7 @@ odeSolveV' method mbjac h epsAbs epsRel f xiv ts = unsafePerformIO $ do
116 freeHaskellFunPtr fp 116 freeHaskellFunPtr fp
117 return sol 117 return sol
118 118
119foreign import ccall "ode" 119foreign import ccall safe "ode"
120 ode_c :: CInt -> Double -> Double -> Double -> FunPtr (Double -> TVV) -> FunPtr (Double -> TVM) -> TVVM 120 ode_c :: CInt -> Double -> Double -> Double -> FunPtr (Double -> TVV) -> FunPtr (Double -> TVM) -> TVVM
121 121
122------------------------------------------------------- 122-------------------------------------------------------
diff --git a/lib/Numeric/GSL/Polynomials.hs b/lib/Numeric/GSL/Polynomials.hs
index b21b1b6..694c003 100644
--- a/lib/Numeric/GSL/Polynomials.hs
+++ b/lib/Numeric/GSL/Polynomials.hs
@@ -55,4 +55,4 @@ polySolve' v | dim v > 1 = unsafePerformIO $ do
55 return r 55 return r
56 | otherwise = error "polySolve on a polynomial of degree zero" 56 | otherwise = error "polySolve on a polynomial of degree zero"
57 57
58foreign import ccall "gsl-aux.h polySolve" c_polySolve:: TVCV 58foreign import ccall unsafe "gsl-aux.h polySolve" c_polySolve:: TVCV
diff --git a/lib/Numeric/GSL/Root.hs b/lib/Numeric/GSL/Root.hs
index 41f7fb3..cd2982a 100644
--- a/lib/Numeric/GSL/Root.hs
+++ b/lib/Numeric/GSL/Root.hs
@@ -91,7 +91,7 @@ rootGen m f xi epsabs maxit = unsafePerformIO $ do
91 return (take n $ drop 1 sol, path) 91 return (take n $ drop 1 sol, path)
92 92
93 93
94foreign import ccall "root" 94foreign import ccall safe "root"
95 c_root:: CInt -> FunPtr TVV -> Double -> CInt -> TVM 95 c_root:: CInt -> FunPtr TVV -> Double -> CInt -> TVM
96 96
97------------------------------------------------------------------------- 97-------------------------------------------------------------------------
@@ -130,7 +130,7 @@ rootJGen m f jac xi epsabs maxit = unsafePerformIO $ do
130 return (take n $ drop 1 sol, path) 130 return (take n $ drop 1 sol, path)
131 131
132 132
133foreign import ccall "rootj" 133foreign import ccall safe "rootj"
134 c_rootj:: CInt -> FunPtr TVV -> FunPtr TVM -> Double -> CInt -> TVM 134 c_rootj:: CInt -> FunPtr TVV -> FunPtr TVM -> Double -> CInt -> TVM
135 135
136------------------------------------------------------- 136-------------------------------------------------------
diff --git a/lib/Numeric/GSL/Vector.hs b/lib/Numeric/GSL/Vector.hs
index b8c6d04..db34041 100644
--- a/lib/Numeric/GSL/Vector.hs
+++ b/lib/Numeric/GSL/Vector.hs
@@ -109,10 +109,10 @@ sumC x = unsafePerformIO $ do
109 app2 c_sumC vec x vec r "sumC" 109 app2 c_sumC vec x vec r "sumC"
110 return $ r @> 0 110 return $ r @> 0
111 111
112foreign import ccall safe "gsl-aux.h sumF" c_sumF :: TFF 112foreign import ccall unsafe "gsl-aux.h sumF" c_sumF :: TFF
113foreign import ccall safe "gsl-aux.h sumR" c_sumR :: TVV 113foreign import ccall unsafe "gsl-aux.h sumR" c_sumR :: TVV
114foreign import ccall safe "gsl-aux.h sumQ" c_sumQ :: TQVQV 114foreign import ccall unsafe "gsl-aux.h sumQ" c_sumQ :: TQVQV
115foreign import ccall safe "gsl-aux.h sumC" c_sumC :: TCVCV 115foreign import ccall unsafe "gsl-aux.h sumC" c_sumC :: TCVCV
116 116
117-- | product of elements 117-- | product of elements
118prodF :: Vector Float -> Float 118prodF :: Vector Float -> Float
@@ -142,10 +142,10 @@ prodC x = unsafePerformIO $ do
142 app2 c_prodC vec x vec r "prodC" 142 app2 c_prodC vec x vec r "prodC"
143 return $ r @> 0 143 return $ r @> 0
144 144
145foreign import ccall safe "gsl-aux.h prodF" c_prodF :: TFF 145foreign import ccall unsafe "gsl-aux.h prodF" c_prodF :: TFF
146foreign import ccall safe "gsl-aux.h prodR" c_prodR :: TVV 146foreign import ccall unsafe "gsl-aux.h prodR" c_prodR :: TVV
147foreign import ccall safe "gsl-aux.h prodQ" c_prodQ :: TQVQV 147foreign import ccall unsafe "gsl-aux.h prodQ" c_prodQ :: TQVQV
148foreign import ccall safe "gsl-aux.h prodC" c_prodC :: TCVCV 148foreign import ccall unsafe "gsl-aux.h prodC" c_prodC :: TCVCV
149 149
150-- | dot product 150-- | dot product
151dotF :: Vector Float -> Vector Float -> Float 151dotF :: Vector Float -> Vector Float -> Float
@@ -175,10 +175,10 @@ dotC x y = unsafePerformIO $ do
175 app3 c_dotC vec x vec y vec r "dotC" 175 app3 c_dotC vec x vec y vec r "dotC"
176 return $ r @> 0 176 return $ r @> 0
177 177
178foreign import ccall safe "gsl-aux.h dotF" c_dotF :: TFFF 178foreign import ccall unsafe "gsl-aux.h dotF" c_dotF :: TFFF
179foreign import ccall safe "gsl-aux.h dotR" c_dotR :: TVVV 179foreign import ccall unsafe "gsl-aux.h dotR" c_dotR :: TVVV
180foreign import ccall safe "gsl-aux.h dotQ" c_dotQ :: TQVQVQV 180foreign import ccall unsafe "gsl-aux.h dotQ" c_dotQ :: TQVQVQV
181foreign import ccall safe "gsl-aux.h dotC" c_dotC :: TCVCVCV 181foreign import ccall unsafe "gsl-aux.h dotC" c_dotC :: TCVCVCV
182 182
183------------------------------------------------------------------ 183------------------------------------------------------------------
184 184
@@ -210,25 +210,25 @@ vectorZipAux fun code u v = unsafePerformIO $ do
210toScalarR :: FunCodeS -> Vector Double -> Double 210toScalarR :: FunCodeS -> Vector Double -> Double
211toScalarR oper = toScalarAux c_toScalarR (fromei oper) 211toScalarR oper = toScalarAux c_toScalarR (fromei oper)
212 212
213foreign import ccall safe "gsl-aux.h toScalarR" c_toScalarR :: CInt -> TVV 213foreign import ccall unsafe "gsl-aux.h toScalarR" c_toScalarR :: CInt -> TVV
214 214
215-- | obtains different functions of a vector: norm1, norm2, max, min, posmax, posmin, etc. 215-- | obtains different functions of a vector: norm1, norm2, max, min, posmax, posmin, etc.
216toScalarF :: FunCodeS -> Vector Float -> Float 216toScalarF :: FunCodeS -> Vector Float -> Float
217toScalarF oper = toScalarAux c_toScalarF (fromei oper) 217toScalarF oper = toScalarAux c_toScalarF (fromei oper)
218 218
219foreign import ccall safe "gsl-aux.h toScalarF" c_toScalarF :: CInt -> TFF 219foreign import ccall unsafe "gsl-aux.h toScalarF" c_toScalarF :: CInt -> TFF
220 220
221-- | obtains different functions of a vector: only norm1, norm2 221-- | obtains different functions of a vector: only norm1, norm2
222toScalarC :: FunCodeS -> Vector (Complex Double) -> Double 222toScalarC :: FunCodeS -> Vector (Complex Double) -> Double
223toScalarC oper = toScalarAux c_toScalarC (fromei oper) 223toScalarC oper = toScalarAux c_toScalarC (fromei oper)
224 224
225foreign import ccall safe "gsl-aux.h toScalarC" c_toScalarC :: CInt -> TCVV 225foreign import ccall unsafe "gsl-aux.h toScalarC" c_toScalarC :: CInt -> TCVV
226 226
227-- | obtains different functions of a vector: only norm1, norm2 227-- | obtains different functions of a vector: only norm1, norm2
228toScalarQ :: FunCodeS -> Vector (Complex Float) -> Float 228toScalarQ :: FunCodeS -> Vector (Complex Float) -> Float
229toScalarQ oper = toScalarAux c_toScalarQ (fromei oper) 229toScalarQ oper = toScalarAux c_toScalarQ (fromei oper)
230 230
231foreign import ccall safe "gsl-aux.h toScalarQ" c_toScalarQ :: CInt -> TQVF 231foreign import ccall unsafe "gsl-aux.h toScalarQ" c_toScalarQ :: CInt -> TQVF
232 232
233------------------------------------------------------------------ 233------------------------------------------------------------------
234 234
@@ -236,25 +236,25 @@ foreign import ccall safe "gsl-aux.h toScalarQ" c_toScalarQ :: CInt -> TQVF
236vectorMapR :: FunCodeV -> Vector Double -> Vector Double 236vectorMapR :: FunCodeV -> Vector Double -> Vector Double
237vectorMapR = vectorMapAux c_vectorMapR 237vectorMapR = vectorMapAux c_vectorMapR
238 238
239foreign import ccall safe "gsl-aux.h mapR" c_vectorMapR :: CInt -> TVV 239foreign import ccall unsafe "gsl-aux.h mapR" c_vectorMapR :: CInt -> TVV
240 240
241-- | map of complex vectors with given function 241-- | map of complex vectors with given function
242vectorMapC :: FunCodeV -> Vector (Complex Double) -> Vector (Complex Double) 242vectorMapC :: FunCodeV -> Vector (Complex Double) -> Vector (Complex Double)
243vectorMapC oper = vectorMapAux c_vectorMapC (fromei oper) 243vectorMapC oper = vectorMapAux c_vectorMapC (fromei oper)
244 244
245foreign import ccall safe "gsl-aux.h mapC" c_vectorMapC :: CInt -> TCVCV 245foreign import ccall unsafe "gsl-aux.h mapC" c_vectorMapC :: CInt -> TCVCV
246 246
247-- | map of real vectors with given function 247-- | map of real vectors with given function
248vectorMapF :: FunCodeV -> Vector Float -> Vector Float 248vectorMapF :: FunCodeV -> Vector Float -> Vector Float
249vectorMapF = vectorMapAux c_vectorMapF 249vectorMapF = vectorMapAux c_vectorMapF
250 250
251foreign import ccall safe "gsl-aux.h mapF" c_vectorMapF :: CInt -> TFF 251foreign import ccall unsafe "gsl-aux.h mapF" c_vectorMapF :: CInt -> TFF
252 252
253-- | map of real vectors with given function 253-- | map of real vectors with given function
254vectorMapQ :: FunCodeV -> Vector (Complex Float) -> Vector (Complex Float) 254vectorMapQ :: FunCodeV -> Vector (Complex Float) -> Vector (Complex Float)
255vectorMapQ = vectorMapAux c_vectorMapQ 255vectorMapQ = vectorMapAux c_vectorMapQ
256 256
257foreign import ccall safe "gsl-aux.h mapQ" c_vectorMapQ :: CInt -> TQVQV 257foreign import ccall unsafe "gsl-aux.h mapQ" c_vectorMapQ :: CInt -> TQVQV
258 258
259------------------------------------------------------------------- 259-------------------------------------------------------------------
260 260
@@ -262,25 +262,25 @@ foreign import ccall safe "gsl-aux.h mapQ" c_vectorMapQ :: CInt -> TQVQV
262vectorMapValR :: FunCodeSV -> Double -> Vector Double -> Vector Double 262vectorMapValR :: FunCodeSV -> Double -> Vector Double -> Vector Double
263vectorMapValR oper = vectorMapValAux c_vectorMapValR (fromei oper) 263vectorMapValR oper = vectorMapValAux c_vectorMapValR (fromei oper)
264 264
265foreign import ccall safe "gsl-aux.h mapValR" c_vectorMapValR :: CInt -> Ptr Double -> TVV 265foreign import ccall unsafe "gsl-aux.h mapValR" c_vectorMapValR :: CInt -> Ptr Double -> TVV
266 266
267-- | map of complex vectors with given function 267-- | map of complex vectors with given function
268vectorMapValC :: FunCodeSV -> Complex Double -> Vector (Complex Double) -> Vector (Complex Double) 268vectorMapValC :: FunCodeSV -> Complex Double -> Vector (Complex Double) -> Vector (Complex Double)
269vectorMapValC = vectorMapValAux c_vectorMapValC 269vectorMapValC = vectorMapValAux c_vectorMapValC
270 270
271foreign import ccall safe "gsl-aux.h mapValC" c_vectorMapValC :: CInt -> Ptr (Complex Double) -> TCVCV 271foreign import ccall unsafe "gsl-aux.h mapValC" c_vectorMapValC :: CInt -> Ptr (Complex Double) -> TCVCV
272 272
273-- | map of real vectors with given function 273-- | map of real vectors with given function
274vectorMapValF :: FunCodeSV -> Float -> Vector Float -> Vector Float 274vectorMapValF :: FunCodeSV -> Float -> Vector Float -> Vector Float
275vectorMapValF oper = vectorMapValAux c_vectorMapValF (fromei oper) 275vectorMapValF oper = vectorMapValAux c_vectorMapValF (fromei oper)
276 276
277foreign import ccall safe "gsl-aux.h mapValF" c_vectorMapValF :: CInt -> Ptr Float -> TFF 277foreign import ccall unsafe "gsl-aux.h mapValF" c_vectorMapValF :: CInt -> Ptr Float -> TFF
278 278
279-- | map of complex vectors with given function 279-- | map of complex vectors with given function
280vectorMapValQ :: FunCodeSV -> Complex Float -> Vector (Complex Float) -> Vector (Complex Float) 280vectorMapValQ :: FunCodeSV -> Complex Float -> Vector (Complex Float) -> Vector (Complex Float)
281vectorMapValQ oper = vectorMapValAux c_vectorMapValQ (fromei oper) 281vectorMapValQ oper = vectorMapValAux c_vectorMapValQ (fromei oper)
282 282
283foreign import ccall safe "gsl-aux.h mapValQ" c_vectorMapValQ :: CInt -> Ptr (Complex Float) -> TQVQV 283foreign import ccall unsafe "gsl-aux.h mapValQ" c_vectorMapValQ :: CInt -> Ptr (Complex Float) -> TQVQV
284 284
285------------------------------------------------------------------- 285-------------------------------------------------------------------
286 286
@@ -288,25 +288,25 @@ foreign import ccall safe "gsl-aux.h mapValQ" c_vectorMapValQ :: CInt -> Ptr (Co
288vectorZipR :: FunCodeVV -> Vector Double -> Vector Double -> Vector Double 288vectorZipR :: FunCodeVV -> Vector Double -> Vector Double -> Vector Double
289vectorZipR = vectorZipAux c_vectorZipR 289vectorZipR = vectorZipAux c_vectorZipR
290 290
291foreign import ccall safe "gsl-aux.h zipR" c_vectorZipR :: CInt -> TVVV 291foreign import ccall unsafe "gsl-aux.h zipR" c_vectorZipR :: CInt -> TVVV
292 292
293-- | elementwise operation on complex vectors 293-- | elementwise operation on complex vectors
294vectorZipC :: FunCodeVV -> Vector (Complex Double) -> Vector (Complex Double) -> Vector (Complex Double) 294vectorZipC :: FunCodeVV -> Vector (Complex Double) -> Vector (Complex Double) -> Vector (Complex Double)
295vectorZipC = vectorZipAux c_vectorZipC 295vectorZipC = vectorZipAux c_vectorZipC
296 296
297foreign import ccall safe "gsl-aux.h zipC" c_vectorZipC :: CInt -> TCVCVCV 297foreign import ccall unsafe "gsl-aux.h zipC" c_vectorZipC :: CInt -> TCVCVCV
298 298
299-- | elementwise operation on real vectors 299-- | elementwise operation on real vectors
300vectorZipF :: FunCodeVV -> Vector Float -> Vector Float -> Vector Float 300vectorZipF :: FunCodeVV -> Vector Float -> Vector Float -> Vector Float
301vectorZipF = vectorZipAux c_vectorZipF 301vectorZipF = vectorZipAux c_vectorZipF
302 302
303foreign import ccall safe "gsl-aux.h zipF" c_vectorZipF :: CInt -> TFFF 303foreign import ccall unsafe "gsl-aux.h zipF" c_vectorZipF :: CInt -> TFFF
304 304
305-- | elementwise operation on complex vectors 305-- | elementwise operation on complex vectors
306vectorZipQ :: FunCodeVV -> Vector (Complex Float) -> Vector (Complex Float) -> Vector (Complex Float) 306vectorZipQ :: FunCodeVV -> Vector (Complex Float) -> Vector (Complex Float) -> Vector (Complex Float)
307vectorZipQ = vectorZipAux c_vectorZipQ 307vectorZipQ = vectorZipAux c_vectorZipQ
308 308
309foreign import ccall safe "gsl-aux.h zipQ" c_vectorZipQ :: CInt -> TQVQVQV 309foreign import ccall unsafe "gsl-aux.h zipQ" c_vectorZipQ :: CInt -> TQVQVQV
310 310
311----------------------------------------------------------------------- 311-----------------------------------------------------------------------
312 312
@@ -324,4 +324,4 @@ randomVector seed dist n = unsafePerformIO $ do
324 app1 (c_random_vector (fi seed) ((fi.fromEnum) dist)) vec r "randomVector" 324 app1 (c_random_vector (fi seed) ((fi.fromEnum) dist)) vec r "randomVector"
325 return r 325 return r
326 326
327foreign import ccall safe "random_vector" c_random_vector :: CInt -> CInt -> TV 327foreign import ccall unsafe "random_vector" c_random_vector :: CInt -> CInt -> TV
diff --git a/lib/Numeric/LinearAlgebra/LAPACK.hs b/lib/Numeric/LinearAlgebra/LAPACK.hs
index 7ad58e1..9bc6669 100644
--- a/lib/Numeric/LinearAlgebra/LAPACK.hs
+++ b/lib/Numeric/LinearAlgebra/LAPACK.hs
@@ -53,10 +53,10 @@ import System.IO.Unsafe(unsafePerformIO)
53 53
54----------------------------------------------------------------------------------- 54-----------------------------------------------------------------------------------
55 55
56foreign import ccall "multiplyR" dgemmc :: CInt -> CInt -> TMMM 56foreign import ccall unsafe "multiplyR" dgemmc :: CInt -> CInt -> TMMM
57foreign import ccall "multiplyC" zgemmc :: CInt -> CInt -> TCMCMCM 57foreign import ccall unsafe "multiplyC" zgemmc :: CInt -> CInt -> TCMCMCM
58foreign import ccall "multiplyF" sgemmc :: CInt -> CInt -> TFMFMFM 58foreign import ccall unsafe "multiplyF" sgemmc :: CInt -> CInt -> TFMFMFM
59foreign import ccall "multiplyQ" cgemmc :: CInt -> CInt -> TQMQMQM 59foreign import ccall unsafe "multiplyQ" cgemmc :: CInt -> CInt -> TQMQMQM
60 60
61isT Matrix{order = ColumnMajor} = 0 61isT Matrix{order = ColumnMajor} = 0
62isT Matrix{order = RowMajor} = 1 62isT Matrix{order = RowMajor} = 1
@@ -88,10 +88,10 @@ multiplyQ :: Matrix (Complex Float) -> Matrix (Complex Float) -> Matrix (Complex
88multiplyQ a b = multiplyAux cgemmc "cgemmc" a b 88multiplyQ a b = multiplyAux cgemmc "cgemmc" a b
89 89
90----------------------------------------------------------------------------- 90-----------------------------------------------------------------------------
91foreign import ccall "svd_l_R" dgesvd :: TMMVM 91foreign import ccall unsafe "svd_l_R" dgesvd :: TMMVM
92foreign import ccall "svd_l_C" zgesvd :: TCMCMVCM 92foreign import ccall unsafe "svd_l_C" zgesvd :: TCMCMVCM
93foreign import ccall "svd_l_Rdd" dgesdd :: TMMVM 93foreign import ccall unsafe "svd_l_Rdd" dgesdd :: TMMVM
94foreign import ccall "svd_l_Cdd" zgesdd :: TCMCMVCM 94foreign import ccall unsafe "svd_l_Cdd" zgesdd :: TCMCMVCM
95 95
96-- | Full SVD of a real matrix using LAPACK's /dgesvd/. 96-- | Full SVD of a real matrix using LAPACK's /dgesvd/.
97svdR :: Matrix Double -> (Matrix Double, Vector Double, Matrix Double) 97svdR :: Matrix Double -> (Matrix Double, Vector Double, Matrix Double)
@@ -211,10 +211,10 @@ leftSVAux f st x = unsafePerformIO $ do
211 211
212----------------------------------------------------------------------------- 212-----------------------------------------------------------------------------
213 213
214foreign import ccall "LAPACK/lapack-aux.h eig_l_R" dgeev :: TMMCVM 214foreign import ccall unsafe "LAPACK/lapack-aux.h eig_l_R" dgeev :: TMMCVM
215foreign import ccall "LAPACK/lapack-aux.h eig_l_C" zgeev :: TCMCMCVCM 215foreign import ccall unsafe "LAPACK/lapack-aux.h eig_l_C" zgeev :: TCMCMCVCM
216foreign import ccall "LAPACK/lapack-aux.h eig_l_S" dsyev :: CInt -> TMVM 216foreign import ccall unsafe "LAPACK/lapack-aux.h eig_l_S" dsyev :: CInt -> TMVM
217foreign import ccall "LAPACK/lapack-aux.h eig_l_H" zheev :: CInt -> TCMVCM 217foreign import ccall unsafe "LAPACK/lapack-aux.h eig_l_H" zheev :: CInt -> TCMVCM
218 218
219eigAux f st m = unsafePerformIO $ do 219eigAux f st m = unsafePerformIO $ do
220 l <- createVector r 220 l <- createVector r
@@ -325,10 +325,10 @@ eigOnlyH = vrev . fst. eigSHAux (zheev 1) "eigH'" . fmat
325vrev = flatten . flipud . reshape 1 325vrev = flatten . flipud . reshape 1
326 326
327----------------------------------------------------------------------------- 327-----------------------------------------------------------------------------
328foreign import ccall "linearSolveR_l" dgesv :: TMMM 328foreign import ccall unsafe "linearSolveR_l" dgesv :: TMMM
329foreign import ccall "linearSolveC_l" zgesv :: TCMCMCM 329foreign import ccall unsafe "linearSolveC_l" zgesv :: TCMCMCM
330foreign import ccall "cholSolveR_l" dpotrs :: TMMM 330foreign import ccall unsafe "cholSolveR_l" dpotrs :: TMMM
331foreign import ccall "cholSolveC_l" zpotrs :: TCMCMCM 331foreign import ccall unsafe "cholSolveC_l" zpotrs :: TCMCMCM
332 332
333linearSolveSQAux f st a b 333linearSolveSQAux f st a b
334 | n1==n2 && n1==r = unsafePerformIO $ do 334 | n1==n2 && n1==r = unsafePerformIO $ do
@@ -359,10 +359,10 @@ cholSolveC :: Matrix (Complex Double) -> Matrix (Complex Double) -> Matrix (Comp
359cholSolveC a b = linearSolveSQAux zpotrs "cholSolveC" (fmat a) (fmat b) 359cholSolveC a b = linearSolveSQAux zpotrs "cholSolveC" (fmat a) (fmat b)
360 360
361----------------------------------------------------------------------------------- 361-----------------------------------------------------------------------------------
362foreign import ccall "LAPACK/lapack-aux.h linearSolveLSR_l" dgels :: TMMM 362foreign import ccall unsafe "LAPACK/lapack-aux.h linearSolveLSR_l" dgels :: TMMM
363foreign import ccall "LAPACK/lapack-aux.h linearSolveLSC_l" zgels :: TCMCMCM 363foreign import ccall unsafe "LAPACK/lapack-aux.h linearSolveLSC_l" zgels :: TCMCMCM
364foreign import ccall "LAPACK/lapack-aux.h linearSolveSVDR_l" dgelss :: Double -> TMMM 364foreign import ccall unsafe "LAPACK/lapack-aux.h linearSolveSVDR_l" dgelss :: Double -> TMMM
365foreign import ccall "LAPACK/lapack-aux.h linearSolveSVDC_l" zgelss :: Double -> TCMCMCM 365foreign import ccall unsafe "LAPACK/lapack-aux.h linearSolveSVDC_l" zgelss :: Double -> TCMCMCM
366 366
367linearSolveAux f st a b = unsafePerformIO $ do 367linearSolveAux f st a b = unsafePerformIO $ do
368 r <- createMatrix ColumnMajor (max m n) nrhs 368 r <- createMatrix ColumnMajor (max m n) nrhs
@@ -401,8 +401,8 @@ linearSolveSVDC (Just rcond) a b = subMatrix (0,0) (cols a, cols b) $
401linearSolveSVDC Nothing a b = linearSolveSVDC (Just (-1)) (fmat a) (fmat b) 401linearSolveSVDC Nothing a b = linearSolveSVDC (Just (-1)) (fmat a) (fmat b)
402 402
403----------------------------------------------------------------------------------- 403-----------------------------------------------------------------------------------
404foreign import ccall "LAPACK/lapack-aux.h chol_l_H" zpotrf :: TCMCM 404foreign import ccall unsafe "LAPACK/lapack-aux.h chol_l_H" zpotrf :: TCMCM
405foreign import ccall "LAPACK/lapack-aux.h chol_l_S" dpotrf :: TMM 405foreign import ccall unsafe "LAPACK/lapack-aux.h chol_l_S" dpotrf :: TMM
406 406
407cholAux f st a = do 407cholAux f st a = do
408 r <- createMatrix ColumnMajor n n 408 r <- createMatrix ColumnMajor n n
@@ -427,8 +427,8 @@ mbCholS :: Matrix Double -> Maybe (Matrix Double)
427mbCholS = unsafePerformIO . mbCatch . cholAux dpotrf "cholS" . fmat 427mbCholS = unsafePerformIO . mbCatch . cholAux dpotrf "cholS" . fmat
428 428
429----------------------------------------------------------------------------------- 429-----------------------------------------------------------------------------------
430foreign import ccall "LAPACK/lapack-aux.h qr_l_R" dgeqr2 :: TMVM 430foreign import ccall unsafe "LAPACK/lapack-aux.h qr_l_R" dgeqr2 :: TMVM
431foreign import ccall "LAPACK/lapack-aux.h qr_l_C" zgeqr2 :: TCMCVCM 431foreign import ccall unsafe "LAPACK/lapack-aux.h qr_l_C" zgeqr2 :: TCMCVCM
432 432
433-- | QR factorization of a real matrix, using LAPACK's /dgeqr2/. 433-- | QR factorization of a real matrix, using LAPACK's /dgeqr2/.
434qrR :: Matrix Double -> (Matrix Double, Vector Double) 434qrR :: Matrix Double -> (Matrix Double, Vector Double)
@@ -448,8 +448,8 @@ qrAux f st a = unsafePerformIO $ do
448 mn = min m n 448 mn = min m n
449 449
450----------------------------------------------------------------------------------- 450-----------------------------------------------------------------------------------
451foreign import ccall "LAPACK/lapack-aux.h hess_l_R" dgehrd :: TMVM 451foreign import ccall unsafe "LAPACK/lapack-aux.h hess_l_R" dgehrd :: TMVM
452foreign import ccall "LAPACK/lapack-aux.h hess_l_C" zgehrd :: TCMCVCM 452foreign import ccall unsafe "LAPACK/lapack-aux.h hess_l_C" zgehrd :: TCMCVCM
453 453
454-- | Hessenberg factorization of a square real matrix, using LAPACK's /dgehrd/. 454-- | Hessenberg factorization of a square real matrix, using LAPACK's /dgehrd/.
455hessR :: Matrix Double -> (Matrix Double, Vector Double) 455hessR :: Matrix Double -> (Matrix Double, Vector Double)
@@ -469,8 +469,8 @@ hessAux f st a = unsafePerformIO $ do
469 mn = min m n 469 mn = min m n
470 470
471----------------------------------------------------------------------------------- 471-----------------------------------------------------------------------------------
472foreign import ccall "LAPACK/lapack-aux.h schur_l_R" dgees :: TMMM 472foreign import ccall unsafe "LAPACK/lapack-aux.h schur_l_R" dgees :: TMMM
473foreign import ccall "LAPACK/lapack-aux.h schur_l_C" zgees :: TCMCMCM 473foreign import ccall unsafe "LAPACK/lapack-aux.h schur_l_C" zgees :: TCMCMCM
474 474
475-- | Schur factorization of a square real matrix, using LAPACK's /dgees/. 475-- | Schur factorization of a square real matrix, using LAPACK's /dgees/.
476schurR :: Matrix Double -> (Matrix Double, Matrix Double) 476schurR :: Matrix Double -> (Matrix Double, Matrix Double)
@@ -488,8 +488,8 @@ schurAux f st a = unsafePerformIO $ do
488 where n = rows a 488 where n = rows a
489 489
490----------------------------------------------------------------------------------- 490-----------------------------------------------------------------------------------
491foreign import ccall "LAPACK/lapack-aux.h lu_l_R" dgetrf :: TMVM 491foreign import ccall unsafe "LAPACK/lapack-aux.h lu_l_R" dgetrf :: TMVM
492foreign import ccall "LAPACK/lapack-aux.h lu_l_C" zgetrf :: TCMVCM 492foreign import ccall unsafe "LAPACK/lapack-aux.h lu_l_C" zgetrf :: TCMVCM
493 493
494-- | LU factorization of a general real matrix, using LAPACK's /dgetrf/. 494-- | LU factorization of a general real matrix, using LAPACK's /dgetrf/.
495luR :: Matrix Double -> (Matrix Double, [Int]) 495luR :: Matrix Double -> (Matrix Double, [Int])
@@ -511,8 +511,8 @@ luAux f st a = unsafePerformIO $ do
511type TW a = CInt -> PD -> a 511type TW a = CInt -> PD -> a
512type TQ a = CInt -> CInt -> PC -> a 512type TQ a = CInt -> CInt -> PC -> a
513 513
514foreign import ccall "LAPACK/lapack-aux.h luS_l_R" dgetrs :: TMVMM 514foreign import ccall unsafe "LAPACK/lapack-aux.h luS_l_R" dgetrs :: TMVMM
515foreign import ccall "LAPACK/lapack-aux.h luS_l_C" zgetrs :: TQ (TW (TQ (TQ (IO CInt)))) 515foreign import ccall unsafe "LAPACK/lapack-aux.h luS_l_C" zgetrs :: TQ (TW (TQ (TQ (IO CInt))))
516 516
517-- | Solve a real linear system from a precomputed LU decomposition ('luR'), using LAPACK's /dgetrs/. 517-- | Solve a real linear system from a precomputed LU decomposition ('luR'), using LAPACK's /dgetrs/.
518lusR :: Matrix Double -> [Int] -> Matrix Double -> Matrix Double 518lusR :: Matrix Double -> [Int] -> Matrix Double -> Matrix Double
diff --git a/packages/glpk/lib/Numeric/LinearProgramming.hs b/packages/glpk/lib/Numeric/LinearProgramming.hs
index b832bac..6a3e186 100644
--- a/packages/glpk/lib/Numeric/LinearProgramming.hs
+++ b/packages/glpk/lib/Numeric/LinearProgramming.hs
@@ -214,7 +214,7 @@ mkConstrS n objfun b1 = fromLists (ob ++ co) where
214 214
215----------------------------------------------------- 215-----------------------------------------------------
216 216
217foreign import ccall "c_simplex_sparse" c_simplex_sparse 217foreign import ccall unsafe "c_simplex_sparse" c_simplex_sparse
218 :: CInt -> CInt -- rows and cols 218 :: CInt -> CInt -- rows and cols
219 -> CInt -> CInt -> Ptr Double -- coeffs 219 -> CInt -> CInt -> Ptr Double -- coeffs
220 -> CInt -> CInt -> Ptr Double -- bounds 220 -> CInt -> CInt -> Ptr Double -- bounds
diff --git a/packages/special/lib/Numeric/GSL/Special/Airy.hs b/packages/special/lib/Numeric/GSL/Special/Airy.hs
index 737de7c..e2009e4 100644
--- a/packages/special/lib/Numeric/GSL/Special/Airy.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Airy.hs
@@ -46,96 +46,96 @@ import Numeric.GSL.Special.Internal
46 46
47airy_Ai_e :: Double -> Precision -> (Double,Double) 47airy_Ai_e :: Double -> Precision -> (Double,Double)
48airy_Ai_e x mode = createSFR "airy_Ai_e" $ gsl_sf_airy_Ai_e x (precCode mode) 48airy_Ai_e x mode = createSFR "airy_Ai_e" $ gsl_sf_airy_Ai_e x (precCode mode)
49foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai_e" gsl_sf_airy_Ai_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 49foreign import ccall unsafe "gsl_sf_airy_Ai_e" gsl_sf_airy_Ai_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
50 50
51airy_Ai :: Double -> Precision -> Double 51airy_Ai :: Double -> Precision -> Double
52airy_Ai x mode = gsl_sf_airy_Ai x (precCode mode) 52airy_Ai x mode = gsl_sf_airy_Ai x (precCode mode)
53foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai" gsl_sf_airy_Ai :: Double -> Gsl_mode_t -> Double 53foreign import ccall unsafe "gsl_sf_airy_Ai" gsl_sf_airy_Ai :: Double -> Gsl_mode_t -> Double
54 54
55airy_Bi_e :: Double -> Precision -> (Double,Double) 55airy_Bi_e :: Double -> Precision -> (Double,Double)
56airy_Bi_e x mode = createSFR "airy_Bi_e" $ gsl_sf_airy_Bi_e x (precCode mode) 56airy_Bi_e x mode = createSFR "airy_Bi_e" $ gsl_sf_airy_Bi_e x (precCode mode)
57foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi_e" gsl_sf_airy_Bi_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 57foreign import ccall unsafe "gsl_sf_airy_Bi_e" gsl_sf_airy_Bi_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
58 58
59airy_Bi :: Double -> Precision -> Double 59airy_Bi :: Double -> Precision -> Double
60airy_Bi x mode = gsl_sf_airy_Bi x (precCode mode) 60airy_Bi x mode = gsl_sf_airy_Bi x (precCode mode)
61foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi" gsl_sf_airy_Bi :: Double -> Gsl_mode_t -> Double 61foreign import ccall unsafe "gsl_sf_airy_Bi" gsl_sf_airy_Bi :: Double -> Gsl_mode_t -> Double
62 62
63airy_Ai_scaled_e :: Double -> Precision -> (Double,Double) 63airy_Ai_scaled_e :: Double -> Precision -> (Double,Double)
64airy_Ai_scaled_e x mode = createSFR "airy_Ai_scaled_e" $ gsl_sf_airy_Ai_scaled_e x (precCode mode) 64airy_Ai_scaled_e x mode = createSFR "airy_Ai_scaled_e" $ gsl_sf_airy_Ai_scaled_e x (precCode mode)
65foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai_scaled_e" gsl_sf_airy_Ai_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 65foreign import ccall unsafe "gsl_sf_airy_Ai_scaled_e" gsl_sf_airy_Ai_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
66 66
67airy_Ai_scaled :: Double -> Precision -> Double 67airy_Ai_scaled :: Double -> Precision -> Double
68airy_Ai_scaled x mode = gsl_sf_airy_Ai_scaled x (precCode mode) 68airy_Ai_scaled x mode = gsl_sf_airy_Ai_scaled x (precCode mode)
69foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai_scaled" gsl_sf_airy_Ai_scaled :: Double -> Gsl_mode_t -> Double 69foreign import ccall unsafe "gsl_sf_airy_Ai_scaled" gsl_sf_airy_Ai_scaled :: Double -> Gsl_mode_t -> Double
70 70
71airy_Bi_scaled_e :: Double -> Precision -> (Double,Double) 71airy_Bi_scaled_e :: Double -> Precision -> (Double,Double)
72airy_Bi_scaled_e x mode = createSFR "airy_Bi_scaled_e" $ gsl_sf_airy_Bi_scaled_e x (precCode mode) 72airy_Bi_scaled_e x mode = createSFR "airy_Bi_scaled_e" $ gsl_sf_airy_Bi_scaled_e x (precCode mode)
73foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi_scaled_e" gsl_sf_airy_Bi_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 73foreign import ccall unsafe "gsl_sf_airy_Bi_scaled_e" gsl_sf_airy_Bi_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
74 74
75airy_Bi_scaled :: Double -> Precision -> Double 75airy_Bi_scaled :: Double -> Precision -> Double
76airy_Bi_scaled x mode = gsl_sf_airy_Bi_scaled x (precCode mode) 76airy_Bi_scaled x mode = gsl_sf_airy_Bi_scaled x (precCode mode)
77foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi_scaled" gsl_sf_airy_Bi_scaled :: Double -> Gsl_mode_t -> Double 77foreign import ccall unsafe "gsl_sf_airy_Bi_scaled" gsl_sf_airy_Bi_scaled :: Double -> Gsl_mode_t -> Double
78 78
79airy_Ai_deriv_e :: Double -> Precision -> (Double,Double) 79airy_Ai_deriv_e :: Double -> Precision -> (Double,Double)
80airy_Ai_deriv_e x mode = createSFR "airy_Ai_deriv_e" $ gsl_sf_airy_Ai_deriv_e x (precCode mode) 80airy_Ai_deriv_e x mode = createSFR "airy_Ai_deriv_e" $ gsl_sf_airy_Ai_deriv_e x (precCode mode)
81foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai_deriv_e" gsl_sf_airy_Ai_deriv_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 81foreign import ccall unsafe "gsl_sf_airy_Ai_deriv_e" gsl_sf_airy_Ai_deriv_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
82 82
83airy_Ai_deriv :: Double -> Precision -> Double 83airy_Ai_deriv :: Double -> Precision -> Double
84airy_Ai_deriv x mode = gsl_sf_airy_Ai_deriv x (precCode mode) 84airy_Ai_deriv x mode = gsl_sf_airy_Ai_deriv x (precCode mode)
85foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai_deriv" gsl_sf_airy_Ai_deriv :: Double -> Gsl_mode_t -> Double 85foreign import ccall unsafe "gsl_sf_airy_Ai_deriv" gsl_sf_airy_Ai_deriv :: Double -> Gsl_mode_t -> Double
86 86
87airy_Bi_deriv_e :: Double -> Precision -> (Double,Double) 87airy_Bi_deriv_e :: Double -> Precision -> (Double,Double)
88airy_Bi_deriv_e x mode = createSFR "airy_Bi_deriv_e" $ gsl_sf_airy_Bi_deriv_e x (precCode mode) 88airy_Bi_deriv_e x mode = createSFR "airy_Bi_deriv_e" $ gsl_sf_airy_Bi_deriv_e x (precCode mode)
89foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi_deriv_e" gsl_sf_airy_Bi_deriv_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 89foreign import ccall unsafe "gsl_sf_airy_Bi_deriv_e" gsl_sf_airy_Bi_deriv_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
90 90
91airy_Bi_deriv :: Double -> Precision -> Double 91airy_Bi_deriv :: Double -> Precision -> Double
92airy_Bi_deriv x mode = gsl_sf_airy_Bi_deriv x (precCode mode) 92airy_Bi_deriv x mode = gsl_sf_airy_Bi_deriv x (precCode mode)
93foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi_deriv" gsl_sf_airy_Bi_deriv :: Double -> Gsl_mode_t -> Double 93foreign import ccall unsafe "gsl_sf_airy_Bi_deriv" gsl_sf_airy_Bi_deriv :: Double -> Gsl_mode_t -> Double
94 94
95airy_Ai_deriv_scaled_e :: Double -> Precision -> (Double,Double) 95airy_Ai_deriv_scaled_e :: Double -> Precision -> (Double,Double)
96airy_Ai_deriv_scaled_e x mode = createSFR "airy_Ai_deriv_scaled_e" $ gsl_sf_airy_Ai_deriv_scaled_e x (precCode mode) 96airy_Ai_deriv_scaled_e x mode = createSFR "airy_Ai_deriv_scaled_e" $ gsl_sf_airy_Ai_deriv_scaled_e x (precCode mode)
97foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai_deriv_scaled_e" gsl_sf_airy_Ai_deriv_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 97foreign import ccall unsafe "gsl_sf_airy_Ai_deriv_scaled_e" gsl_sf_airy_Ai_deriv_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
98 98
99airy_Ai_deriv_scaled :: Double -> Precision -> Double 99airy_Ai_deriv_scaled :: Double -> Precision -> Double
100airy_Ai_deriv_scaled x mode = gsl_sf_airy_Ai_deriv_scaled x (precCode mode) 100airy_Ai_deriv_scaled x mode = gsl_sf_airy_Ai_deriv_scaled x (precCode mode)
101foreign import ccall SAFE_CHEAP "gsl_sf_airy_Ai_deriv_scaled" gsl_sf_airy_Ai_deriv_scaled :: Double -> Gsl_mode_t -> Double 101foreign import ccall unsafe "gsl_sf_airy_Ai_deriv_scaled" gsl_sf_airy_Ai_deriv_scaled :: Double -> Gsl_mode_t -> Double
102 102
103airy_Bi_deriv_scaled_e :: Double -> Precision -> (Double,Double) 103airy_Bi_deriv_scaled_e :: Double -> Precision -> (Double,Double)
104airy_Bi_deriv_scaled_e x mode = createSFR "airy_Bi_deriv_scaled_e" $ gsl_sf_airy_Bi_deriv_scaled_e x (precCode mode) 104airy_Bi_deriv_scaled_e x mode = createSFR "airy_Bi_deriv_scaled_e" $ gsl_sf_airy_Bi_deriv_scaled_e x (precCode mode)
105foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi_deriv_scaled_e" gsl_sf_airy_Bi_deriv_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 105foreign import ccall unsafe "gsl_sf_airy_Bi_deriv_scaled_e" gsl_sf_airy_Bi_deriv_scaled_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
106 106
107airy_Bi_deriv_scaled :: Double -> Precision -> Double 107airy_Bi_deriv_scaled :: Double -> Precision -> Double
108airy_Bi_deriv_scaled x mode = gsl_sf_airy_Bi_deriv_scaled x (precCode mode) 108airy_Bi_deriv_scaled x mode = gsl_sf_airy_Bi_deriv_scaled x (precCode mode)
109foreign import ccall SAFE_CHEAP "gsl_sf_airy_Bi_deriv_scaled" gsl_sf_airy_Bi_deriv_scaled :: Double -> Gsl_mode_t -> Double 109foreign import ccall unsafe "gsl_sf_airy_Bi_deriv_scaled" gsl_sf_airy_Bi_deriv_scaled :: Double -> Gsl_mode_t -> Double
110 110
111airy_zero_Ai_e :: CInt -> (Double,Double) 111airy_zero_Ai_e :: CInt -> (Double,Double)
112airy_zero_Ai_e s = createSFR "airy_zero_Ai_e" $ gsl_sf_airy_zero_Ai_e s 112airy_zero_Ai_e s = createSFR "airy_zero_Ai_e" $ gsl_sf_airy_zero_Ai_e s
113foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Ai_e" gsl_sf_airy_zero_Ai_e :: CInt -> Ptr () -> IO CInt 113foreign import ccall unsafe "gsl_sf_airy_zero_Ai_e" gsl_sf_airy_zero_Ai_e :: CInt -> Ptr () -> IO CInt
114 114
115airy_zero_Ai :: CInt -> Double 115airy_zero_Ai :: CInt -> Double
116airy_zero_Ai = gsl_sf_airy_zero_Ai 116airy_zero_Ai = gsl_sf_airy_zero_Ai
117foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Ai" gsl_sf_airy_zero_Ai :: CInt -> Double 117foreign import ccall unsafe "gsl_sf_airy_zero_Ai" gsl_sf_airy_zero_Ai :: CInt -> Double
118 118
119airy_zero_Bi_e :: CInt -> (Double,Double) 119airy_zero_Bi_e :: CInt -> (Double,Double)
120airy_zero_Bi_e s = createSFR "airy_zero_Bi_e" $ gsl_sf_airy_zero_Bi_e s 120airy_zero_Bi_e s = createSFR "airy_zero_Bi_e" $ gsl_sf_airy_zero_Bi_e s
121foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Bi_e" gsl_sf_airy_zero_Bi_e :: CInt -> Ptr () -> IO CInt 121foreign import ccall unsafe "gsl_sf_airy_zero_Bi_e" gsl_sf_airy_zero_Bi_e :: CInt -> Ptr () -> IO CInt
122 122
123airy_zero_Bi :: CInt -> Double 123airy_zero_Bi :: CInt -> Double
124airy_zero_Bi = gsl_sf_airy_zero_Bi 124airy_zero_Bi = gsl_sf_airy_zero_Bi
125foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Bi" gsl_sf_airy_zero_Bi :: CInt -> Double 125foreign import ccall unsafe "gsl_sf_airy_zero_Bi" gsl_sf_airy_zero_Bi :: CInt -> Double
126 126
127airy_zero_Ai_deriv_e :: CInt -> (Double,Double) 127airy_zero_Ai_deriv_e :: CInt -> (Double,Double)
128airy_zero_Ai_deriv_e s = createSFR "airy_zero_Ai_deriv_e" $ gsl_sf_airy_zero_Ai_deriv_e s 128airy_zero_Ai_deriv_e s = createSFR "airy_zero_Ai_deriv_e" $ gsl_sf_airy_zero_Ai_deriv_e s
129foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Ai_deriv_e" gsl_sf_airy_zero_Ai_deriv_e :: CInt -> Ptr () -> IO CInt 129foreign import ccall unsafe "gsl_sf_airy_zero_Ai_deriv_e" gsl_sf_airy_zero_Ai_deriv_e :: CInt -> Ptr () -> IO CInt
130 130
131airy_zero_Ai_deriv :: CInt -> Double 131airy_zero_Ai_deriv :: CInt -> Double
132airy_zero_Ai_deriv = gsl_sf_airy_zero_Ai_deriv 132airy_zero_Ai_deriv = gsl_sf_airy_zero_Ai_deriv
133foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Ai_deriv" gsl_sf_airy_zero_Ai_deriv :: CInt -> Double 133foreign import ccall unsafe "gsl_sf_airy_zero_Ai_deriv" gsl_sf_airy_zero_Ai_deriv :: CInt -> Double
134 134
135airy_zero_Bi_deriv_e :: CInt -> (Double,Double) 135airy_zero_Bi_deriv_e :: CInt -> (Double,Double)
136airy_zero_Bi_deriv_e s = createSFR "airy_zero_Bi_deriv_e" $ gsl_sf_airy_zero_Bi_deriv_e s 136airy_zero_Bi_deriv_e s = createSFR "airy_zero_Bi_deriv_e" $ gsl_sf_airy_zero_Bi_deriv_e s
137foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Bi_deriv_e" gsl_sf_airy_zero_Bi_deriv_e :: CInt -> Ptr () -> IO CInt 137foreign import ccall unsafe "gsl_sf_airy_zero_Bi_deriv_e" gsl_sf_airy_zero_Bi_deriv_e :: CInt -> Ptr () -> IO CInt
138 138
139airy_zero_Bi_deriv :: CInt -> Double 139airy_zero_Bi_deriv :: CInt -> Double
140airy_zero_Bi_deriv = gsl_sf_airy_zero_Bi_deriv 140airy_zero_Bi_deriv = gsl_sf_airy_zero_Bi_deriv
141foreign import ccall SAFE_CHEAP "gsl_sf_airy_zero_Bi_deriv" gsl_sf_airy_zero_Bi_deriv :: CInt -> Double 141foreign import ccall unsafe "gsl_sf_airy_zero_Bi_deriv" gsl_sf_airy_zero_Bi_deriv :: CInt -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Bessel.hs b/packages/special/lib/Numeric/GSL/Special/Bessel.hs
index 4a80c28..7fda7f7 100644
--- a/packages/special/lib/Numeric/GSL/Special/Bessel.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Bessel.hs
@@ -110,404 +110,404 @@ import Numeric.GSL.Special.Internal
110 110
111bessel_J0_e :: Double -> (Double,Double) 111bessel_J0_e :: Double -> (Double,Double)
112bessel_J0_e x = createSFR "bessel_J0_e" $ gsl_sf_bessel_J0_e x 112bessel_J0_e x = createSFR "bessel_J0_e" $ gsl_sf_bessel_J0_e x
113foreign import ccall SAFE_CHEAP "gsl_sf_bessel_J0_e" gsl_sf_bessel_J0_e :: Double -> Ptr () -> IO CInt 113foreign import ccall unsafe "gsl_sf_bessel_J0_e" gsl_sf_bessel_J0_e :: Double -> Ptr () -> IO CInt
114 114
115bessel_J0 :: Double -> Double 115bessel_J0 :: Double -> Double
116bessel_J0 = gsl_sf_bessel_J0 116bessel_J0 = gsl_sf_bessel_J0
117foreign import ccall SAFE_CHEAP "gsl_sf_bessel_J0" gsl_sf_bessel_J0 :: Double -> Double 117foreign import ccall unsafe "gsl_sf_bessel_J0" gsl_sf_bessel_J0 :: Double -> Double
118 118
119bessel_J1_e :: Double -> (Double,Double) 119bessel_J1_e :: Double -> (Double,Double)
120bessel_J1_e x = createSFR "bessel_J1_e" $ gsl_sf_bessel_J1_e x 120bessel_J1_e x = createSFR "bessel_J1_e" $ gsl_sf_bessel_J1_e x
121foreign import ccall SAFE_CHEAP "gsl_sf_bessel_J1_e" gsl_sf_bessel_J1_e :: Double -> Ptr () -> IO CInt 121foreign import ccall unsafe "gsl_sf_bessel_J1_e" gsl_sf_bessel_J1_e :: Double -> Ptr () -> IO CInt
122 122
123bessel_J1 :: Double -> Double 123bessel_J1 :: Double -> Double
124bessel_J1 = gsl_sf_bessel_J1 124bessel_J1 = gsl_sf_bessel_J1
125foreign import ccall SAFE_CHEAP "gsl_sf_bessel_J1" gsl_sf_bessel_J1 :: Double -> Double 125foreign import ccall unsafe "gsl_sf_bessel_J1" gsl_sf_bessel_J1 :: Double -> Double
126 126
127bessel_Jn_e :: CInt -> Double -> (Double,Double) 127bessel_Jn_e :: CInt -> Double -> (Double,Double)
128bessel_Jn_e n x = createSFR "bessel_Jn_e" $ gsl_sf_bessel_Jn_e n x 128bessel_Jn_e n x = createSFR "bessel_Jn_e" $ gsl_sf_bessel_Jn_e n x
129foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Jn_e" gsl_sf_bessel_Jn_e :: CInt -> Double -> Ptr () -> IO CInt 129foreign import ccall unsafe "gsl_sf_bessel_Jn_e" gsl_sf_bessel_Jn_e :: CInt -> Double -> Ptr () -> IO CInt
130 130
131bessel_Jn :: CInt -> Double -> Double 131bessel_Jn :: CInt -> Double -> Double
132bessel_Jn = gsl_sf_bessel_Jn 132bessel_Jn = gsl_sf_bessel_Jn
133foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Jn" gsl_sf_bessel_Jn :: CInt -> Double -> Double 133foreign import ccall unsafe "gsl_sf_bessel_Jn" gsl_sf_bessel_Jn :: CInt -> Double -> Double
134 134
135bessel_Jn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 135bessel_Jn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
136bessel_Jn_array = gsl_sf_bessel_Jn_array 136bessel_Jn_array = gsl_sf_bessel_Jn_array
137foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Jn_array" gsl_sf_bessel_Jn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 137foreign import ccall unsafe "gsl_sf_bessel_Jn_array" gsl_sf_bessel_Jn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
138 138
139bessel_Y0_e :: Double -> (Double,Double) 139bessel_Y0_e :: Double -> (Double,Double)
140bessel_Y0_e x = createSFR "bessel_Y0_e" $ gsl_sf_bessel_Y0_e x 140bessel_Y0_e x = createSFR "bessel_Y0_e" $ gsl_sf_bessel_Y0_e x
141foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Y0_e" gsl_sf_bessel_Y0_e :: Double -> Ptr () -> IO CInt 141foreign import ccall unsafe "gsl_sf_bessel_Y0_e" gsl_sf_bessel_Y0_e :: Double -> Ptr () -> IO CInt
142 142
143bessel_Y0 :: Double -> Double 143bessel_Y0 :: Double -> Double
144bessel_Y0 = gsl_sf_bessel_Y0 144bessel_Y0 = gsl_sf_bessel_Y0
145foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Y0" gsl_sf_bessel_Y0 :: Double -> Double 145foreign import ccall unsafe "gsl_sf_bessel_Y0" gsl_sf_bessel_Y0 :: Double -> Double
146 146
147bessel_Y1_e :: Double -> (Double,Double) 147bessel_Y1_e :: Double -> (Double,Double)
148bessel_Y1_e x = createSFR "bessel_Y1_e" $ gsl_sf_bessel_Y1_e x 148bessel_Y1_e x = createSFR "bessel_Y1_e" $ gsl_sf_bessel_Y1_e x
149foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Y1_e" gsl_sf_bessel_Y1_e :: Double -> Ptr () -> IO CInt 149foreign import ccall unsafe "gsl_sf_bessel_Y1_e" gsl_sf_bessel_Y1_e :: Double -> Ptr () -> IO CInt
150 150
151bessel_Y1 :: Double -> Double 151bessel_Y1 :: Double -> Double
152bessel_Y1 = gsl_sf_bessel_Y1 152bessel_Y1 = gsl_sf_bessel_Y1
153foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Y1" gsl_sf_bessel_Y1 :: Double -> Double 153foreign import ccall unsafe "gsl_sf_bessel_Y1" gsl_sf_bessel_Y1 :: Double -> Double
154 154
155bessel_Yn_e :: CInt -> Double -> (Double,Double) 155bessel_Yn_e :: CInt -> Double -> (Double,Double)
156bessel_Yn_e n x = createSFR "bessel_Yn_e" $ gsl_sf_bessel_Yn_e n x 156bessel_Yn_e n x = createSFR "bessel_Yn_e" $ gsl_sf_bessel_Yn_e n x
157foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Yn_e" gsl_sf_bessel_Yn_e :: CInt -> Double -> Ptr () -> IO CInt 157foreign import ccall unsafe "gsl_sf_bessel_Yn_e" gsl_sf_bessel_Yn_e :: CInt -> Double -> Ptr () -> IO CInt
158 158
159bessel_Yn :: CInt -> Double -> Double 159bessel_Yn :: CInt -> Double -> Double
160bessel_Yn = gsl_sf_bessel_Yn 160bessel_Yn = gsl_sf_bessel_Yn
161foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Yn" gsl_sf_bessel_Yn :: CInt -> Double -> Double 161foreign import ccall unsafe "gsl_sf_bessel_Yn" gsl_sf_bessel_Yn :: CInt -> Double -> Double
162 162
163bessel_Yn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 163bessel_Yn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
164bessel_Yn_array = gsl_sf_bessel_Yn_array 164bessel_Yn_array = gsl_sf_bessel_Yn_array
165foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Yn_array" gsl_sf_bessel_Yn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 165foreign import ccall unsafe "gsl_sf_bessel_Yn_array" gsl_sf_bessel_Yn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
166 166
167bessel_I0_e :: Double -> (Double,Double) 167bessel_I0_e :: Double -> (Double,Double)
168bessel_I0_e x = createSFR "bessel_I0_e" $ gsl_sf_bessel_I0_e x 168bessel_I0_e x = createSFR "bessel_I0_e" $ gsl_sf_bessel_I0_e x
169foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I0_e" gsl_sf_bessel_I0_e :: Double -> Ptr () -> IO CInt 169foreign import ccall unsafe "gsl_sf_bessel_I0_e" gsl_sf_bessel_I0_e :: Double -> Ptr () -> IO CInt
170 170
171bessel_I0 :: Double -> Double 171bessel_I0 :: Double -> Double
172bessel_I0 = gsl_sf_bessel_I0 172bessel_I0 = gsl_sf_bessel_I0
173foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I0" gsl_sf_bessel_I0 :: Double -> Double 173foreign import ccall unsafe "gsl_sf_bessel_I0" gsl_sf_bessel_I0 :: Double -> Double
174 174
175bessel_I1_e :: Double -> (Double,Double) 175bessel_I1_e :: Double -> (Double,Double)
176bessel_I1_e x = createSFR "bessel_I1_e" $ gsl_sf_bessel_I1_e x 176bessel_I1_e x = createSFR "bessel_I1_e" $ gsl_sf_bessel_I1_e x
177foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I1_e" gsl_sf_bessel_I1_e :: Double -> Ptr () -> IO CInt 177foreign import ccall unsafe "gsl_sf_bessel_I1_e" gsl_sf_bessel_I1_e :: Double -> Ptr () -> IO CInt
178 178
179bessel_I1 :: Double -> Double 179bessel_I1 :: Double -> Double
180bessel_I1 = gsl_sf_bessel_I1 180bessel_I1 = gsl_sf_bessel_I1
181foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I1" gsl_sf_bessel_I1 :: Double -> Double 181foreign import ccall unsafe "gsl_sf_bessel_I1" gsl_sf_bessel_I1 :: Double -> Double
182 182
183bessel_In_e :: CInt -> Double -> (Double,Double) 183bessel_In_e :: CInt -> Double -> (Double,Double)
184bessel_In_e n x = createSFR "bessel_In_e" $ gsl_sf_bessel_In_e n x 184bessel_In_e n x = createSFR "bessel_In_e" $ gsl_sf_bessel_In_e n x
185foreign import ccall SAFE_CHEAP "gsl_sf_bessel_In_e" gsl_sf_bessel_In_e :: CInt -> Double -> Ptr () -> IO CInt 185foreign import ccall unsafe "gsl_sf_bessel_In_e" gsl_sf_bessel_In_e :: CInt -> Double -> Ptr () -> IO CInt
186 186
187bessel_In :: CInt -> Double -> Double 187bessel_In :: CInt -> Double -> Double
188bessel_In = gsl_sf_bessel_In 188bessel_In = gsl_sf_bessel_In
189foreign import ccall SAFE_CHEAP "gsl_sf_bessel_In" gsl_sf_bessel_In :: CInt -> Double -> Double 189foreign import ccall unsafe "gsl_sf_bessel_In" gsl_sf_bessel_In :: CInt -> Double -> Double
190 190
191bessel_In_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 191bessel_In_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
192bessel_In_array = gsl_sf_bessel_In_array 192bessel_In_array = gsl_sf_bessel_In_array
193foreign import ccall SAFE_CHEAP "gsl_sf_bessel_In_array" gsl_sf_bessel_In_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 193foreign import ccall unsafe "gsl_sf_bessel_In_array" gsl_sf_bessel_In_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
194 194
195bessel_I0_scaled_e :: Double -> (Double,Double) 195bessel_I0_scaled_e :: Double -> (Double,Double)
196bessel_I0_scaled_e x = createSFR "bessel_I0_scaled_e" $ gsl_sf_bessel_I0_scaled_e x 196bessel_I0_scaled_e x = createSFR "bessel_I0_scaled_e" $ gsl_sf_bessel_I0_scaled_e x
197foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I0_scaled_e" gsl_sf_bessel_I0_scaled_e :: Double -> Ptr () -> IO CInt 197foreign import ccall unsafe "gsl_sf_bessel_I0_scaled_e" gsl_sf_bessel_I0_scaled_e :: Double -> Ptr () -> IO CInt
198 198
199bessel_I0_scaled :: Double -> Double 199bessel_I0_scaled :: Double -> Double
200bessel_I0_scaled = gsl_sf_bessel_I0_scaled 200bessel_I0_scaled = gsl_sf_bessel_I0_scaled
201foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I0_scaled" gsl_sf_bessel_I0_scaled :: Double -> Double 201foreign import ccall unsafe "gsl_sf_bessel_I0_scaled" gsl_sf_bessel_I0_scaled :: Double -> Double
202 202
203bessel_I1_scaled_e :: Double -> (Double,Double) 203bessel_I1_scaled_e :: Double -> (Double,Double)
204bessel_I1_scaled_e x = createSFR "bessel_I1_scaled_e" $ gsl_sf_bessel_I1_scaled_e x 204bessel_I1_scaled_e x = createSFR "bessel_I1_scaled_e" $ gsl_sf_bessel_I1_scaled_e x
205foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I1_scaled_e" gsl_sf_bessel_I1_scaled_e :: Double -> Ptr () -> IO CInt 205foreign import ccall unsafe "gsl_sf_bessel_I1_scaled_e" gsl_sf_bessel_I1_scaled_e :: Double -> Ptr () -> IO CInt
206 206
207bessel_I1_scaled :: Double -> Double 207bessel_I1_scaled :: Double -> Double
208bessel_I1_scaled = gsl_sf_bessel_I1_scaled 208bessel_I1_scaled = gsl_sf_bessel_I1_scaled
209foreign import ccall SAFE_CHEAP "gsl_sf_bessel_I1_scaled" gsl_sf_bessel_I1_scaled :: Double -> Double 209foreign import ccall unsafe "gsl_sf_bessel_I1_scaled" gsl_sf_bessel_I1_scaled :: Double -> Double
210 210
211bessel_In_scaled_e :: CInt -> Double -> (Double,Double) 211bessel_In_scaled_e :: CInt -> Double -> (Double,Double)
212bessel_In_scaled_e n x = createSFR "bessel_In_scaled_e" $ gsl_sf_bessel_In_scaled_e n x 212bessel_In_scaled_e n x = createSFR "bessel_In_scaled_e" $ gsl_sf_bessel_In_scaled_e n x
213foreign import ccall SAFE_CHEAP "gsl_sf_bessel_In_scaled_e" gsl_sf_bessel_In_scaled_e :: CInt -> Double -> Ptr () -> IO CInt 213foreign import ccall unsafe "gsl_sf_bessel_In_scaled_e" gsl_sf_bessel_In_scaled_e :: CInt -> Double -> Ptr () -> IO CInt
214 214
215bessel_In_scaled :: CInt -> Double -> Double 215bessel_In_scaled :: CInt -> Double -> Double
216bessel_In_scaled = gsl_sf_bessel_In_scaled 216bessel_In_scaled = gsl_sf_bessel_In_scaled
217foreign import ccall SAFE_CHEAP "gsl_sf_bessel_In_scaled" gsl_sf_bessel_In_scaled :: CInt -> Double -> Double 217foreign import ccall unsafe "gsl_sf_bessel_In_scaled" gsl_sf_bessel_In_scaled :: CInt -> Double -> Double
218 218
219bessel_In_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 219bessel_In_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
220bessel_In_scaled_array = gsl_sf_bessel_In_scaled_array 220bessel_In_scaled_array = gsl_sf_bessel_In_scaled_array
221foreign import ccall SAFE_CHEAP "gsl_sf_bessel_In_scaled_array" gsl_sf_bessel_In_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 221foreign import ccall unsafe "gsl_sf_bessel_In_scaled_array" gsl_sf_bessel_In_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
222 222
223bessel_K0_e :: Double -> (Double,Double) 223bessel_K0_e :: Double -> (Double,Double)
224bessel_K0_e x = createSFR "bessel_K0_e" $ gsl_sf_bessel_K0_e x 224bessel_K0_e x = createSFR "bessel_K0_e" $ gsl_sf_bessel_K0_e x
225foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K0_e" gsl_sf_bessel_K0_e :: Double -> Ptr () -> IO CInt 225foreign import ccall unsafe "gsl_sf_bessel_K0_e" gsl_sf_bessel_K0_e :: Double -> Ptr () -> IO CInt
226 226
227bessel_K0 :: Double -> Double 227bessel_K0 :: Double -> Double
228bessel_K0 = gsl_sf_bessel_K0 228bessel_K0 = gsl_sf_bessel_K0
229foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K0" gsl_sf_bessel_K0 :: Double -> Double 229foreign import ccall unsafe "gsl_sf_bessel_K0" gsl_sf_bessel_K0 :: Double -> Double
230 230
231bessel_K1_e :: Double -> (Double,Double) 231bessel_K1_e :: Double -> (Double,Double)
232bessel_K1_e x = createSFR "bessel_K1_e" $ gsl_sf_bessel_K1_e x 232bessel_K1_e x = createSFR "bessel_K1_e" $ gsl_sf_bessel_K1_e x
233foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K1_e" gsl_sf_bessel_K1_e :: Double -> Ptr () -> IO CInt 233foreign import ccall unsafe "gsl_sf_bessel_K1_e" gsl_sf_bessel_K1_e :: Double -> Ptr () -> IO CInt
234 234
235bessel_K1 :: Double -> Double 235bessel_K1 :: Double -> Double
236bessel_K1 = gsl_sf_bessel_K1 236bessel_K1 = gsl_sf_bessel_K1
237foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K1" gsl_sf_bessel_K1 :: Double -> Double 237foreign import ccall unsafe "gsl_sf_bessel_K1" gsl_sf_bessel_K1 :: Double -> Double
238 238
239bessel_Kn_e :: CInt -> Double -> (Double,Double) 239bessel_Kn_e :: CInt -> Double -> (Double,Double)
240bessel_Kn_e n x = createSFR "bessel_Kn_e" $ gsl_sf_bessel_Kn_e n x 240bessel_Kn_e n x = createSFR "bessel_Kn_e" $ gsl_sf_bessel_Kn_e n x
241foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Kn_e" gsl_sf_bessel_Kn_e :: CInt -> Double -> Ptr () -> IO CInt 241foreign import ccall unsafe "gsl_sf_bessel_Kn_e" gsl_sf_bessel_Kn_e :: CInt -> Double -> Ptr () -> IO CInt
242 242
243bessel_Kn :: CInt -> Double -> Double 243bessel_Kn :: CInt -> Double -> Double
244bessel_Kn = gsl_sf_bessel_Kn 244bessel_Kn = gsl_sf_bessel_Kn
245foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Kn" gsl_sf_bessel_Kn :: CInt -> Double -> Double 245foreign import ccall unsafe "gsl_sf_bessel_Kn" gsl_sf_bessel_Kn :: CInt -> Double -> Double
246 246
247bessel_Kn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 247bessel_Kn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
248bessel_Kn_array = gsl_sf_bessel_Kn_array 248bessel_Kn_array = gsl_sf_bessel_Kn_array
249foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Kn_array" gsl_sf_bessel_Kn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 249foreign import ccall unsafe "gsl_sf_bessel_Kn_array" gsl_sf_bessel_Kn_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
250 250
251bessel_K0_scaled_e :: Double -> (Double,Double) 251bessel_K0_scaled_e :: Double -> (Double,Double)
252bessel_K0_scaled_e x = createSFR "bessel_K0_scaled_e" $ gsl_sf_bessel_K0_scaled_e x 252bessel_K0_scaled_e x = createSFR "bessel_K0_scaled_e" $ gsl_sf_bessel_K0_scaled_e x
253foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K0_scaled_e" gsl_sf_bessel_K0_scaled_e :: Double -> Ptr () -> IO CInt 253foreign import ccall unsafe "gsl_sf_bessel_K0_scaled_e" gsl_sf_bessel_K0_scaled_e :: Double -> Ptr () -> IO CInt
254 254
255bessel_K0_scaled :: Double -> Double 255bessel_K0_scaled :: Double -> Double
256bessel_K0_scaled = gsl_sf_bessel_K0_scaled 256bessel_K0_scaled = gsl_sf_bessel_K0_scaled
257foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K0_scaled" gsl_sf_bessel_K0_scaled :: Double -> Double 257foreign import ccall unsafe "gsl_sf_bessel_K0_scaled" gsl_sf_bessel_K0_scaled :: Double -> Double
258 258
259bessel_K1_scaled_e :: Double -> (Double,Double) 259bessel_K1_scaled_e :: Double -> (Double,Double)
260bessel_K1_scaled_e x = createSFR "bessel_K1_scaled_e" $ gsl_sf_bessel_K1_scaled_e x 260bessel_K1_scaled_e x = createSFR "bessel_K1_scaled_e" $ gsl_sf_bessel_K1_scaled_e x
261foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K1_scaled_e" gsl_sf_bessel_K1_scaled_e :: Double -> Ptr () -> IO CInt 261foreign import ccall unsafe "gsl_sf_bessel_K1_scaled_e" gsl_sf_bessel_K1_scaled_e :: Double -> Ptr () -> IO CInt
262 262
263bessel_K1_scaled :: Double -> Double 263bessel_K1_scaled :: Double -> Double
264bessel_K1_scaled = gsl_sf_bessel_K1_scaled 264bessel_K1_scaled = gsl_sf_bessel_K1_scaled
265foreign import ccall SAFE_CHEAP "gsl_sf_bessel_K1_scaled" gsl_sf_bessel_K1_scaled :: Double -> Double 265foreign import ccall unsafe "gsl_sf_bessel_K1_scaled" gsl_sf_bessel_K1_scaled :: Double -> Double
266 266
267bessel_Kn_scaled_e :: CInt -> Double -> (Double,Double) 267bessel_Kn_scaled_e :: CInt -> Double -> (Double,Double)
268bessel_Kn_scaled_e n x = createSFR "bessel_Kn_scaled_e" $ gsl_sf_bessel_Kn_scaled_e n x 268bessel_Kn_scaled_e n x = createSFR "bessel_Kn_scaled_e" $ gsl_sf_bessel_Kn_scaled_e n x
269foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Kn_scaled_e" gsl_sf_bessel_Kn_scaled_e :: CInt -> Double -> Ptr () -> IO CInt 269foreign import ccall unsafe "gsl_sf_bessel_Kn_scaled_e" gsl_sf_bessel_Kn_scaled_e :: CInt -> Double -> Ptr () -> IO CInt
270 270
271bessel_Kn_scaled :: CInt -> Double -> Double 271bessel_Kn_scaled :: CInt -> Double -> Double
272bessel_Kn_scaled = gsl_sf_bessel_Kn_scaled 272bessel_Kn_scaled = gsl_sf_bessel_Kn_scaled
273foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Kn_scaled" gsl_sf_bessel_Kn_scaled :: CInt -> Double -> Double 273foreign import ccall unsafe "gsl_sf_bessel_Kn_scaled" gsl_sf_bessel_Kn_scaled :: CInt -> Double -> Double
274 274
275bessel_Kn_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 275bessel_Kn_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
276bessel_Kn_scaled_array = gsl_sf_bessel_Kn_scaled_array 276bessel_Kn_scaled_array = gsl_sf_bessel_Kn_scaled_array
277foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Kn_scaled_array" gsl_sf_bessel_Kn_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 277foreign import ccall unsafe "gsl_sf_bessel_Kn_scaled_array" gsl_sf_bessel_Kn_scaled_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
278 278
279bessel_j0_e :: Double -> (Double,Double) 279bessel_j0_e :: Double -> (Double,Double)
280bessel_j0_e x = createSFR "bessel_j0_e" $ gsl_sf_bessel_j0_e x 280bessel_j0_e x = createSFR "bessel_j0_e" $ gsl_sf_bessel_j0_e x
281foreign import ccall SAFE_CHEAP "gsl_sf_bessel_j0_e" gsl_sf_bessel_j0_e :: Double -> Ptr () -> IO CInt 281foreign import ccall unsafe "gsl_sf_bessel_j0_e" gsl_sf_bessel_j0_e :: Double -> Ptr () -> IO CInt
282 282
283bessel_j0 :: Double -> Double 283bessel_j0 :: Double -> Double
284bessel_j0 = gsl_sf_bessel_j0 284bessel_j0 = gsl_sf_bessel_j0
285foreign import ccall SAFE_CHEAP "gsl_sf_bessel_j0" gsl_sf_bessel_j0 :: Double -> Double 285foreign import ccall unsafe "gsl_sf_bessel_j0" gsl_sf_bessel_j0 :: Double -> Double
286 286
287bessel_j1_e :: Double -> (Double,Double) 287bessel_j1_e :: Double -> (Double,Double)
288bessel_j1_e x = createSFR "bessel_j1_e" $ gsl_sf_bessel_j1_e x 288bessel_j1_e x = createSFR "bessel_j1_e" $ gsl_sf_bessel_j1_e x
289foreign import ccall SAFE_CHEAP "gsl_sf_bessel_j1_e" gsl_sf_bessel_j1_e :: Double -> Ptr () -> IO CInt 289foreign import ccall unsafe "gsl_sf_bessel_j1_e" gsl_sf_bessel_j1_e :: Double -> Ptr () -> IO CInt
290 290
291bessel_j1 :: Double -> Double 291bessel_j1 :: Double -> Double
292bessel_j1 = gsl_sf_bessel_j1 292bessel_j1 = gsl_sf_bessel_j1
293foreign import ccall SAFE_CHEAP "gsl_sf_bessel_j1" gsl_sf_bessel_j1 :: Double -> Double 293foreign import ccall unsafe "gsl_sf_bessel_j1" gsl_sf_bessel_j1 :: Double -> Double
294 294
295bessel_j2_e :: Double -> (Double,Double) 295bessel_j2_e :: Double -> (Double,Double)
296bessel_j2_e x = createSFR "bessel_j2_e" $ gsl_sf_bessel_j2_e x 296bessel_j2_e x = createSFR "bessel_j2_e" $ gsl_sf_bessel_j2_e x
297foreign import ccall SAFE_CHEAP "gsl_sf_bessel_j2_e" gsl_sf_bessel_j2_e :: Double -> Ptr () -> IO CInt 297foreign import ccall unsafe "gsl_sf_bessel_j2_e" gsl_sf_bessel_j2_e :: Double -> Ptr () -> IO CInt
298 298
299bessel_j2 :: Double -> Double 299bessel_j2 :: Double -> Double
300bessel_j2 = gsl_sf_bessel_j2 300bessel_j2 = gsl_sf_bessel_j2
301foreign import ccall SAFE_CHEAP "gsl_sf_bessel_j2" gsl_sf_bessel_j2 :: Double -> Double 301foreign import ccall unsafe "gsl_sf_bessel_j2" gsl_sf_bessel_j2 :: Double -> Double
302 302
303bessel_jl_e :: CInt -> Double -> (Double,Double) 303bessel_jl_e :: CInt -> Double -> (Double,Double)
304bessel_jl_e l x = createSFR "bessel_jl_e" $ gsl_sf_bessel_jl_e l x 304bessel_jl_e l x = createSFR "bessel_jl_e" $ gsl_sf_bessel_jl_e l x
305foreign import ccall SAFE_CHEAP "gsl_sf_bessel_jl_e" gsl_sf_bessel_jl_e :: CInt -> Double -> Ptr () -> IO CInt 305foreign import ccall unsafe "gsl_sf_bessel_jl_e" gsl_sf_bessel_jl_e :: CInt -> Double -> Ptr () -> IO CInt
306 306
307bessel_jl :: CInt -> Double -> Double 307bessel_jl :: CInt -> Double -> Double
308bessel_jl = gsl_sf_bessel_jl 308bessel_jl = gsl_sf_bessel_jl
309foreign import ccall SAFE_CHEAP "gsl_sf_bessel_jl" gsl_sf_bessel_jl :: CInt -> Double -> Double 309foreign import ccall unsafe "gsl_sf_bessel_jl" gsl_sf_bessel_jl :: CInt -> Double -> Double
310 310
311bessel_jl_array :: CInt -> Double -> Ptr Double -> CInt 311bessel_jl_array :: CInt -> Double -> Ptr Double -> CInt
312bessel_jl_array = gsl_sf_bessel_jl_array 312bessel_jl_array = gsl_sf_bessel_jl_array
313foreign import ccall SAFE_CHEAP "gsl_sf_bessel_jl_array" gsl_sf_bessel_jl_array :: CInt -> Double -> Ptr Double -> CInt 313foreign import ccall unsafe "gsl_sf_bessel_jl_array" gsl_sf_bessel_jl_array :: CInt -> Double -> Ptr Double -> CInt
314 314
315bessel_jl_steed_array :: CInt -> Double -> Ptr Double -> CInt 315bessel_jl_steed_array :: CInt -> Double -> Ptr Double -> CInt
316bessel_jl_steed_array = gsl_sf_bessel_jl_steed_array 316bessel_jl_steed_array = gsl_sf_bessel_jl_steed_array
317foreign import ccall SAFE_CHEAP "gsl_sf_bessel_jl_steed_array" gsl_sf_bessel_jl_steed_array :: CInt -> Double -> Ptr Double -> CInt 317foreign import ccall unsafe "gsl_sf_bessel_jl_steed_array" gsl_sf_bessel_jl_steed_array :: CInt -> Double -> Ptr Double -> CInt
318 318
319bessel_y0_e :: Double -> (Double,Double) 319bessel_y0_e :: Double -> (Double,Double)
320bessel_y0_e x = createSFR "bessel_y0_e" $ gsl_sf_bessel_y0_e x 320bessel_y0_e x = createSFR "bessel_y0_e" $ gsl_sf_bessel_y0_e x
321foreign import ccall SAFE_CHEAP "gsl_sf_bessel_y0_e" gsl_sf_bessel_y0_e :: Double -> Ptr () -> IO CInt 321foreign import ccall unsafe "gsl_sf_bessel_y0_e" gsl_sf_bessel_y0_e :: Double -> Ptr () -> IO CInt
322 322
323bessel_y0 :: Double -> Double 323bessel_y0 :: Double -> Double
324bessel_y0 = gsl_sf_bessel_y0 324bessel_y0 = gsl_sf_bessel_y0
325foreign import ccall SAFE_CHEAP "gsl_sf_bessel_y0" gsl_sf_bessel_y0 :: Double -> Double 325foreign import ccall unsafe "gsl_sf_bessel_y0" gsl_sf_bessel_y0 :: Double -> Double
326 326
327bessel_y1_e :: Double -> (Double,Double) 327bessel_y1_e :: Double -> (Double,Double)
328bessel_y1_e x = createSFR "bessel_y1_e" $ gsl_sf_bessel_y1_e x 328bessel_y1_e x = createSFR "bessel_y1_e" $ gsl_sf_bessel_y1_e x
329foreign import ccall SAFE_CHEAP "gsl_sf_bessel_y1_e" gsl_sf_bessel_y1_e :: Double -> Ptr () -> IO CInt 329foreign import ccall unsafe "gsl_sf_bessel_y1_e" gsl_sf_bessel_y1_e :: Double -> Ptr () -> IO CInt
330 330
331bessel_y1 :: Double -> Double 331bessel_y1 :: Double -> Double
332bessel_y1 = gsl_sf_bessel_y1 332bessel_y1 = gsl_sf_bessel_y1
333foreign import ccall SAFE_CHEAP "gsl_sf_bessel_y1" gsl_sf_bessel_y1 :: Double -> Double 333foreign import ccall unsafe "gsl_sf_bessel_y1" gsl_sf_bessel_y1 :: Double -> Double
334 334
335bessel_y2_e :: Double -> (Double,Double) 335bessel_y2_e :: Double -> (Double,Double)
336bessel_y2_e x = createSFR "bessel_y2_e" $ gsl_sf_bessel_y2_e x 336bessel_y2_e x = createSFR "bessel_y2_e" $ gsl_sf_bessel_y2_e x
337foreign import ccall SAFE_CHEAP "gsl_sf_bessel_y2_e" gsl_sf_bessel_y2_e :: Double -> Ptr () -> IO CInt 337foreign import ccall unsafe "gsl_sf_bessel_y2_e" gsl_sf_bessel_y2_e :: Double -> Ptr () -> IO CInt
338 338
339bessel_y2 :: Double -> Double 339bessel_y2 :: Double -> Double
340bessel_y2 = gsl_sf_bessel_y2 340bessel_y2 = gsl_sf_bessel_y2
341foreign import ccall SAFE_CHEAP "gsl_sf_bessel_y2" gsl_sf_bessel_y2 :: Double -> Double 341foreign import ccall unsafe "gsl_sf_bessel_y2" gsl_sf_bessel_y2 :: Double -> Double
342 342
343bessel_yl_e :: CInt -> Double -> (Double,Double) 343bessel_yl_e :: CInt -> Double -> (Double,Double)
344bessel_yl_e l x = createSFR "bessel_yl_e" $ gsl_sf_bessel_yl_e l x 344bessel_yl_e l x = createSFR "bessel_yl_e" $ gsl_sf_bessel_yl_e l x
345foreign import ccall SAFE_CHEAP "gsl_sf_bessel_yl_e" gsl_sf_bessel_yl_e :: CInt -> Double -> Ptr () -> IO CInt 345foreign import ccall unsafe "gsl_sf_bessel_yl_e" gsl_sf_bessel_yl_e :: CInt -> Double -> Ptr () -> IO CInt
346 346
347bessel_yl :: CInt -> Double -> Double 347bessel_yl :: CInt -> Double -> Double
348bessel_yl = gsl_sf_bessel_yl 348bessel_yl = gsl_sf_bessel_yl
349foreign import ccall SAFE_CHEAP "gsl_sf_bessel_yl" gsl_sf_bessel_yl :: CInt -> Double -> Double 349foreign import ccall unsafe "gsl_sf_bessel_yl" gsl_sf_bessel_yl :: CInt -> Double -> Double
350 350
351bessel_yl_array :: CInt -> Double -> Ptr Double -> CInt 351bessel_yl_array :: CInt -> Double -> Ptr Double -> CInt
352bessel_yl_array = gsl_sf_bessel_yl_array 352bessel_yl_array = gsl_sf_bessel_yl_array
353foreign import ccall SAFE_CHEAP "gsl_sf_bessel_yl_array" gsl_sf_bessel_yl_array :: CInt -> Double -> Ptr Double -> CInt 353foreign import ccall unsafe "gsl_sf_bessel_yl_array" gsl_sf_bessel_yl_array :: CInt -> Double -> Ptr Double -> CInt
354 354
355bessel_i0_scaled_e :: Double -> (Double,Double) 355bessel_i0_scaled_e :: Double -> (Double,Double)
356bessel_i0_scaled_e x = createSFR "bessel_i0_scaled_e" $ gsl_sf_bessel_i0_scaled_e x 356bessel_i0_scaled_e x = createSFR "bessel_i0_scaled_e" $ gsl_sf_bessel_i0_scaled_e x
357foreign import ccall SAFE_CHEAP "gsl_sf_bessel_i0_scaled_e" gsl_sf_bessel_i0_scaled_e :: Double -> Ptr () -> IO CInt 357foreign import ccall unsafe "gsl_sf_bessel_i0_scaled_e" gsl_sf_bessel_i0_scaled_e :: Double -> Ptr () -> IO CInt
358 358
359bessel_i0_scaled :: Double -> Double 359bessel_i0_scaled :: Double -> Double
360bessel_i0_scaled = gsl_sf_bessel_i0_scaled 360bessel_i0_scaled = gsl_sf_bessel_i0_scaled
361foreign import ccall SAFE_CHEAP "gsl_sf_bessel_i0_scaled" gsl_sf_bessel_i0_scaled :: Double -> Double 361foreign import ccall unsafe "gsl_sf_bessel_i0_scaled" gsl_sf_bessel_i0_scaled :: Double -> Double
362 362
363bessel_i1_scaled_e :: Double -> (Double,Double) 363bessel_i1_scaled_e :: Double -> (Double,Double)
364bessel_i1_scaled_e x = createSFR "bessel_i1_scaled_e" $ gsl_sf_bessel_i1_scaled_e x 364bessel_i1_scaled_e x = createSFR "bessel_i1_scaled_e" $ gsl_sf_bessel_i1_scaled_e x
365foreign import ccall SAFE_CHEAP "gsl_sf_bessel_i1_scaled_e" gsl_sf_bessel_i1_scaled_e :: Double -> Ptr () -> IO CInt 365foreign import ccall unsafe "gsl_sf_bessel_i1_scaled_e" gsl_sf_bessel_i1_scaled_e :: Double -> Ptr () -> IO CInt
366 366
367bessel_i1_scaled :: Double -> Double 367bessel_i1_scaled :: Double -> Double
368bessel_i1_scaled = gsl_sf_bessel_i1_scaled 368bessel_i1_scaled = gsl_sf_bessel_i1_scaled
369foreign import ccall SAFE_CHEAP "gsl_sf_bessel_i1_scaled" gsl_sf_bessel_i1_scaled :: Double -> Double 369foreign import ccall unsafe "gsl_sf_bessel_i1_scaled" gsl_sf_bessel_i1_scaled :: Double -> Double
370 370
371bessel_i2_scaled_e :: Double -> (Double,Double) 371bessel_i2_scaled_e :: Double -> (Double,Double)
372bessel_i2_scaled_e x = createSFR "bessel_i2_scaled_e" $ gsl_sf_bessel_i2_scaled_e x 372bessel_i2_scaled_e x = createSFR "bessel_i2_scaled_e" $ gsl_sf_bessel_i2_scaled_e x
373foreign import ccall SAFE_CHEAP "gsl_sf_bessel_i2_scaled_e" gsl_sf_bessel_i2_scaled_e :: Double -> Ptr () -> IO CInt 373foreign import ccall unsafe "gsl_sf_bessel_i2_scaled_e" gsl_sf_bessel_i2_scaled_e :: Double -> Ptr () -> IO CInt
374 374
375bessel_i2_scaled :: Double -> Double 375bessel_i2_scaled :: Double -> Double
376bessel_i2_scaled = gsl_sf_bessel_i2_scaled 376bessel_i2_scaled = gsl_sf_bessel_i2_scaled
377foreign import ccall SAFE_CHEAP "gsl_sf_bessel_i2_scaled" gsl_sf_bessel_i2_scaled :: Double -> Double 377foreign import ccall unsafe "gsl_sf_bessel_i2_scaled" gsl_sf_bessel_i2_scaled :: Double -> Double
378 378
379bessel_il_scaled_e :: CInt -> Double -> (Double,Double) 379bessel_il_scaled_e :: CInt -> Double -> (Double,Double)
380bessel_il_scaled_e l x = createSFR "bessel_il_scaled_e" $ gsl_sf_bessel_il_scaled_e l x 380bessel_il_scaled_e l x = createSFR "bessel_il_scaled_e" $ gsl_sf_bessel_il_scaled_e l x
381foreign import ccall SAFE_CHEAP "gsl_sf_bessel_il_scaled_e" gsl_sf_bessel_il_scaled_e :: CInt -> Double -> Ptr () -> IO CInt 381foreign import ccall unsafe "gsl_sf_bessel_il_scaled_e" gsl_sf_bessel_il_scaled_e :: CInt -> Double -> Ptr () -> IO CInt
382 382
383bessel_il_scaled :: CInt -> Double -> Double 383bessel_il_scaled :: CInt -> Double -> Double
384bessel_il_scaled = gsl_sf_bessel_il_scaled 384bessel_il_scaled = gsl_sf_bessel_il_scaled
385foreign import ccall SAFE_CHEAP "gsl_sf_bessel_il_scaled" gsl_sf_bessel_il_scaled :: CInt -> Double -> Double 385foreign import ccall unsafe "gsl_sf_bessel_il_scaled" gsl_sf_bessel_il_scaled :: CInt -> Double -> Double
386 386
387bessel_il_scaled_array :: CInt -> Double -> Ptr Double -> CInt 387bessel_il_scaled_array :: CInt -> Double -> Ptr Double -> CInt
388bessel_il_scaled_array = gsl_sf_bessel_il_scaled_array 388bessel_il_scaled_array = gsl_sf_bessel_il_scaled_array
389foreign import ccall SAFE_CHEAP "gsl_sf_bessel_il_scaled_array" gsl_sf_bessel_il_scaled_array :: CInt -> Double -> Ptr Double -> CInt 389foreign import ccall unsafe "gsl_sf_bessel_il_scaled_array" gsl_sf_bessel_il_scaled_array :: CInt -> Double -> Ptr Double -> CInt
390 390
391bessel_k0_scaled_e :: Double -> (Double,Double) 391bessel_k0_scaled_e :: Double -> (Double,Double)
392bessel_k0_scaled_e x = createSFR "bessel_k0_scaled_e" $ gsl_sf_bessel_k0_scaled_e x 392bessel_k0_scaled_e x = createSFR "bessel_k0_scaled_e" $ gsl_sf_bessel_k0_scaled_e x
393foreign import ccall SAFE_CHEAP "gsl_sf_bessel_k0_scaled_e" gsl_sf_bessel_k0_scaled_e :: Double -> Ptr () -> IO CInt 393foreign import ccall unsafe "gsl_sf_bessel_k0_scaled_e" gsl_sf_bessel_k0_scaled_e :: Double -> Ptr () -> IO CInt
394 394
395bessel_k0_scaled :: Double -> Double 395bessel_k0_scaled :: Double -> Double
396bessel_k0_scaled = gsl_sf_bessel_k0_scaled 396bessel_k0_scaled = gsl_sf_bessel_k0_scaled
397foreign import ccall SAFE_CHEAP "gsl_sf_bessel_k0_scaled" gsl_sf_bessel_k0_scaled :: Double -> Double 397foreign import ccall unsafe "gsl_sf_bessel_k0_scaled" gsl_sf_bessel_k0_scaled :: Double -> Double
398 398
399bessel_k1_scaled_e :: Double -> (Double,Double) 399bessel_k1_scaled_e :: Double -> (Double,Double)
400bessel_k1_scaled_e x = createSFR "bessel_k1_scaled_e" $ gsl_sf_bessel_k1_scaled_e x 400bessel_k1_scaled_e x = createSFR "bessel_k1_scaled_e" $ gsl_sf_bessel_k1_scaled_e x
401foreign import ccall SAFE_CHEAP "gsl_sf_bessel_k1_scaled_e" gsl_sf_bessel_k1_scaled_e :: Double -> Ptr () -> IO CInt 401foreign import ccall unsafe "gsl_sf_bessel_k1_scaled_e" gsl_sf_bessel_k1_scaled_e :: Double -> Ptr () -> IO CInt
402 402
403bessel_k1_scaled :: Double -> Double 403bessel_k1_scaled :: Double -> Double
404bessel_k1_scaled = gsl_sf_bessel_k1_scaled 404bessel_k1_scaled = gsl_sf_bessel_k1_scaled
405foreign import ccall SAFE_CHEAP "gsl_sf_bessel_k1_scaled" gsl_sf_bessel_k1_scaled :: Double -> Double 405foreign import ccall unsafe "gsl_sf_bessel_k1_scaled" gsl_sf_bessel_k1_scaled :: Double -> Double
406 406
407bessel_k2_scaled_e :: Double -> (Double,Double) 407bessel_k2_scaled_e :: Double -> (Double,Double)
408bessel_k2_scaled_e x = createSFR "bessel_k2_scaled_e" $ gsl_sf_bessel_k2_scaled_e x 408bessel_k2_scaled_e x = createSFR "bessel_k2_scaled_e" $ gsl_sf_bessel_k2_scaled_e x
409foreign import ccall SAFE_CHEAP "gsl_sf_bessel_k2_scaled_e" gsl_sf_bessel_k2_scaled_e :: Double -> Ptr () -> IO CInt 409foreign import ccall unsafe "gsl_sf_bessel_k2_scaled_e" gsl_sf_bessel_k2_scaled_e :: Double -> Ptr () -> IO CInt
410 410
411bessel_k2_scaled :: Double -> Double 411bessel_k2_scaled :: Double -> Double
412bessel_k2_scaled = gsl_sf_bessel_k2_scaled 412bessel_k2_scaled = gsl_sf_bessel_k2_scaled
413foreign import ccall SAFE_CHEAP "gsl_sf_bessel_k2_scaled" gsl_sf_bessel_k2_scaled :: Double -> Double 413foreign import ccall unsafe "gsl_sf_bessel_k2_scaled" gsl_sf_bessel_k2_scaled :: Double -> Double
414 414
415bessel_kl_scaled_e :: CInt -> Double -> (Double,Double) 415bessel_kl_scaled_e :: CInt -> Double -> (Double,Double)
416bessel_kl_scaled_e l x = createSFR "bessel_kl_scaled_e" $ gsl_sf_bessel_kl_scaled_e l x 416bessel_kl_scaled_e l x = createSFR "bessel_kl_scaled_e" $ gsl_sf_bessel_kl_scaled_e l x
417foreign import ccall SAFE_CHEAP "gsl_sf_bessel_kl_scaled_e" gsl_sf_bessel_kl_scaled_e :: CInt -> Double -> Ptr () -> IO CInt 417foreign import ccall unsafe "gsl_sf_bessel_kl_scaled_e" gsl_sf_bessel_kl_scaled_e :: CInt -> Double -> Ptr () -> IO CInt
418 418
419bessel_kl_scaled :: CInt -> Double -> Double 419bessel_kl_scaled :: CInt -> Double -> Double
420bessel_kl_scaled = gsl_sf_bessel_kl_scaled 420bessel_kl_scaled = gsl_sf_bessel_kl_scaled
421foreign import ccall SAFE_CHEAP "gsl_sf_bessel_kl_scaled" gsl_sf_bessel_kl_scaled :: CInt -> Double -> Double 421foreign import ccall unsafe "gsl_sf_bessel_kl_scaled" gsl_sf_bessel_kl_scaled :: CInt -> Double -> Double
422 422
423bessel_kl_scaled_array :: CInt -> Double -> Ptr Double -> CInt 423bessel_kl_scaled_array :: CInt -> Double -> Ptr Double -> CInt
424bessel_kl_scaled_array = gsl_sf_bessel_kl_scaled_array 424bessel_kl_scaled_array = gsl_sf_bessel_kl_scaled_array
425foreign import ccall SAFE_CHEAP "gsl_sf_bessel_kl_scaled_array" gsl_sf_bessel_kl_scaled_array :: CInt -> Double -> Ptr Double -> CInt 425foreign import ccall unsafe "gsl_sf_bessel_kl_scaled_array" gsl_sf_bessel_kl_scaled_array :: CInt -> Double -> Ptr Double -> CInt
426 426
427bessel_Jnu_e :: Double -> Double -> (Double,Double) 427bessel_Jnu_e :: Double -> Double -> (Double,Double)
428bessel_Jnu_e nu x = createSFR "bessel_Jnu_e" $ gsl_sf_bessel_Jnu_e nu x 428bessel_Jnu_e nu x = createSFR "bessel_Jnu_e" $ gsl_sf_bessel_Jnu_e nu x
429foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Jnu_e" gsl_sf_bessel_Jnu_e :: Double -> Double -> Ptr () -> IO CInt 429foreign import ccall unsafe "gsl_sf_bessel_Jnu_e" gsl_sf_bessel_Jnu_e :: Double -> Double -> Ptr () -> IO CInt
430 430
431bessel_Jnu :: Double -> Double -> Double 431bessel_Jnu :: Double -> Double -> Double
432bessel_Jnu = gsl_sf_bessel_Jnu 432bessel_Jnu = gsl_sf_bessel_Jnu
433foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Jnu" gsl_sf_bessel_Jnu :: Double -> Double -> Double 433foreign import ccall unsafe "gsl_sf_bessel_Jnu" gsl_sf_bessel_Jnu :: Double -> Double -> Double
434 434
435bessel_Ynu_e :: Double -> Double -> (Double,Double) 435bessel_Ynu_e :: Double -> Double -> (Double,Double)
436bessel_Ynu_e nu x = createSFR "bessel_Ynu_e" $ gsl_sf_bessel_Ynu_e nu x 436bessel_Ynu_e nu x = createSFR "bessel_Ynu_e" $ gsl_sf_bessel_Ynu_e nu x
437foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Ynu_e" gsl_sf_bessel_Ynu_e :: Double -> Double -> Ptr () -> IO CInt 437foreign import ccall unsafe "gsl_sf_bessel_Ynu_e" gsl_sf_bessel_Ynu_e :: Double -> Double -> Ptr () -> IO CInt
438 438
439bessel_Ynu :: Double -> Double -> Double 439bessel_Ynu :: Double -> Double -> Double
440bessel_Ynu = gsl_sf_bessel_Ynu 440bessel_Ynu = gsl_sf_bessel_Ynu
441foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Ynu" gsl_sf_bessel_Ynu :: Double -> Double -> Double 441foreign import ccall unsafe "gsl_sf_bessel_Ynu" gsl_sf_bessel_Ynu :: Double -> Double -> Double
442 442
443bessel_sequence_Jnu_e :: Double -> Precision -> Size_t -> Ptr Double -> CInt 443bessel_sequence_Jnu_e :: Double -> Precision -> Size_t -> Ptr Double -> CInt
444bessel_sequence_Jnu_e nu mode size v = gsl_sf_bessel_sequence_Jnu_e nu (precCode mode) size v 444bessel_sequence_Jnu_e nu mode size v = gsl_sf_bessel_sequence_Jnu_e nu (precCode mode) size v
445foreign import ccall SAFE_CHEAP "gsl_sf_bessel_sequence_Jnu_e" gsl_sf_bessel_sequence_Jnu_e :: Double -> Gsl_mode_t -> Size_t -> Ptr Double -> CInt 445foreign import ccall unsafe "gsl_sf_bessel_sequence_Jnu_e" gsl_sf_bessel_sequence_Jnu_e :: Double -> Gsl_mode_t -> Size_t -> Ptr Double -> CInt
446 446
447bessel_Inu_scaled_e :: Double -> Double -> (Double,Double) 447bessel_Inu_scaled_e :: Double -> Double -> (Double,Double)
448bessel_Inu_scaled_e nu x = createSFR "bessel_Inu_scaled_e" $ gsl_sf_bessel_Inu_scaled_e nu x 448bessel_Inu_scaled_e nu x = createSFR "bessel_Inu_scaled_e" $ gsl_sf_bessel_Inu_scaled_e nu x
449foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Inu_scaled_e" gsl_sf_bessel_Inu_scaled_e :: Double -> Double -> Ptr () -> IO CInt 449foreign import ccall unsafe "gsl_sf_bessel_Inu_scaled_e" gsl_sf_bessel_Inu_scaled_e :: Double -> Double -> Ptr () -> IO CInt
450 450
451bessel_Inu_scaled :: Double -> Double -> Double 451bessel_Inu_scaled :: Double -> Double -> Double
452bessel_Inu_scaled = gsl_sf_bessel_Inu_scaled 452bessel_Inu_scaled = gsl_sf_bessel_Inu_scaled
453foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Inu_scaled" gsl_sf_bessel_Inu_scaled :: Double -> Double -> Double 453foreign import ccall unsafe "gsl_sf_bessel_Inu_scaled" gsl_sf_bessel_Inu_scaled :: Double -> Double -> Double
454 454
455bessel_Inu_e :: Double -> Double -> (Double,Double) 455bessel_Inu_e :: Double -> Double -> (Double,Double)
456bessel_Inu_e nu x = createSFR "bessel_Inu_e" $ gsl_sf_bessel_Inu_e nu x 456bessel_Inu_e nu x = createSFR "bessel_Inu_e" $ gsl_sf_bessel_Inu_e nu x
457foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Inu_e" gsl_sf_bessel_Inu_e :: Double -> Double -> Ptr () -> IO CInt 457foreign import ccall unsafe "gsl_sf_bessel_Inu_e" gsl_sf_bessel_Inu_e :: Double -> Double -> Ptr () -> IO CInt
458 458
459bessel_Inu :: Double -> Double -> Double 459bessel_Inu :: Double -> Double -> Double
460bessel_Inu = gsl_sf_bessel_Inu 460bessel_Inu = gsl_sf_bessel_Inu
461foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Inu" gsl_sf_bessel_Inu :: Double -> Double -> Double 461foreign import ccall unsafe "gsl_sf_bessel_Inu" gsl_sf_bessel_Inu :: Double -> Double -> Double
462 462
463bessel_Knu_scaled_e :: Double -> Double -> (Double,Double) 463bessel_Knu_scaled_e :: Double -> Double -> (Double,Double)
464bessel_Knu_scaled_e nu x = createSFR "bessel_Knu_scaled_e" $ gsl_sf_bessel_Knu_scaled_e nu x 464bessel_Knu_scaled_e nu x = createSFR "bessel_Knu_scaled_e" $ gsl_sf_bessel_Knu_scaled_e nu x
465foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Knu_scaled_e" gsl_sf_bessel_Knu_scaled_e :: Double -> Double -> Ptr () -> IO CInt 465foreign import ccall unsafe "gsl_sf_bessel_Knu_scaled_e" gsl_sf_bessel_Knu_scaled_e :: Double -> Double -> Ptr () -> IO CInt
466 466
467bessel_Knu_scaled :: Double -> Double -> Double 467bessel_Knu_scaled :: Double -> Double -> Double
468bessel_Knu_scaled = gsl_sf_bessel_Knu_scaled 468bessel_Knu_scaled = gsl_sf_bessel_Knu_scaled
469foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Knu_scaled" gsl_sf_bessel_Knu_scaled :: Double -> Double -> Double 469foreign import ccall unsafe "gsl_sf_bessel_Knu_scaled" gsl_sf_bessel_Knu_scaled :: Double -> Double -> Double
470 470
471bessel_Knu_scaled_e10_e :: Double -> Double -> (Double,Int,Double) 471bessel_Knu_scaled_e10_e :: Double -> Double -> (Double,Int,Double)
472bessel_Knu_scaled_e10_e nu x = createSFR_E10 "bessel_Knu_scaled_e10_e" $ gsl_sf_bessel_Knu_scaled_e10_e nu x 472bessel_Knu_scaled_e10_e nu x = createSFR_E10 "bessel_Knu_scaled_e10_e" $ gsl_sf_bessel_Knu_scaled_e10_e nu x
473foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Knu_scaled_e10_e" gsl_sf_bessel_Knu_scaled_e10_e :: Double -> Double -> Ptr () -> IO CInt 473foreign import ccall unsafe "gsl_sf_bessel_Knu_scaled_e10_e" gsl_sf_bessel_Knu_scaled_e10_e :: Double -> Double -> Ptr () -> IO CInt
474 474
475bessel_Knu_e :: Double -> Double -> (Double,Double) 475bessel_Knu_e :: Double -> Double -> (Double,Double)
476bessel_Knu_e nu x = createSFR "bessel_Knu_e" $ gsl_sf_bessel_Knu_e nu x 476bessel_Knu_e nu x = createSFR "bessel_Knu_e" $ gsl_sf_bessel_Knu_e nu x
477foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Knu_e" gsl_sf_bessel_Knu_e :: Double -> Double -> Ptr () -> IO CInt 477foreign import ccall unsafe "gsl_sf_bessel_Knu_e" gsl_sf_bessel_Knu_e :: Double -> Double -> Ptr () -> IO CInt
478 478
479bessel_Knu :: Double -> Double -> Double 479bessel_Knu :: Double -> Double -> Double
480bessel_Knu = gsl_sf_bessel_Knu 480bessel_Knu = gsl_sf_bessel_Knu
481foreign import ccall SAFE_CHEAP "gsl_sf_bessel_Knu" gsl_sf_bessel_Knu :: Double -> Double -> Double 481foreign import ccall unsafe "gsl_sf_bessel_Knu" gsl_sf_bessel_Knu :: Double -> Double -> Double
482 482
483bessel_lnKnu_e :: Double -> Double -> (Double,Double) 483bessel_lnKnu_e :: Double -> Double -> (Double,Double)
484bessel_lnKnu_e nu x = createSFR "bessel_lnKnu_e" $ gsl_sf_bessel_lnKnu_e nu x 484bessel_lnKnu_e nu x = createSFR "bessel_lnKnu_e" $ gsl_sf_bessel_lnKnu_e nu x
485foreign import ccall SAFE_CHEAP "gsl_sf_bessel_lnKnu_e" gsl_sf_bessel_lnKnu_e :: Double -> Double -> Ptr () -> IO CInt 485foreign import ccall unsafe "gsl_sf_bessel_lnKnu_e" gsl_sf_bessel_lnKnu_e :: Double -> Double -> Ptr () -> IO CInt
486 486
487bessel_lnKnu :: Double -> Double -> Double 487bessel_lnKnu :: Double -> Double -> Double
488bessel_lnKnu = gsl_sf_bessel_lnKnu 488bessel_lnKnu = gsl_sf_bessel_lnKnu
489foreign import ccall SAFE_CHEAP "gsl_sf_bessel_lnKnu" gsl_sf_bessel_lnKnu :: Double -> Double -> Double 489foreign import ccall unsafe "gsl_sf_bessel_lnKnu" gsl_sf_bessel_lnKnu :: Double -> Double -> Double
490 490
491bessel_zero_J0_e :: CInt -> (Double,Double) 491bessel_zero_J0_e :: CInt -> (Double,Double)
492bessel_zero_J0_e s = createSFR "bessel_zero_J0_e" $ gsl_sf_bessel_zero_J0_e s 492bessel_zero_J0_e s = createSFR "bessel_zero_J0_e" $ gsl_sf_bessel_zero_J0_e s
493foreign import ccall SAFE_CHEAP "gsl_sf_bessel_zero_J0_e" gsl_sf_bessel_zero_J0_e :: CInt -> Ptr () -> IO CInt 493foreign import ccall unsafe "gsl_sf_bessel_zero_J0_e" gsl_sf_bessel_zero_J0_e :: CInt -> Ptr () -> IO CInt
494 494
495bessel_zero_J0 :: CInt -> Double 495bessel_zero_J0 :: CInt -> Double
496bessel_zero_J0 = gsl_sf_bessel_zero_J0 496bessel_zero_J0 = gsl_sf_bessel_zero_J0
497foreign import ccall SAFE_CHEAP "gsl_sf_bessel_zero_J0" gsl_sf_bessel_zero_J0 :: CInt -> Double 497foreign import ccall unsafe "gsl_sf_bessel_zero_J0" gsl_sf_bessel_zero_J0 :: CInt -> Double
498 498
499bessel_zero_J1_e :: CInt -> (Double,Double) 499bessel_zero_J1_e :: CInt -> (Double,Double)
500bessel_zero_J1_e s = createSFR "bessel_zero_J1_e" $ gsl_sf_bessel_zero_J1_e s 500bessel_zero_J1_e s = createSFR "bessel_zero_J1_e" $ gsl_sf_bessel_zero_J1_e s
501foreign import ccall SAFE_CHEAP "gsl_sf_bessel_zero_J1_e" gsl_sf_bessel_zero_J1_e :: CInt -> Ptr () -> IO CInt 501foreign import ccall unsafe "gsl_sf_bessel_zero_J1_e" gsl_sf_bessel_zero_J1_e :: CInt -> Ptr () -> IO CInt
502 502
503bessel_zero_J1 :: CInt -> Double 503bessel_zero_J1 :: CInt -> Double
504bessel_zero_J1 = gsl_sf_bessel_zero_J1 504bessel_zero_J1 = gsl_sf_bessel_zero_J1
505foreign import ccall SAFE_CHEAP "gsl_sf_bessel_zero_J1" gsl_sf_bessel_zero_J1 :: CInt -> Double 505foreign import ccall unsafe "gsl_sf_bessel_zero_J1" gsl_sf_bessel_zero_J1 :: CInt -> Double
506 506
507bessel_zero_Jnu_e :: Double -> CInt -> (Double,Double) 507bessel_zero_Jnu_e :: Double -> CInt -> (Double,Double)
508bessel_zero_Jnu_e nu s = createSFR "bessel_zero_Jnu_e" $ gsl_sf_bessel_zero_Jnu_e nu s 508bessel_zero_Jnu_e nu s = createSFR "bessel_zero_Jnu_e" $ gsl_sf_bessel_zero_Jnu_e nu s
509foreign import ccall SAFE_CHEAP "gsl_sf_bessel_zero_Jnu_e" gsl_sf_bessel_zero_Jnu_e :: Double -> CInt -> Ptr () -> IO CInt 509foreign import ccall unsafe "gsl_sf_bessel_zero_Jnu_e" gsl_sf_bessel_zero_Jnu_e :: Double -> CInt -> Ptr () -> IO CInt
510 510
511bessel_zero_Jnu :: Double -> CInt -> Double 511bessel_zero_Jnu :: Double -> CInt -> Double
512bessel_zero_Jnu = gsl_sf_bessel_zero_Jnu 512bessel_zero_Jnu = gsl_sf_bessel_zero_Jnu
513foreign import ccall SAFE_CHEAP "gsl_sf_bessel_zero_Jnu" gsl_sf_bessel_zero_Jnu :: Double -> CInt -> Double 513foreign import ccall unsafe "gsl_sf_bessel_zero_Jnu" gsl_sf_bessel_zero_Jnu :: Double -> CInt -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Clausen.hs b/packages/special/lib/Numeric/GSL/Special/Clausen.hs
index 80bd45c..de7d605 100644
--- a/packages/special/lib/Numeric/GSL/Special/Clausen.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Clausen.hs
@@ -23,8 +23,8 @@ import Numeric.GSL.Special.Internal
23 23
24clausen_e :: Double -> (Double,Double) 24clausen_e :: Double -> (Double,Double)
25clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x 25clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x
26foreign import ccall SAFE_CHEAP "gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr () -> IO CInt 26foreign import ccall unsafe "gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr () -> IO CInt
27 27
28clausen :: Double -> Double 28clausen :: Double -> Double
29clausen = gsl_sf_clausen 29clausen = gsl_sf_clausen
30foreign import ccall SAFE_CHEAP "gsl_sf_clausen" gsl_sf_clausen :: Double -> Double 30foreign import ccall unsafe "gsl_sf_clausen" gsl_sf_clausen :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Coulomb.hs b/packages/special/lib/Numeric/GSL/Special/Coulomb.hs
index 218213a..1d47d4e 100644
--- a/packages/special/lib/Numeric/GSL/Special/Coulomb.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Coulomb.hs
@@ -26,44 +26,44 @@ import Numeric.GSL.Special.Internal
26 26
27hydrogenicR_1_e :: Double -> Double -> (Double,Double) 27hydrogenicR_1_e :: Double -> Double -> (Double,Double)
28hydrogenicR_1_e zZ r = createSFR "hydrogenicR_1_e" $ gsl_sf_hydrogenicR_1_e zZ r 28hydrogenicR_1_e zZ r = createSFR "hydrogenicR_1_e" $ gsl_sf_hydrogenicR_1_e zZ r
29foreign import ccall SAFE_CHEAP "gsl_sf_hydrogenicR_1_e" gsl_sf_hydrogenicR_1_e :: Double -> Double -> Ptr () -> IO CInt 29foreign import ccall unsafe "gsl_sf_hydrogenicR_1_e" gsl_sf_hydrogenicR_1_e :: Double -> Double -> Ptr () -> IO CInt
30 30
31hydrogenicR_1 :: Double -> Double -> Double 31hydrogenicR_1 :: Double -> Double -> Double
32hydrogenicR_1 = gsl_sf_hydrogenicR_1 32hydrogenicR_1 = gsl_sf_hydrogenicR_1
33foreign import ccall SAFE_CHEAP "gsl_sf_hydrogenicR_1" gsl_sf_hydrogenicR_1 :: Double -> Double -> Double 33foreign import ccall unsafe "gsl_sf_hydrogenicR_1" gsl_sf_hydrogenicR_1 :: Double -> Double -> Double
34 34
35hydrogenicR_e :: CInt -> CInt -> Double -> Double -> (Double,Double) 35hydrogenicR_e :: CInt -> CInt -> Double -> Double -> (Double,Double)
36hydrogenicR_e n l zZ r = createSFR "hydrogenicR_e" $ gsl_sf_hydrogenicR_e n l zZ r 36hydrogenicR_e n l zZ r = createSFR "hydrogenicR_e" $ gsl_sf_hydrogenicR_e n l zZ r
37foreign import ccall SAFE_CHEAP "gsl_sf_hydrogenicR_e" gsl_sf_hydrogenicR_e :: CInt -> CInt -> Double -> Double -> Ptr () -> IO CInt 37foreign import ccall unsafe "gsl_sf_hydrogenicR_e" gsl_sf_hydrogenicR_e :: CInt -> CInt -> Double -> Double -> Ptr () -> IO CInt
38 38
39hydrogenicR :: CInt -> CInt -> Double -> Double -> Double 39hydrogenicR :: CInt -> CInt -> Double -> Double -> Double
40hydrogenicR = gsl_sf_hydrogenicR 40hydrogenicR = gsl_sf_hydrogenicR
41foreign import ccall SAFE_CHEAP "gsl_sf_hydrogenicR" gsl_sf_hydrogenicR :: CInt -> CInt -> Double -> Double -> Double 41foreign import ccall unsafe "gsl_sf_hydrogenicR" gsl_sf_hydrogenicR :: CInt -> CInt -> Double -> Double -> Double
42 42
43coulomb_wave_FG_e :: Double -> Double -> Double -> CInt -> Ptr () -> Ptr () -> Ptr () -> Ptr () -> Ptr Double -> Ptr Double -> CInt 43coulomb_wave_FG_e :: Double -> Double -> Double -> CInt -> Ptr () -> Ptr () -> Ptr () -> Ptr () -> Ptr Double -> Ptr Double -> CInt
44coulomb_wave_FG_e = gsl_sf_coulomb_wave_FG_e 44coulomb_wave_FG_e = gsl_sf_coulomb_wave_FG_e
45foreign import ccall SAFE_CHEAP "gsl_sf_coulomb_wave_FG_e" gsl_sf_coulomb_wave_FG_e :: Double -> Double -> Double -> CInt -> Ptr () -> Ptr () -> Ptr () -> Ptr () -> Ptr Double -> Ptr Double -> CInt 45foreign import ccall unsafe "gsl_sf_coulomb_wave_FG_e" gsl_sf_coulomb_wave_FG_e :: Double -> Double -> Double -> CInt -> Ptr () -> Ptr () -> Ptr () -> Ptr () -> Ptr Double -> Ptr Double -> CInt
46 46
47coulomb_wave_F_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt 47coulomb_wave_F_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt
48coulomb_wave_F_array = gsl_sf_coulomb_wave_F_array 48coulomb_wave_F_array = gsl_sf_coulomb_wave_F_array
49foreign import ccall SAFE_CHEAP "gsl_sf_coulomb_wave_F_array" gsl_sf_coulomb_wave_F_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt 49foreign import ccall unsafe "gsl_sf_coulomb_wave_F_array" gsl_sf_coulomb_wave_F_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt
50 50
51coulomb_wave_FG_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt 51coulomb_wave_FG_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt
52coulomb_wave_FG_array = gsl_sf_coulomb_wave_FG_array 52coulomb_wave_FG_array = gsl_sf_coulomb_wave_FG_array
53foreign import ccall SAFE_CHEAP "gsl_sf_coulomb_wave_FG_array" gsl_sf_coulomb_wave_FG_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt 53foreign import ccall unsafe "gsl_sf_coulomb_wave_FG_array" gsl_sf_coulomb_wave_FG_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt
54 54
55coulomb_wave_FGp_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt 55coulomb_wave_FGp_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt
56coulomb_wave_FGp_array = gsl_sf_coulomb_wave_FGp_array 56coulomb_wave_FGp_array = gsl_sf_coulomb_wave_FGp_array
57foreign import ccall SAFE_CHEAP "gsl_sf_coulomb_wave_FGp_array" gsl_sf_coulomb_wave_FGp_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt 57foreign import ccall unsafe "gsl_sf_coulomb_wave_FGp_array" gsl_sf_coulomb_wave_FGp_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> Ptr Double -> CInt
58 58
59coulomb_wave_sphF_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt 59coulomb_wave_sphF_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt
60coulomb_wave_sphF_array = gsl_sf_coulomb_wave_sphF_array 60coulomb_wave_sphF_array = gsl_sf_coulomb_wave_sphF_array
61foreign import ccall SAFE_CHEAP "gsl_sf_coulomb_wave_sphF_array" gsl_sf_coulomb_wave_sphF_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt 61foreign import ccall unsafe "gsl_sf_coulomb_wave_sphF_array" gsl_sf_coulomb_wave_sphF_array :: Double -> CInt -> Double -> Double -> Ptr Double -> Ptr Double -> CInt
62 62
63coulomb_CL_e :: Double -> Double -> (Double,Double) 63coulomb_CL_e :: Double -> Double -> (Double,Double)
64coulomb_CL_e lL eta = createSFR "coulomb_CL_e" $ gsl_sf_coulomb_CL_e lL eta 64coulomb_CL_e lL eta = createSFR "coulomb_CL_e" $ gsl_sf_coulomb_CL_e lL eta
65foreign import ccall SAFE_CHEAP "gsl_sf_coulomb_CL_e" gsl_sf_coulomb_CL_e :: Double -> Double -> Ptr () -> IO CInt 65foreign import ccall unsafe "gsl_sf_coulomb_CL_e" gsl_sf_coulomb_CL_e :: Double -> Double -> Ptr () -> IO CInt
66 66
67coulomb_CL_array :: Double -> CInt -> Double -> Ptr Double -> CInt 67coulomb_CL_array :: Double -> CInt -> Double -> Ptr Double -> CInt
68coulomb_CL_array = gsl_sf_coulomb_CL_array 68coulomb_CL_array = gsl_sf_coulomb_CL_array
69foreign import ccall SAFE_CHEAP "gsl_sf_coulomb_CL_array" gsl_sf_coulomb_CL_array :: Double -> CInt -> Double -> Ptr Double -> CInt 69foreign import ccall unsafe "gsl_sf_coulomb_CL_array" gsl_sf_coulomb_CL_array :: Double -> CInt -> Double -> Ptr Double -> CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Coupling.hs b/packages/special/lib/Numeric/GSL/Special/Coupling.hs
index 326f53f..777e410 100644
--- a/packages/special/lib/Numeric/GSL/Special/Coupling.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Coupling.hs
@@ -29,40 +29,40 @@ import Numeric.GSL.Special.Internal
29 29
30coupling_3j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double) 30coupling_3j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double)
31coupling_3j_e two_ja two_jb two_jc two_ma two_mb two_mc = createSFR "coupling_3j_e" $ gsl_sf_coupling_3j_e two_ja two_jb two_jc two_ma two_mb two_mc 31coupling_3j_e two_ja two_jb two_jc two_ma two_mb two_mc = createSFR "coupling_3j_e" $ gsl_sf_coupling_3j_e two_ja two_jb two_jc two_ma two_mb two_mc
32foreign import ccall SAFE_CHEAP "gsl_sf_coupling_3j_e" gsl_sf_coupling_3j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt 32foreign import ccall unsafe "gsl_sf_coupling_3j_e" gsl_sf_coupling_3j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt
33 33
34coupling_3j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 34coupling_3j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
35coupling_3j = gsl_sf_coupling_3j 35coupling_3j = gsl_sf_coupling_3j
36foreign import ccall SAFE_CHEAP "gsl_sf_coupling_3j" gsl_sf_coupling_3j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 36foreign import ccall unsafe "gsl_sf_coupling_3j" gsl_sf_coupling_3j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
37 37
38coupling_6j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double) 38coupling_6j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double)
39coupling_6j_e two_ja two_jb two_jc two_jd two_je two_jf = createSFR "coupling_6j_e" $ gsl_sf_coupling_6j_e two_ja two_jb two_jc two_jd two_je two_jf 39coupling_6j_e two_ja two_jb two_jc two_jd two_je two_jf = createSFR "coupling_6j_e" $ gsl_sf_coupling_6j_e two_ja two_jb two_jc two_jd two_je two_jf
40foreign import ccall SAFE_CHEAP "gsl_sf_coupling_6j_e" gsl_sf_coupling_6j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt 40foreign import ccall unsafe "gsl_sf_coupling_6j_e" gsl_sf_coupling_6j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt
41 41
42coupling_6j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 42coupling_6j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
43coupling_6j = gsl_sf_coupling_6j 43coupling_6j = gsl_sf_coupling_6j
44foreign import ccall SAFE_CHEAP "gsl_sf_coupling_6j" gsl_sf_coupling_6j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 44foreign import ccall unsafe "gsl_sf_coupling_6j" gsl_sf_coupling_6j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
45 45
46coupling_RacahW_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double) 46coupling_RacahW_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double)
47coupling_RacahW_e two_ja two_jb two_jc two_jd two_je two_jf = createSFR "coupling_RacahW_e" $ gsl_sf_coupling_RacahW_e two_ja two_jb two_jc two_jd two_je two_jf 47coupling_RacahW_e two_ja two_jb two_jc two_jd two_je two_jf = createSFR "coupling_RacahW_e" $ gsl_sf_coupling_RacahW_e two_ja two_jb two_jc two_jd two_je two_jf
48foreign import ccall SAFE_CHEAP "gsl_sf_coupling_RacahW_e" gsl_sf_coupling_RacahW_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt 48foreign import ccall unsafe "gsl_sf_coupling_RacahW_e" gsl_sf_coupling_RacahW_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt
49 49
50coupling_RacahW :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 50coupling_RacahW :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
51coupling_RacahW = gsl_sf_coupling_RacahW 51coupling_RacahW = gsl_sf_coupling_RacahW
52foreign import ccall SAFE_CHEAP "gsl_sf_coupling_RacahW" gsl_sf_coupling_RacahW :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 52foreign import ccall unsafe "gsl_sf_coupling_RacahW" gsl_sf_coupling_RacahW :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
53 53
54coupling_9j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double) 54coupling_9j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double)
55coupling_9j_e two_ja two_jb two_jc two_jd two_je two_jf two_jg two_jh two_ji = createSFR "coupling_9j_e" $ gsl_sf_coupling_9j_e two_ja two_jb two_jc two_jd two_je two_jf two_jg two_jh two_ji 55coupling_9j_e two_ja two_jb two_jc two_jd two_je two_jf two_jg two_jh two_ji = createSFR "coupling_9j_e" $ gsl_sf_coupling_9j_e two_ja two_jb two_jc two_jd two_je two_jf two_jg two_jh two_ji
56foreign import ccall SAFE_CHEAP "gsl_sf_coupling_9j_e" gsl_sf_coupling_9j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt 56foreign import ccall unsafe "gsl_sf_coupling_9j_e" gsl_sf_coupling_9j_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt
57 57
58coupling_9j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 58coupling_9j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
59coupling_9j = gsl_sf_coupling_9j 59coupling_9j = gsl_sf_coupling_9j
60foreign import ccall SAFE_CHEAP "gsl_sf_coupling_9j" gsl_sf_coupling_9j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 60foreign import ccall unsafe "gsl_sf_coupling_9j" gsl_sf_coupling_9j :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
61 61
62coupling_6j_INCORRECT_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double) 62coupling_6j_INCORRECT_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> (Double,Double)
63coupling_6j_INCORRECT_e two_ja two_jb two_jc two_jd two_je two_jf = createSFR "coupling_6j_INCORRECT_e" $ gsl_sf_coupling_6j_INCORRECT_e two_ja two_jb two_jc two_jd two_je two_jf 63coupling_6j_INCORRECT_e two_ja two_jb two_jc two_jd two_je two_jf = createSFR "coupling_6j_INCORRECT_e" $ gsl_sf_coupling_6j_INCORRECT_e two_ja two_jb two_jc two_jd two_je two_jf
64foreign import ccall SAFE_CHEAP "gsl_sf_coupling_6j_INCORRECT_e" gsl_sf_coupling_6j_INCORRECT_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt 64foreign import ccall unsafe "gsl_sf_coupling_6j_INCORRECT_e" gsl_sf_coupling_6j_INCORRECT_e :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Ptr () -> IO CInt
65 65
66coupling_6j_INCORRECT :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 66coupling_6j_INCORRECT :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
67coupling_6j_INCORRECT = gsl_sf_coupling_6j_INCORRECT 67coupling_6j_INCORRECT = gsl_sf_coupling_6j_INCORRECT
68foreign import ccall SAFE_CHEAP "gsl_sf_coupling_6j_INCORRECT" gsl_sf_coupling_6j_INCORRECT :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double 68foreign import ccall unsafe "gsl_sf_coupling_6j_INCORRECT" gsl_sf_coupling_6j_INCORRECT :: CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Dawson.hs b/packages/special/lib/Numeric/GSL/Special/Dawson.hs
index 9f73767..64b6ced 100644
--- a/packages/special/lib/Numeric/GSL/Special/Dawson.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Dawson.hs
@@ -23,8 +23,8 @@ import Numeric.GSL.Special.Internal
23 23
24dawson_e :: Double -> (Double,Double) 24dawson_e :: Double -> (Double,Double)
25dawson_e x = createSFR "dawson_e" $ gsl_sf_dawson_e x 25dawson_e x = createSFR "dawson_e" $ gsl_sf_dawson_e x
26foreign import ccall SAFE_CHEAP "gsl_sf_dawson_e" gsl_sf_dawson_e :: Double -> Ptr () -> IO CInt 26foreign import ccall unsafe "gsl_sf_dawson_e" gsl_sf_dawson_e :: Double -> Ptr () -> IO CInt
27 27
28dawson :: Double -> Double 28dawson :: Double -> Double
29dawson = gsl_sf_dawson 29dawson = gsl_sf_dawson
30foreign import ccall SAFE_CHEAP "gsl_sf_dawson" gsl_sf_dawson :: Double -> Double 30foreign import ccall unsafe "gsl_sf_dawson" gsl_sf_dawson :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Debye.hs b/packages/special/lib/Numeric/GSL/Special/Debye.hs
index 7ca17e4..27b25e2 100644
--- a/packages/special/lib/Numeric/GSL/Special/Debye.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Debye.hs
@@ -33,48 +33,48 @@ import Numeric.GSL.Special.Internal
33 33
34debye_1_e :: Double -> (Double,Double) 34debye_1_e :: Double -> (Double,Double)
35debye_1_e x = createSFR "debye_1_e" $ gsl_sf_debye_1_e x 35debye_1_e x = createSFR "debye_1_e" $ gsl_sf_debye_1_e x
36foreign import ccall SAFE_CHEAP "gsl_sf_debye_1_e" gsl_sf_debye_1_e :: Double -> Ptr () -> IO CInt 36foreign import ccall unsafe "gsl_sf_debye_1_e" gsl_sf_debye_1_e :: Double -> Ptr () -> IO CInt
37 37
38debye_1 :: Double -> Double 38debye_1 :: Double -> Double
39debye_1 = gsl_sf_debye_1 39debye_1 = gsl_sf_debye_1
40foreign import ccall SAFE_CHEAP "gsl_sf_debye_1" gsl_sf_debye_1 :: Double -> Double 40foreign import ccall unsafe "gsl_sf_debye_1" gsl_sf_debye_1 :: Double -> Double
41 41
42debye_2_e :: Double -> (Double,Double) 42debye_2_e :: Double -> (Double,Double)
43debye_2_e x = createSFR "debye_2_e" $ gsl_sf_debye_2_e x 43debye_2_e x = createSFR "debye_2_e" $ gsl_sf_debye_2_e x
44foreign import ccall SAFE_CHEAP "gsl_sf_debye_2_e" gsl_sf_debye_2_e :: Double -> Ptr () -> IO CInt 44foreign import ccall unsafe "gsl_sf_debye_2_e" gsl_sf_debye_2_e :: Double -> Ptr () -> IO CInt
45 45
46debye_2 :: Double -> Double 46debye_2 :: Double -> Double
47debye_2 = gsl_sf_debye_2 47debye_2 = gsl_sf_debye_2
48foreign import ccall SAFE_CHEAP "gsl_sf_debye_2" gsl_sf_debye_2 :: Double -> Double 48foreign import ccall unsafe "gsl_sf_debye_2" gsl_sf_debye_2 :: Double -> Double
49 49
50debye_3_e :: Double -> (Double,Double) 50debye_3_e :: Double -> (Double,Double)
51debye_3_e x = createSFR "debye_3_e" $ gsl_sf_debye_3_e x 51debye_3_e x = createSFR "debye_3_e" $ gsl_sf_debye_3_e x
52foreign import ccall SAFE_CHEAP "gsl_sf_debye_3_e" gsl_sf_debye_3_e :: Double -> Ptr () -> IO CInt 52foreign import ccall unsafe "gsl_sf_debye_3_e" gsl_sf_debye_3_e :: Double -> Ptr () -> IO CInt
53 53
54debye_3 :: Double -> Double 54debye_3 :: Double -> Double
55debye_3 = gsl_sf_debye_3 55debye_3 = gsl_sf_debye_3
56foreign import ccall SAFE_CHEAP "gsl_sf_debye_3" gsl_sf_debye_3 :: Double -> Double 56foreign import ccall unsafe "gsl_sf_debye_3" gsl_sf_debye_3 :: Double -> Double
57 57
58debye_4_e :: Double -> (Double,Double) 58debye_4_e :: Double -> (Double,Double)
59debye_4_e x = createSFR "debye_4_e" $ gsl_sf_debye_4_e x 59debye_4_e x = createSFR "debye_4_e" $ gsl_sf_debye_4_e x
60foreign import ccall SAFE_CHEAP "gsl_sf_debye_4_e" gsl_sf_debye_4_e :: Double -> Ptr () -> IO CInt 60foreign import ccall unsafe "gsl_sf_debye_4_e" gsl_sf_debye_4_e :: Double -> Ptr () -> IO CInt
61 61
62debye_4 :: Double -> Double 62debye_4 :: Double -> Double
63debye_4 = gsl_sf_debye_4 63debye_4 = gsl_sf_debye_4
64foreign import ccall SAFE_CHEAP "gsl_sf_debye_4" gsl_sf_debye_4 :: Double -> Double 64foreign import ccall unsafe "gsl_sf_debye_4" gsl_sf_debye_4 :: Double -> Double
65 65
66debye_5_e :: Double -> (Double,Double) 66debye_5_e :: Double -> (Double,Double)
67debye_5_e x = createSFR "debye_5_e" $ gsl_sf_debye_5_e x 67debye_5_e x = createSFR "debye_5_e" $ gsl_sf_debye_5_e x
68foreign import ccall SAFE_CHEAP "gsl_sf_debye_5_e" gsl_sf_debye_5_e :: Double -> Ptr () -> IO CInt 68foreign import ccall unsafe "gsl_sf_debye_5_e" gsl_sf_debye_5_e :: Double -> Ptr () -> IO CInt
69 69
70debye_5 :: Double -> Double 70debye_5 :: Double -> Double
71debye_5 = gsl_sf_debye_5 71debye_5 = gsl_sf_debye_5
72foreign import ccall SAFE_CHEAP "gsl_sf_debye_5" gsl_sf_debye_5 :: Double -> Double 72foreign import ccall unsafe "gsl_sf_debye_5" gsl_sf_debye_5 :: Double -> Double
73 73
74debye_6_e :: Double -> (Double,Double) 74debye_6_e :: Double -> (Double,Double)
75debye_6_e x = createSFR "debye_6_e" $ gsl_sf_debye_6_e x 75debye_6_e x = createSFR "debye_6_e" $ gsl_sf_debye_6_e x
76foreign import ccall SAFE_CHEAP "gsl_sf_debye_6_e" gsl_sf_debye_6_e :: Double -> Ptr () -> IO CInt 76foreign import ccall unsafe "gsl_sf_debye_6_e" gsl_sf_debye_6_e :: Double -> Ptr () -> IO CInt
77 77
78debye_6 :: Double -> Double 78debye_6 :: Double -> Double
79debye_6 = gsl_sf_debye_6 79debye_6 = gsl_sf_debye_6
80foreign import ccall SAFE_CHEAP "gsl_sf_debye_6" gsl_sf_debye_6 :: Double -> Double 80foreign import ccall unsafe "gsl_sf_debye_6" gsl_sf_debye_6 :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Dilog.hs b/packages/special/lib/Numeric/GSL/Special/Dilog.hs
index 32cceba..2c9810f 100644
--- a/packages/special/lib/Numeric/GSL/Special/Dilog.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Dilog.hs
@@ -26,20 +26,20 @@ import Numeric.GSL.Special.Internal
26 26
27dilog_e :: Double -> (Double,Double) 27dilog_e :: Double -> (Double,Double)
28dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x 28dilog_e x = createSFR "dilog_e" $ gsl_sf_dilog_e x
29foreign import ccall SAFE_CHEAP "gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr () -> IO CInt 29foreign import ccall unsafe "gsl_sf_dilog_e" gsl_sf_dilog_e :: Double -> Ptr () -> IO CInt
30 30
31dilog :: Double -> Double 31dilog :: Double -> Double
32dilog = gsl_sf_dilog 32dilog = gsl_sf_dilog
33foreign import ccall SAFE_CHEAP "gsl_sf_dilog" gsl_sf_dilog :: Double -> Double 33foreign import ccall unsafe "gsl_sf_dilog" gsl_sf_dilog :: Double -> Double
34 34
35complex_dilog_xy_e :: Double -> Double -> ((Double,Double),(Double,Double)) 35complex_dilog_xy_e :: Double -> Double -> ((Double,Double),(Double,Double))
36complex_dilog_xy_e x y = create2SFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y 36complex_dilog_xy_e x y = create2SFR "complex_dilog_xy_e" $ gsl_sf_complex_dilog_xy_e x y
37foreign import ccall SAFE_CHEAP "gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 37foreign import ccall unsafe "gsl_sf_complex_dilog_xy_e" gsl_sf_complex_dilog_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
38 38
39complex_dilog_e :: Double -> Double -> ((Double,Double),(Double,Double)) 39complex_dilog_e :: Double -> Double -> ((Double,Double),(Double,Double))
40complex_dilog_e r theta = create2SFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta 40complex_dilog_e r theta = create2SFR "complex_dilog_e" $ gsl_sf_complex_dilog_e r theta
41foreign import ccall SAFE_CHEAP "gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 41foreign import ccall unsafe "gsl_sf_complex_dilog_e" gsl_sf_complex_dilog_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
42 42
43complex_spence_xy_e :: Double -> Double -> ((Double,Double),(Double,Double)) 43complex_spence_xy_e :: Double -> Double -> ((Double,Double),(Double,Double))
44complex_spence_xy_e x y = create2SFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y 44complex_spence_xy_e x y = create2SFR "complex_spence_xy_e" $ gsl_sf_complex_spence_xy_e x y
45foreign import ccall SAFE_CHEAP "gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 45foreign import ccall unsafe "gsl_sf_complex_spence_xy_e" gsl_sf_complex_spence_xy_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Elementary.hs b/packages/special/lib/Numeric/GSL/Special/Elementary.hs
index e58a697..609081b 100644
--- a/packages/special/lib/Numeric/GSL/Special/Elementary.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Elementary.hs
@@ -24,12 +24,12 @@ import Numeric.GSL.Special.Internal
24 24
25multiply_e :: Double -> Double -> (Double,Double) 25multiply_e :: Double -> Double -> (Double,Double)
26multiply_e x y = createSFR "multiply_e" $ gsl_sf_multiply_e x y 26multiply_e x y = createSFR "multiply_e" $ gsl_sf_multiply_e x y
27foreign import ccall SAFE_CHEAP "gsl_sf_multiply_e" gsl_sf_multiply_e :: Double -> Double -> Ptr () -> IO CInt 27foreign import ccall unsafe "gsl_sf_multiply_e" gsl_sf_multiply_e :: Double -> Double -> Ptr () -> IO CInt
28 28
29multiply :: Double -> Double -> Double 29multiply :: Double -> Double -> Double
30multiply = gsl_sf_multiply 30multiply = gsl_sf_multiply
31foreign import ccall SAFE_CHEAP "gsl_sf_multiply" gsl_sf_multiply :: Double -> Double -> Double 31foreign import ccall unsafe "gsl_sf_multiply" gsl_sf_multiply :: Double -> Double -> Double
32 32
33multiply_err_e :: Double -> Double -> Double -> Double -> (Double,Double) 33multiply_err_e :: Double -> Double -> Double -> Double -> (Double,Double)
34multiply_err_e x dx y dy = createSFR "multiply_err_e" $ gsl_sf_multiply_err_e x dx y dy 34multiply_err_e x dx y dy = createSFR "multiply_err_e" $ gsl_sf_multiply_err_e x dx y dy
35foreign import ccall SAFE_CHEAP "gsl_sf_multiply_err_e" gsl_sf_multiply_err_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 35foreign import ccall unsafe "gsl_sf_multiply_err_e" gsl_sf_multiply_err_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Ellint.hs b/packages/special/lib/Numeric/GSL/Special/Ellint.hs
index 365c366..5837a7f 100644
--- a/packages/special/lib/Numeric/GSL/Special/Ellint.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Ellint.hs
@@ -45,96 +45,96 @@ import Numeric.GSL.Special.Internal
45 45
46ellint_Kcomp_e :: Double -> Precision -> (Double,Double) 46ellint_Kcomp_e :: Double -> Precision -> (Double,Double)
47ellint_Kcomp_e k mode = createSFR "ellint_Kcomp_e" $ gsl_sf_ellint_Kcomp_e k (precCode mode) 47ellint_Kcomp_e k mode = createSFR "ellint_Kcomp_e" $ gsl_sf_ellint_Kcomp_e k (precCode mode)
48foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Kcomp_e" gsl_sf_ellint_Kcomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 48foreign import ccall unsafe "gsl_sf_ellint_Kcomp_e" gsl_sf_ellint_Kcomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
49 49
50ellint_Kcomp :: Double -> Precision -> Double 50ellint_Kcomp :: Double -> Precision -> Double
51ellint_Kcomp k mode = gsl_sf_ellint_Kcomp k (precCode mode) 51ellint_Kcomp k mode = gsl_sf_ellint_Kcomp k (precCode mode)
52foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Kcomp" gsl_sf_ellint_Kcomp :: Double -> Gsl_mode_t -> Double 52foreign import ccall unsafe "gsl_sf_ellint_Kcomp" gsl_sf_ellint_Kcomp :: Double -> Gsl_mode_t -> Double
53 53
54ellint_Ecomp_e :: Double -> Precision -> (Double,Double) 54ellint_Ecomp_e :: Double -> Precision -> (Double,Double)
55ellint_Ecomp_e k mode = createSFR "ellint_Ecomp_e" $ gsl_sf_ellint_Ecomp_e k (precCode mode) 55ellint_Ecomp_e k mode = createSFR "ellint_Ecomp_e" $ gsl_sf_ellint_Ecomp_e k (precCode mode)
56foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Ecomp_e" gsl_sf_ellint_Ecomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 56foreign import ccall unsafe "gsl_sf_ellint_Ecomp_e" gsl_sf_ellint_Ecomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
57 57
58ellint_Ecomp :: Double -> Precision -> Double 58ellint_Ecomp :: Double -> Precision -> Double
59ellint_Ecomp k mode = gsl_sf_ellint_Ecomp k (precCode mode) 59ellint_Ecomp k mode = gsl_sf_ellint_Ecomp k (precCode mode)
60foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Ecomp" gsl_sf_ellint_Ecomp :: Double -> Gsl_mode_t -> Double 60foreign import ccall unsafe "gsl_sf_ellint_Ecomp" gsl_sf_ellint_Ecomp :: Double -> Gsl_mode_t -> Double
61 61
62ellint_Pcomp_e :: Double -> Double -> Precision -> (Double,Double) 62ellint_Pcomp_e :: Double -> Double -> Precision -> (Double,Double)
63ellint_Pcomp_e k n mode = createSFR "ellint_Pcomp_e" $ gsl_sf_ellint_Pcomp_e k n (precCode mode) 63ellint_Pcomp_e k n mode = createSFR "ellint_Pcomp_e" $ gsl_sf_ellint_Pcomp_e k n (precCode mode)
64foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Pcomp_e" gsl_sf_ellint_Pcomp_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 64foreign import ccall unsafe "gsl_sf_ellint_Pcomp_e" gsl_sf_ellint_Pcomp_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
65 65
66ellint_Pcomp :: Double -> Double -> Precision -> Double 66ellint_Pcomp :: Double -> Double -> Precision -> Double
67ellint_Pcomp k n mode = gsl_sf_ellint_Pcomp k n (precCode mode) 67ellint_Pcomp k n mode = gsl_sf_ellint_Pcomp k n (precCode mode)
68foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Pcomp" gsl_sf_ellint_Pcomp :: Double -> Double -> Gsl_mode_t -> Double 68foreign import ccall unsafe "gsl_sf_ellint_Pcomp" gsl_sf_ellint_Pcomp :: Double -> Double -> Gsl_mode_t -> Double
69 69
70ellint_Dcomp_e :: Double -> Precision -> (Double,Double) 70ellint_Dcomp_e :: Double -> Precision -> (Double,Double)
71ellint_Dcomp_e k mode = createSFR "ellint_Dcomp_e" $ gsl_sf_ellint_Dcomp_e k (precCode mode) 71ellint_Dcomp_e k mode = createSFR "ellint_Dcomp_e" $ gsl_sf_ellint_Dcomp_e k (precCode mode)
72foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Dcomp_e" gsl_sf_ellint_Dcomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt 72foreign import ccall unsafe "gsl_sf_ellint_Dcomp_e" gsl_sf_ellint_Dcomp_e :: Double -> Gsl_mode_t -> Ptr () -> IO CInt
73 73
74ellint_Dcomp :: Double -> Precision -> Double 74ellint_Dcomp :: Double -> Precision -> Double
75ellint_Dcomp k mode = gsl_sf_ellint_Dcomp k (precCode mode) 75ellint_Dcomp k mode = gsl_sf_ellint_Dcomp k (precCode mode)
76foreign import ccall SAFE_CHEAP "gsl_sf_ellint_Dcomp" gsl_sf_ellint_Dcomp :: Double -> Gsl_mode_t -> Double 76foreign import ccall unsafe "gsl_sf_ellint_Dcomp" gsl_sf_ellint_Dcomp :: Double -> Gsl_mode_t -> Double
77 77
78ellint_F_e :: Double -> Double -> Precision -> (Double,Double) 78ellint_F_e :: Double -> Double -> Precision -> (Double,Double)
79ellint_F_e phi k mode = createSFR "ellint_F_e" $ gsl_sf_ellint_F_e phi k (precCode mode) 79ellint_F_e phi k mode = createSFR "ellint_F_e" $ gsl_sf_ellint_F_e phi k (precCode mode)
80foreign import ccall SAFE_CHEAP "gsl_sf_ellint_F_e" gsl_sf_ellint_F_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 80foreign import ccall unsafe "gsl_sf_ellint_F_e" gsl_sf_ellint_F_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
81 81
82ellint_F :: Double -> Double -> Precision -> Double 82ellint_F :: Double -> Double -> Precision -> Double
83ellint_F phi k mode = gsl_sf_ellint_F phi k (precCode mode) 83ellint_F phi k mode = gsl_sf_ellint_F phi k (precCode mode)
84foreign import ccall SAFE_CHEAP "gsl_sf_ellint_F" gsl_sf_ellint_F :: Double -> Double -> Gsl_mode_t -> Double 84foreign import ccall unsafe "gsl_sf_ellint_F" gsl_sf_ellint_F :: Double -> Double -> Gsl_mode_t -> Double
85 85
86ellint_E_e :: Double -> Double -> Precision -> (Double,Double) 86ellint_E_e :: Double -> Double -> Precision -> (Double,Double)
87ellint_E_e phi k mode = createSFR "ellint_E_e" $ gsl_sf_ellint_E_e phi k (precCode mode) 87ellint_E_e phi k mode = createSFR "ellint_E_e" $ gsl_sf_ellint_E_e phi k (precCode mode)
88foreign import ccall SAFE_CHEAP "gsl_sf_ellint_E_e" gsl_sf_ellint_E_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 88foreign import ccall unsafe "gsl_sf_ellint_E_e" gsl_sf_ellint_E_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
89 89
90ellint_E :: Double -> Double -> Precision -> Double 90ellint_E :: Double -> Double -> Precision -> Double
91ellint_E phi k mode = gsl_sf_ellint_E phi k (precCode mode) 91ellint_E phi k mode = gsl_sf_ellint_E phi k (precCode mode)
92foreign import ccall SAFE_CHEAP "gsl_sf_ellint_E" gsl_sf_ellint_E :: Double -> Double -> Gsl_mode_t -> Double 92foreign import ccall unsafe "gsl_sf_ellint_E" gsl_sf_ellint_E :: Double -> Double -> Gsl_mode_t -> Double
93 93
94ellint_P_e :: Double -> Double -> Double -> Precision -> (Double,Double) 94ellint_P_e :: Double -> Double -> Double -> Precision -> (Double,Double)
95ellint_P_e phi k n mode = createSFR "ellint_P_e" $ gsl_sf_ellint_P_e phi k n (precCode mode) 95ellint_P_e phi k n mode = createSFR "ellint_P_e" $ gsl_sf_ellint_P_e phi k n (precCode mode)
96foreign import ccall SAFE_CHEAP "gsl_sf_ellint_P_e" gsl_sf_ellint_P_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 96foreign import ccall unsafe "gsl_sf_ellint_P_e" gsl_sf_ellint_P_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
97 97
98ellint_P :: Double -> Double -> Double -> Precision -> Double 98ellint_P :: Double -> Double -> Double -> Precision -> Double
99ellint_P phi k n mode = gsl_sf_ellint_P phi k n (precCode mode) 99ellint_P phi k n mode = gsl_sf_ellint_P phi k n (precCode mode)
100foreign import ccall SAFE_CHEAP "gsl_sf_ellint_P" gsl_sf_ellint_P :: Double -> Double -> Double -> Gsl_mode_t -> Double 100foreign import ccall unsafe "gsl_sf_ellint_P" gsl_sf_ellint_P :: Double -> Double -> Double -> Gsl_mode_t -> Double
101 101
102ellint_D_e :: Double -> Double -> Double -> Precision -> (Double,Double) 102ellint_D_e :: Double -> Double -> Double -> Precision -> (Double,Double)
103ellint_D_e phi k n mode = createSFR "ellint_D_e" $ gsl_sf_ellint_D_e phi k n (precCode mode) 103ellint_D_e phi k n mode = createSFR "ellint_D_e" $ gsl_sf_ellint_D_e phi k n (precCode mode)
104foreign import ccall SAFE_CHEAP "gsl_sf_ellint_D_e" gsl_sf_ellint_D_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 104foreign import ccall unsafe "gsl_sf_ellint_D_e" gsl_sf_ellint_D_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
105 105
106ellint_D :: Double -> Double -> Double -> Precision -> Double 106ellint_D :: Double -> Double -> Double -> Precision -> Double
107ellint_D phi k n mode = gsl_sf_ellint_D phi k n (precCode mode) 107ellint_D phi k n mode = gsl_sf_ellint_D phi k n (precCode mode)
108foreign import ccall SAFE_CHEAP "gsl_sf_ellint_D" gsl_sf_ellint_D :: Double -> Double -> Double -> Gsl_mode_t -> Double 108foreign import ccall unsafe "gsl_sf_ellint_D" gsl_sf_ellint_D :: Double -> Double -> Double -> Gsl_mode_t -> Double
109 109
110ellint_RC_e :: Double -> Double -> Precision -> (Double,Double) 110ellint_RC_e :: Double -> Double -> Precision -> (Double,Double)
111ellint_RC_e x y mode = createSFR "ellint_RC_e" $ gsl_sf_ellint_RC_e x y (precCode mode) 111ellint_RC_e x y mode = createSFR "ellint_RC_e" $ gsl_sf_ellint_RC_e x y (precCode mode)
112foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RC_e" gsl_sf_ellint_RC_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 112foreign import ccall unsafe "gsl_sf_ellint_RC_e" gsl_sf_ellint_RC_e :: Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
113 113
114ellint_RC :: Double -> Double -> Precision -> Double 114ellint_RC :: Double -> Double -> Precision -> Double
115ellint_RC x y mode = gsl_sf_ellint_RC x y (precCode mode) 115ellint_RC x y mode = gsl_sf_ellint_RC x y (precCode mode)
116foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RC" gsl_sf_ellint_RC :: Double -> Double -> Gsl_mode_t -> Double 116foreign import ccall unsafe "gsl_sf_ellint_RC" gsl_sf_ellint_RC :: Double -> Double -> Gsl_mode_t -> Double
117 117
118ellint_RD_e :: Double -> Double -> Double -> Precision -> (Double,Double) 118ellint_RD_e :: Double -> Double -> Double -> Precision -> (Double,Double)
119ellint_RD_e x y z mode = createSFR "ellint_RD_e" $ gsl_sf_ellint_RD_e x y z (precCode mode) 119ellint_RD_e x y z mode = createSFR "ellint_RD_e" $ gsl_sf_ellint_RD_e x y z (precCode mode)
120foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RD_e" gsl_sf_ellint_RD_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 120foreign import ccall unsafe "gsl_sf_ellint_RD_e" gsl_sf_ellint_RD_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
121 121
122ellint_RD :: Double -> Double -> Double -> Precision -> Double 122ellint_RD :: Double -> Double -> Double -> Precision -> Double
123ellint_RD x y z mode = gsl_sf_ellint_RD x y z (precCode mode) 123ellint_RD x y z mode = gsl_sf_ellint_RD x y z (precCode mode)
124foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RD" gsl_sf_ellint_RD :: Double -> Double -> Double -> Gsl_mode_t -> Double 124foreign import ccall unsafe "gsl_sf_ellint_RD" gsl_sf_ellint_RD :: Double -> Double -> Double -> Gsl_mode_t -> Double
125 125
126ellint_RF_e :: Double -> Double -> Double -> Precision -> (Double,Double) 126ellint_RF_e :: Double -> Double -> Double -> Precision -> (Double,Double)
127ellint_RF_e x y z mode = createSFR "ellint_RF_e" $ gsl_sf_ellint_RF_e x y z (precCode mode) 127ellint_RF_e x y z mode = createSFR "ellint_RF_e" $ gsl_sf_ellint_RF_e x y z (precCode mode)
128foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RF_e" gsl_sf_ellint_RF_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 128foreign import ccall unsafe "gsl_sf_ellint_RF_e" gsl_sf_ellint_RF_e :: Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
129 129
130ellint_RF :: Double -> Double -> Double -> Precision -> Double 130ellint_RF :: Double -> Double -> Double -> Precision -> Double
131ellint_RF x y z mode = gsl_sf_ellint_RF x y z (precCode mode) 131ellint_RF x y z mode = gsl_sf_ellint_RF x y z (precCode mode)
132foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RF" gsl_sf_ellint_RF :: Double -> Double -> Double -> Gsl_mode_t -> Double 132foreign import ccall unsafe "gsl_sf_ellint_RF" gsl_sf_ellint_RF :: Double -> Double -> Double -> Gsl_mode_t -> Double
133 133
134ellint_RJ_e :: Double -> Double -> Double -> Double -> Precision -> (Double,Double) 134ellint_RJ_e :: Double -> Double -> Double -> Double -> Precision -> (Double,Double)
135ellint_RJ_e x y z p mode = createSFR "ellint_RJ_e" $ gsl_sf_ellint_RJ_e x y z p (precCode mode) 135ellint_RJ_e x y z p mode = createSFR "ellint_RJ_e" $ gsl_sf_ellint_RJ_e x y z p (precCode mode)
136foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RJ_e" gsl_sf_ellint_RJ_e :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt 136foreign import ccall unsafe "gsl_sf_ellint_RJ_e" gsl_sf_ellint_RJ_e :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Ptr () -> IO CInt
137 137
138ellint_RJ :: Double -> Double -> Double -> Double -> Precision -> Double 138ellint_RJ :: Double -> Double -> Double -> Double -> Precision -> Double
139ellint_RJ x y z p mode = gsl_sf_ellint_RJ x y z p (precCode mode) 139ellint_RJ x y z p mode = gsl_sf_ellint_RJ x y z p (precCode mode)
140foreign import ccall SAFE_CHEAP "gsl_sf_ellint_RJ" gsl_sf_ellint_RJ :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Double 140foreign import ccall unsafe "gsl_sf_ellint_RJ" gsl_sf_ellint_RJ :: Double -> Double -> Double -> Double -> Gsl_mode_t -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Elljac.hs b/packages/special/lib/Numeric/GSL/Special/Elljac.hs
index 553350c..555e3ff 100644
--- a/packages/special/lib/Numeric/GSL/Special/Elljac.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Elljac.hs
@@ -38,4 +38,4 @@ elljac_e u m = unsafePerformIO $ do
38 else error $ "error code "++show res++ 38 else error $ "error code "++show res++
39 " in elljac_e "++show u++" "++show m 39 " in elljac_e "++show u++" "++show m
40 40
41foreign import ccall "gsl_sf_elljac_e" gsl_sf_elljac_e :: Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> IO CInt 41foreign import ccall unsafe "gsl_sf_elljac_e" gsl_sf_elljac_e :: Double -> Double -> Ptr Double -> Ptr Double -> Ptr Double -> IO CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Erf.hs b/packages/special/lib/Numeric/GSL/Special/Erf.hs
index 171a3c5..ddbc376 100644
--- a/packages/special/lib/Numeric/GSL/Special/Erf.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Erf.hs
@@ -33,48 +33,48 @@ import Numeric.GSL.Special.Internal
33 33
34erfc_e :: Double -> (Double,Double) 34erfc_e :: Double -> (Double,Double)
35erfc_e x = createSFR "erfc_e" $ gsl_sf_erfc_e x 35erfc_e x = createSFR "erfc_e" $ gsl_sf_erfc_e x
36foreign import ccall SAFE_CHEAP "gsl_sf_erfc_e" gsl_sf_erfc_e :: Double -> Ptr () -> IO CInt 36foreign import ccall unsafe "gsl_sf_erfc_e" gsl_sf_erfc_e :: Double -> Ptr () -> IO CInt
37 37
38erfc :: Double -> Double 38erfc :: Double -> Double
39erfc = gsl_sf_erfc 39erfc = gsl_sf_erfc
40foreign import ccall SAFE_CHEAP "gsl_sf_erfc" gsl_sf_erfc :: Double -> Double 40foreign import ccall unsafe "gsl_sf_erfc" gsl_sf_erfc :: Double -> Double
41 41
42log_erfc_e :: Double -> (Double,Double) 42log_erfc_e :: Double -> (Double,Double)
43log_erfc_e x = createSFR "log_erfc_e" $ gsl_sf_log_erfc_e x 43log_erfc_e x = createSFR "log_erfc_e" $ gsl_sf_log_erfc_e x
44foreign import ccall SAFE_CHEAP "gsl_sf_log_erfc_e" gsl_sf_log_erfc_e :: Double -> Ptr () -> IO CInt 44foreign import ccall unsafe "gsl_sf_log_erfc_e" gsl_sf_log_erfc_e :: Double -> Ptr () -> IO CInt
45 45
46log_erfc :: Double -> Double 46log_erfc :: Double -> Double
47log_erfc = gsl_sf_log_erfc 47log_erfc = gsl_sf_log_erfc
48foreign import ccall SAFE_CHEAP "gsl_sf_log_erfc" gsl_sf_log_erfc :: Double -> Double 48foreign import ccall unsafe "gsl_sf_log_erfc" gsl_sf_log_erfc :: Double -> Double
49 49
50erf_e :: Double -> (Double,Double) 50erf_e :: Double -> (Double,Double)
51erf_e x = createSFR "erf_e" $ gsl_sf_erf_e x 51erf_e x = createSFR "erf_e" $ gsl_sf_erf_e x
52foreign import ccall SAFE_CHEAP "gsl_sf_erf_e" gsl_sf_erf_e :: Double -> Ptr () -> IO CInt 52foreign import ccall unsafe "gsl_sf_erf_e" gsl_sf_erf_e :: Double -> Ptr () -> IO CInt
53 53
54erf :: Double -> Double 54erf :: Double -> Double
55erf = gsl_sf_erf 55erf = gsl_sf_erf
56foreign import ccall SAFE_CHEAP "gsl_sf_erf" gsl_sf_erf :: Double -> Double 56foreign import ccall unsafe "gsl_sf_erf" gsl_sf_erf :: Double -> Double
57 57
58erf_Z_e :: Double -> (Double,Double) 58erf_Z_e :: Double -> (Double,Double)
59erf_Z_e x = createSFR "erf_Z_e" $ gsl_sf_erf_Z_e x 59erf_Z_e x = createSFR "erf_Z_e" $ gsl_sf_erf_Z_e x
60foreign import ccall SAFE_CHEAP "gsl_sf_erf_Z_e" gsl_sf_erf_Z_e :: Double -> Ptr () -> IO CInt 60foreign import ccall unsafe "gsl_sf_erf_Z_e" gsl_sf_erf_Z_e :: Double -> Ptr () -> IO CInt
61 61
62erf_Q_e :: Double -> (Double,Double) 62erf_Q_e :: Double -> (Double,Double)
63erf_Q_e x = createSFR "erf_Q_e" $ gsl_sf_erf_Q_e x 63erf_Q_e x = createSFR "erf_Q_e" $ gsl_sf_erf_Q_e x
64foreign import ccall SAFE_CHEAP "gsl_sf_erf_Q_e" gsl_sf_erf_Q_e :: Double -> Ptr () -> IO CInt 64foreign import ccall unsafe "gsl_sf_erf_Q_e" gsl_sf_erf_Q_e :: Double -> Ptr () -> IO CInt
65 65
66erf_Z :: Double -> Double 66erf_Z :: Double -> Double
67erf_Z = gsl_sf_erf_Z 67erf_Z = gsl_sf_erf_Z
68foreign import ccall SAFE_CHEAP "gsl_sf_erf_Z" gsl_sf_erf_Z :: Double -> Double 68foreign import ccall unsafe "gsl_sf_erf_Z" gsl_sf_erf_Z :: Double -> Double
69 69
70erf_Q :: Double -> Double 70erf_Q :: Double -> Double
71erf_Q = gsl_sf_erf_Q 71erf_Q = gsl_sf_erf_Q
72foreign import ccall SAFE_CHEAP "gsl_sf_erf_Q" gsl_sf_erf_Q :: Double -> Double 72foreign import ccall unsafe "gsl_sf_erf_Q" gsl_sf_erf_Q :: Double -> Double
73 73
74hazard_e :: Double -> (Double,Double) 74hazard_e :: Double -> (Double,Double)
75hazard_e x = createSFR "hazard_e" $ gsl_sf_hazard_e x 75hazard_e x = createSFR "hazard_e" $ gsl_sf_hazard_e x
76foreign import ccall SAFE_CHEAP "gsl_sf_hazard_e" gsl_sf_hazard_e :: Double -> Ptr () -> IO CInt 76foreign import ccall unsafe "gsl_sf_hazard_e" gsl_sf_hazard_e :: Double -> Ptr () -> IO CInt
77 77
78hazard :: Double -> Double 78hazard :: Double -> Double
79hazard = gsl_sf_hazard 79hazard = gsl_sf_hazard
80foreign import ccall SAFE_CHEAP "gsl_sf_hazard" gsl_sf_hazard :: Double -> Double 80foreign import ccall unsafe "gsl_sf_hazard" gsl_sf_hazard :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Exp.hs b/packages/special/lib/Numeric/GSL/Special/Exp.hs
index 3b70078..c8a0b63 100644
--- a/packages/special/lib/Numeric/GSL/Special/Exp.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Exp.hs
@@ -40,76 +40,76 @@ import Numeric.GSL.Special.Internal
40 40
41exp_e :: Double -> (Double,Double) 41exp_e :: Double -> (Double,Double)
42exp_e x = createSFR "exp_e" $ gsl_sf_exp_e x 42exp_e x = createSFR "exp_e" $ gsl_sf_exp_e x
43foreign import ccall SAFE_CHEAP "gsl_sf_exp_e" gsl_sf_exp_e :: Double -> Ptr () -> IO CInt 43foreign import ccall unsafe "gsl_sf_exp_e" gsl_sf_exp_e :: Double -> Ptr () -> IO CInt
44 44
45exp :: Double -> Double 45exp :: Double -> Double
46exp = gsl_sf_exp 46exp = gsl_sf_exp
47foreign import ccall SAFE_CHEAP "gsl_sf_exp" gsl_sf_exp :: Double -> Double 47foreign import ccall unsafe "gsl_sf_exp" gsl_sf_exp :: Double -> Double
48 48
49exp_e10_e :: Double -> (Double,Int,Double) 49exp_e10_e :: Double -> (Double,Int,Double)
50exp_e10_e x = createSFR_E10 "exp_e10_e" $ gsl_sf_exp_e10_e x 50exp_e10_e x = createSFR_E10 "exp_e10_e" $ gsl_sf_exp_e10_e x
51foreign import ccall SAFE_CHEAP "gsl_sf_exp_e10_e" gsl_sf_exp_e10_e :: Double -> Ptr () -> IO CInt 51foreign import ccall unsafe "gsl_sf_exp_e10_e" gsl_sf_exp_e10_e :: Double -> Ptr () -> IO CInt
52 52
53exp_mult_e :: Double -> Double -> (Double,Double) 53exp_mult_e :: Double -> Double -> (Double,Double)
54exp_mult_e x y = createSFR "exp_mult_e" $ gsl_sf_exp_mult_e x y 54exp_mult_e x y = createSFR "exp_mult_e" $ gsl_sf_exp_mult_e x y
55foreign import ccall SAFE_CHEAP "gsl_sf_exp_mult_e" gsl_sf_exp_mult_e :: Double -> Double -> Ptr () -> IO CInt 55foreign import ccall unsafe "gsl_sf_exp_mult_e" gsl_sf_exp_mult_e :: Double -> Double -> Ptr () -> IO CInt
56 56
57exp_mult :: Double -> Double -> Double 57exp_mult :: Double -> Double -> Double
58exp_mult = gsl_sf_exp_mult 58exp_mult = gsl_sf_exp_mult
59foreign import ccall SAFE_CHEAP "gsl_sf_exp_mult" gsl_sf_exp_mult :: Double -> Double -> Double 59foreign import ccall unsafe "gsl_sf_exp_mult" gsl_sf_exp_mult :: Double -> Double -> Double
60 60
61exp_mult_e10_e :: Double -> Double -> (Double,Int,Double) 61exp_mult_e10_e :: Double -> Double -> (Double,Int,Double)
62exp_mult_e10_e x y = createSFR_E10 "exp_mult_e10_e" $ gsl_sf_exp_mult_e10_e x y 62exp_mult_e10_e x y = createSFR_E10 "exp_mult_e10_e" $ gsl_sf_exp_mult_e10_e x y
63foreign import ccall SAFE_CHEAP "gsl_sf_exp_mult_e10_e" gsl_sf_exp_mult_e10_e :: Double -> Double -> Ptr () -> IO CInt 63foreign import ccall unsafe "gsl_sf_exp_mult_e10_e" gsl_sf_exp_mult_e10_e :: Double -> Double -> Ptr () -> IO CInt
64 64
65expm1_e :: Double -> (Double,Double) 65expm1_e :: Double -> (Double,Double)
66expm1_e x = createSFR "expm1_e" $ gsl_sf_expm1_e x 66expm1_e x = createSFR "expm1_e" $ gsl_sf_expm1_e x
67foreign import ccall SAFE_CHEAP "gsl_sf_expm1_e" gsl_sf_expm1_e :: Double -> Ptr () -> IO CInt 67foreign import ccall unsafe "gsl_sf_expm1_e" gsl_sf_expm1_e :: Double -> Ptr () -> IO CInt
68 68
69expm1 :: Double -> Double 69expm1 :: Double -> Double
70expm1 = gsl_sf_expm1 70expm1 = gsl_sf_expm1
71foreign import ccall SAFE_CHEAP "gsl_sf_expm1" gsl_sf_expm1 :: Double -> Double 71foreign import ccall unsafe "gsl_sf_expm1" gsl_sf_expm1 :: Double -> Double
72 72
73exprel_e :: Double -> (Double,Double) 73exprel_e :: Double -> (Double,Double)
74exprel_e x = createSFR "exprel_e" $ gsl_sf_exprel_e x 74exprel_e x = createSFR "exprel_e" $ gsl_sf_exprel_e x
75foreign import ccall SAFE_CHEAP "gsl_sf_exprel_e" gsl_sf_exprel_e :: Double -> Ptr () -> IO CInt 75foreign import ccall unsafe "gsl_sf_exprel_e" gsl_sf_exprel_e :: Double -> Ptr () -> IO CInt
76 76
77exprel :: Double -> Double 77exprel :: Double -> Double
78exprel = gsl_sf_exprel 78exprel = gsl_sf_exprel
79foreign import ccall SAFE_CHEAP "gsl_sf_exprel" gsl_sf_exprel :: Double -> Double 79foreign import ccall unsafe "gsl_sf_exprel" gsl_sf_exprel :: Double -> Double
80 80
81exprel_2_e :: Double -> (Double,Double) 81exprel_2_e :: Double -> (Double,Double)
82exprel_2_e x = createSFR "exprel_2_e" $ gsl_sf_exprel_2_e x 82exprel_2_e x = createSFR "exprel_2_e" $ gsl_sf_exprel_2_e x
83foreign import ccall SAFE_CHEAP "gsl_sf_exprel_2_e" gsl_sf_exprel_2_e :: Double -> Ptr () -> IO CInt 83foreign import ccall unsafe "gsl_sf_exprel_2_e" gsl_sf_exprel_2_e :: Double -> Ptr () -> IO CInt
84 84
85exprel_2 :: Double -> Double 85exprel_2 :: Double -> Double
86exprel_2 = gsl_sf_exprel_2 86exprel_2 = gsl_sf_exprel_2
87foreign import ccall SAFE_CHEAP "gsl_sf_exprel_2" gsl_sf_exprel_2 :: Double -> Double 87foreign import ccall unsafe "gsl_sf_exprel_2" gsl_sf_exprel_2 :: Double -> Double
88 88
89exprel_n_e :: CInt -> Double -> (Double,Double) 89exprel_n_e :: CInt -> Double -> (Double,Double)
90exprel_n_e n x = createSFR "exprel_n_e" $ gsl_sf_exprel_n_e n x 90exprel_n_e n x = createSFR "exprel_n_e" $ gsl_sf_exprel_n_e n x
91foreign import ccall SAFE_CHEAP "gsl_sf_exprel_n_e" gsl_sf_exprel_n_e :: CInt -> Double -> Ptr () -> IO CInt 91foreign import ccall unsafe "gsl_sf_exprel_n_e" gsl_sf_exprel_n_e :: CInt -> Double -> Ptr () -> IO CInt
92 92
93exprel_n :: CInt -> Double -> Double 93exprel_n :: CInt -> Double -> Double
94exprel_n = gsl_sf_exprel_n 94exprel_n = gsl_sf_exprel_n
95foreign import ccall SAFE_CHEAP "gsl_sf_exprel_n" gsl_sf_exprel_n :: CInt -> Double -> Double 95foreign import ccall unsafe "gsl_sf_exprel_n" gsl_sf_exprel_n :: CInt -> Double -> Double
96 96
97exprel_n_CF_e :: Double -> Double -> (Double,Double) 97exprel_n_CF_e :: Double -> Double -> (Double,Double)
98exprel_n_CF_e n x = createSFR "exprel_n_CF_e" $ gsl_sf_exprel_n_CF_e n x 98exprel_n_CF_e n x = createSFR "exprel_n_CF_e" $ gsl_sf_exprel_n_CF_e n x
99foreign import ccall SAFE_CHEAP "gsl_sf_exprel_n_CF_e" gsl_sf_exprel_n_CF_e :: Double -> Double -> Ptr () -> IO CInt 99foreign import ccall unsafe "gsl_sf_exprel_n_CF_e" gsl_sf_exprel_n_CF_e :: Double -> Double -> Ptr () -> IO CInt
100 100
101exp_err_e :: Double -> Double -> (Double,Double) 101exp_err_e :: Double -> Double -> (Double,Double)
102exp_err_e x dx = createSFR "exp_err_e" $ gsl_sf_exp_err_e x dx 102exp_err_e x dx = createSFR "exp_err_e" $ gsl_sf_exp_err_e x dx
103foreign import ccall SAFE_CHEAP "gsl_sf_exp_err_e" gsl_sf_exp_err_e :: Double -> Double -> Ptr () -> IO CInt 103foreign import ccall unsafe "gsl_sf_exp_err_e" gsl_sf_exp_err_e :: Double -> Double -> Ptr () -> IO CInt
104 104
105exp_err_e10_e :: Double -> Double -> (Double,Int,Double) 105exp_err_e10_e :: Double -> Double -> (Double,Int,Double)
106exp_err_e10_e x dx = createSFR_E10 "exp_err_e10_e" $ gsl_sf_exp_err_e10_e x dx 106exp_err_e10_e x dx = createSFR_E10 "exp_err_e10_e" $ gsl_sf_exp_err_e10_e x dx
107foreign import ccall SAFE_CHEAP "gsl_sf_exp_err_e10_e" gsl_sf_exp_err_e10_e :: Double -> Double -> Ptr () -> IO CInt 107foreign import ccall unsafe "gsl_sf_exp_err_e10_e" gsl_sf_exp_err_e10_e :: Double -> Double -> Ptr () -> IO CInt
108 108
109exp_mult_err_e :: Double -> Double -> Double -> Double -> (Double,Double) 109exp_mult_err_e :: Double -> Double -> Double -> Double -> (Double,Double)
110exp_mult_err_e x dx y dy = createSFR "exp_mult_err_e" $ gsl_sf_exp_mult_err_e x dx y dy 110exp_mult_err_e x dx y dy = createSFR "exp_mult_err_e" $ gsl_sf_exp_mult_err_e x dx y dy
111foreign import ccall SAFE_CHEAP "gsl_sf_exp_mult_err_e" gsl_sf_exp_mult_err_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 111foreign import ccall unsafe "gsl_sf_exp_mult_err_e" gsl_sf_exp_mult_err_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
112 112
113exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> (Double,Int,Double) 113exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> (Double,Int,Double)
114exp_mult_err_e10_e x dx y dy = createSFR_E10 "exp_mult_err_e10_e" $ gsl_sf_exp_mult_err_e10_e x dx y dy 114exp_mult_err_e10_e x dx y dy = createSFR_E10 "exp_mult_err_e10_e" $ gsl_sf_exp_mult_err_e10_e x dx y dy
115foreign import ccall SAFE_CHEAP "gsl_sf_exp_mult_err_e10_e" gsl_sf_exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 115foreign import ccall unsafe "gsl_sf_exp_mult_err_e10_e" gsl_sf_exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Expint.hs b/packages/special/lib/Numeric/GSL/Special/Expint.hs
index 06f4594..babed46 100644
--- a/packages/special/lib/Numeric/GSL/Special/Expint.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Expint.hs
@@ -49,112 +49,112 @@ import Numeric.GSL.Special.Internal
49 49
50expint_E1_e :: Double -> (Double,Double) 50expint_E1_e :: Double -> (Double,Double)
51expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x 51expint_E1_e x = createSFR "expint_E1_e" $ gsl_sf_expint_E1_e x
52foreign import ccall SAFE_CHEAP "gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr () -> IO CInt 52foreign import ccall unsafe "gsl_sf_expint_E1_e" gsl_sf_expint_E1_e :: Double -> Ptr () -> IO CInt
53 53
54expint_E1 :: Double -> Double 54expint_E1 :: Double -> Double
55expint_E1 = gsl_sf_expint_E1 55expint_E1 = gsl_sf_expint_E1
56foreign import ccall SAFE_CHEAP "gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> Double 56foreign import ccall unsafe "gsl_sf_expint_E1" gsl_sf_expint_E1 :: Double -> Double
57 57
58expint_E2_e :: Double -> (Double,Double) 58expint_E2_e :: Double -> (Double,Double)
59expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x 59expint_E2_e x = createSFR "expint_E2_e" $ gsl_sf_expint_E2_e x
60foreign import ccall SAFE_CHEAP "gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr () -> IO CInt 60foreign import ccall unsafe "gsl_sf_expint_E2_e" gsl_sf_expint_E2_e :: Double -> Ptr () -> IO CInt
61 61
62expint_E2 :: Double -> Double 62expint_E2 :: Double -> Double
63expint_E2 = gsl_sf_expint_E2 63expint_E2 = gsl_sf_expint_E2
64foreign import ccall SAFE_CHEAP "gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> Double 64foreign import ccall unsafe "gsl_sf_expint_E2" gsl_sf_expint_E2 :: Double -> Double
65 65
66expint_En_e :: CInt -> Double -> (Double,Double) 66expint_En_e :: CInt -> Double -> (Double,Double)
67expint_En_e n x = createSFR "expint_En_e" $ gsl_sf_expint_En_e n x 67expint_En_e n x = createSFR "expint_En_e" $ gsl_sf_expint_En_e n x
68foreign import ccall SAFE_CHEAP "gsl_sf_expint_En_e" gsl_sf_expint_En_e :: CInt -> Double -> Ptr () -> IO CInt 68foreign import ccall unsafe "gsl_sf_expint_En_e" gsl_sf_expint_En_e :: CInt -> Double -> Ptr () -> IO CInt
69 69
70expint_En :: CInt -> Double -> Double 70expint_En :: CInt -> Double -> Double
71expint_En = gsl_sf_expint_En 71expint_En = gsl_sf_expint_En
72foreign import ccall SAFE_CHEAP "gsl_sf_expint_En" gsl_sf_expint_En :: CInt -> Double -> Double 72foreign import ccall unsafe "gsl_sf_expint_En" gsl_sf_expint_En :: CInt -> Double -> Double
73 73
74expint_E1_scaled_e :: Double -> (Double,Double) 74expint_E1_scaled_e :: Double -> (Double,Double)
75expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x 75expint_E1_scaled_e x = createSFR "expint_E1_scaled_e" $ gsl_sf_expint_E1_scaled_e x
76foreign import ccall SAFE_CHEAP "gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr () -> IO CInt 76foreign import ccall unsafe "gsl_sf_expint_E1_scaled_e" gsl_sf_expint_E1_scaled_e :: Double -> Ptr () -> IO CInt
77 77
78expint_E1_scaled :: Double -> Double 78expint_E1_scaled :: Double -> Double
79expint_E1_scaled = gsl_sf_expint_E1_scaled 79expint_E1_scaled = gsl_sf_expint_E1_scaled
80foreign import ccall SAFE_CHEAP "gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled :: Double -> Double 80foreign import ccall unsafe "gsl_sf_expint_E1_scaled" gsl_sf_expint_E1_scaled :: Double -> Double
81 81
82expint_E2_scaled_e :: Double -> (Double,Double) 82expint_E2_scaled_e :: Double -> (Double,Double)
83expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x 83expint_E2_scaled_e x = createSFR "expint_E2_scaled_e" $ gsl_sf_expint_E2_scaled_e x
84foreign import ccall SAFE_CHEAP "gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr () -> IO CInt 84foreign import ccall unsafe "gsl_sf_expint_E2_scaled_e" gsl_sf_expint_E2_scaled_e :: Double -> Ptr () -> IO CInt
85 85
86expint_E2_scaled :: Double -> Double 86expint_E2_scaled :: Double -> Double
87expint_E2_scaled = gsl_sf_expint_E2_scaled 87expint_E2_scaled = gsl_sf_expint_E2_scaled
88foreign import ccall SAFE_CHEAP "gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled :: Double -> Double 88foreign import ccall unsafe "gsl_sf_expint_E2_scaled" gsl_sf_expint_E2_scaled :: Double -> Double
89 89
90expint_En_scaled_e :: CInt -> Double -> (Double,Double) 90expint_En_scaled_e :: CInt -> Double -> (Double,Double)
91expint_En_scaled_e n x = createSFR "expint_En_scaled_e" $ gsl_sf_expint_En_scaled_e n x 91expint_En_scaled_e n x = createSFR "expint_En_scaled_e" $ gsl_sf_expint_En_scaled_e n x
92foreign import ccall SAFE_CHEAP "gsl_sf_expint_En_scaled_e" gsl_sf_expint_En_scaled_e :: CInt -> Double -> Ptr () -> IO CInt 92foreign import ccall unsafe "gsl_sf_expint_En_scaled_e" gsl_sf_expint_En_scaled_e :: CInt -> Double -> Ptr () -> IO CInt
93 93
94expint_En_scaled :: CInt -> Double -> Double 94expint_En_scaled :: CInt -> Double -> Double
95expint_En_scaled = gsl_sf_expint_En_scaled 95expint_En_scaled = gsl_sf_expint_En_scaled
96foreign import ccall SAFE_CHEAP "gsl_sf_expint_En_scaled" gsl_sf_expint_En_scaled :: CInt -> Double -> Double 96foreign import ccall unsafe "gsl_sf_expint_En_scaled" gsl_sf_expint_En_scaled :: CInt -> Double -> Double
97 97
98expint_Ei_e :: Double -> (Double,Double) 98expint_Ei_e :: Double -> (Double,Double)
99expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x 99expint_Ei_e x = createSFR "expint_Ei_e" $ gsl_sf_expint_Ei_e x
100foreign import ccall SAFE_CHEAP "gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr () -> IO CInt 100foreign import ccall unsafe "gsl_sf_expint_Ei_e" gsl_sf_expint_Ei_e :: Double -> Ptr () -> IO CInt
101 101
102expint_Ei :: Double -> Double 102expint_Ei :: Double -> Double
103expint_Ei = gsl_sf_expint_Ei 103expint_Ei = gsl_sf_expint_Ei
104foreign import ccall SAFE_CHEAP "gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> Double 104foreign import ccall unsafe "gsl_sf_expint_Ei" gsl_sf_expint_Ei :: Double -> Double
105 105
106expint_Ei_scaled_e :: Double -> (Double,Double) 106expint_Ei_scaled_e :: Double -> (Double,Double)
107expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x 107expint_Ei_scaled_e x = createSFR "expint_Ei_scaled_e" $ gsl_sf_expint_Ei_scaled_e x
108foreign import ccall SAFE_CHEAP "gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr () -> IO CInt 108foreign import ccall unsafe "gsl_sf_expint_Ei_scaled_e" gsl_sf_expint_Ei_scaled_e :: Double -> Ptr () -> IO CInt
109 109
110expint_Ei_scaled :: Double -> Double 110expint_Ei_scaled :: Double -> Double
111expint_Ei_scaled = gsl_sf_expint_Ei_scaled 111expint_Ei_scaled = gsl_sf_expint_Ei_scaled
112foreign import ccall SAFE_CHEAP "gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled :: Double -> Double 112foreign import ccall unsafe "gsl_sf_expint_Ei_scaled" gsl_sf_expint_Ei_scaled :: Double -> Double
113 113
114shi_e :: Double -> (Double,Double) 114shi_e :: Double -> (Double,Double)
115shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x 115shi_e x = createSFR "shi_e" $ gsl_sf_Shi_e x
116foreign import ccall SAFE_CHEAP "gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr () -> IO CInt 116foreign import ccall unsafe "gsl_sf_Shi_e" gsl_sf_Shi_e :: Double -> Ptr () -> IO CInt
117 117
118shi :: Double -> Double 118shi :: Double -> Double
119shi = gsl_sf_Shi 119shi = gsl_sf_Shi
120foreign import ccall SAFE_CHEAP "gsl_sf_Shi" gsl_sf_Shi :: Double -> Double 120foreign import ccall unsafe "gsl_sf_Shi" gsl_sf_Shi :: Double -> Double
121 121
122chi_e :: Double -> (Double,Double) 122chi_e :: Double -> (Double,Double)
123chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x 123chi_e x = createSFR "chi_e" $ gsl_sf_Chi_e x
124foreign import ccall SAFE_CHEAP "gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr () -> IO CInt 124foreign import ccall unsafe "gsl_sf_Chi_e" gsl_sf_Chi_e :: Double -> Ptr () -> IO CInt
125 125
126chi :: Double -> Double 126chi :: Double -> Double
127chi = gsl_sf_Chi 127chi = gsl_sf_Chi
128foreign import ccall SAFE_CHEAP "gsl_sf_Chi" gsl_sf_Chi :: Double -> Double 128foreign import ccall unsafe "gsl_sf_Chi" gsl_sf_Chi :: Double -> Double
129 129
130expint_3_e :: Double -> (Double,Double) 130expint_3_e :: Double -> (Double,Double)
131expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x 131expint_3_e x = createSFR "expint_3_e" $ gsl_sf_expint_3_e x
132foreign import ccall SAFE_CHEAP "gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr () -> IO CInt 132foreign import ccall unsafe "gsl_sf_expint_3_e" gsl_sf_expint_3_e :: Double -> Ptr () -> IO CInt
133 133
134expint_3 :: Double -> Double 134expint_3 :: Double -> Double
135expint_3 = gsl_sf_expint_3 135expint_3 = gsl_sf_expint_3
136foreign import ccall SAFE_CHEAP "gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Double 136foreign import ccall unsafe "gsl_sf_expint_3" gsl_sf_expint_3 :: Double -> Double
137 137
138si_e :: Double -> (Double,Double) 138si_e :: Double -> (Double,Double)
139si_e x = createSFR "si_e" $ gsl_sf_Si_e x 139si_e x = createSFR "si_e" $ gsl_sf_Si_e x
140foreign import ccall SAFE_CHEAP "gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr () -> IO CInt 140foreign import ccall unsafe "gsl_sf_Si_e" gsl_sf_Si_e :: Double -> Ptr () -> IO CInt
141 141
142si :: Double -> Double 142si :: Double -> Double
143si = gsl_sf_Si 143si = gsl_sf_Si
144foreign import ccall SAFE_CHEAP "gsl_sf_Si" gsl_sf_Si :: Double -> Double 144foreign import ccall unsafe "gsl_sf_Si" gsl_sf_Si :: Double -> Double
145 145
146ci_e :: Double -> (Double,Double) 146ci_e :: Double -> (Double,Double)
147ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x 147ci_e x = createSFR "ci_e" $ gsl_sf_Ci_e x
148foreign import ccall SAFE_CHEAP "gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr () -> IO CInt 148foreign import ccall unsafe "gsl_sf_Ci_e" gsl_sf_Ci_e :: Double -> Ptr () -> IO CInt
149 149
150ci :: Double -> Double 150ci :: Double -> Double
151ci = gsl_sf_Ci 151ci = gsl_sf_Ci
152foreign import ccall SAFE_CHEAP "gsl_sf_Ci" gsl_sf_Ci :: Double -> Double 152foreign import ccall unsafe "gsl_sf_Ci" gsl_sf_Ci :: Double -> Double
153 153
154atanint_e :: Double -> (Double,Double) 154atanint_e :: Double -> (Double,Double)
155atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x 155atanint_e x = createSFR "atanint_e" $ gsl_sf_atanint_e x
156foreign import ccall SAFE_CHEAP "gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr () -> IO CInt 156foreign import ccall unsafe "gsl_sf_atanint_e" gsl_sf_atanint_e :: Double -> Ptr () -> IO CInt
157 157
158atanint :: Double -> Double 158atanint :: Double -> Double
159atanint = gsl_sf_atanint 159atanint = gsl_sf_atanint
160foreign import ccall SAFE_CHEAP "gsl_sf_atanint" gsl_sf_atanint :: Double -> Double 160foreign import ccall unsafe "gsl_sf_atanint" gsl_sf_atanint :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs b/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs
index c39c096..11ed8a2 100644
--- a/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Fermi_dirac.hs
@@ -39,72 +39,72 @@ import Numeric.GSL.Special.Internal
39 39
40fermi_dirac_m1_e :: Double -> (Double,Double) 40fermi_dirac_m1_e :: Double -> (Double,Double)
41fermi_dirac_m1_e x = createSFR "fermi_dirac_m1_e" $ gsl_sf_fermi_dirac_m1_e x 41fermi_dirac_m1_e x = createSFR "fermi_dirac_m1_e" $ gsl_sf_fermi_dirac_m1_e x
42foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_m1_e" gsl_sf_fermi_dirac_m1_e :: Double -> Ptr () -> IO CInt 42foreign import ccall unsafe "gsl_sf_fermi_dirac_m1_e" gsl_sf_fermi_dirac_m1_e :: Double -> Ptr () -> IO CInt
43 43
44fermi_dirac_m1 :: Double -> Double 44fermi_dirac_m1 :: Double -> Double
45fermi_dirac_m1 = gsl_sf_fermi_dirac_m1 45fermi_dirac_m1 = gsl_sf_fermi_dirac_m1
46foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_m1" gsl_sf_fermi_dirac_m1 :: Double -> Double 46foreign import ccall unsafe "gsl_sf_fermi_dirac_m1" gsl_sf_fermi_dirac_m1 :: Double -> Double
47 47
48fermi_dirac_0_e :: Double -> (Double,Double) 48fermi_dirac_0_e :: Double -> (Double,Double)
49fermi_dirac_0_e x = createSFR "fermi_dirac_0_e" $ gsl_sf_fermi_dirac_0_e x 49fermi_dirac_0_e x = createSFR "fermi_dirac_0_e" $ gsl_sf_fermi_dirac_0_e x
50foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_0_e" gsl_sf_fermi_dirac_0_e :: Double -> Ptr () -> IO CInt 50foreign import ccall unsafe "gsl_sf_fermi_dirac_0_e" gsl_sf_fermi_dirac_0_e :: Double -> Ptr () -> IO CInt
51 51
52fermi_dirac_0 :: Double -> Double 52fermi_dirac_0 :: Double -> Double
53fermi_dirac_0 = gsl_sf_fermi_dirac_0 53fermi_dirac_0 = gsl_sf_fermi_dirac_0
54foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_0" gsl_sf_fermi_dirac_0 :: Double -> Double 54foreign import ccall unsafe "gsl_sf_fermi_dirac_0" gsl_sf_fermi_dirac_0 :: Double -> Double
55 55
56fermi_dirac_1_e :: Double -> (Double,Double) 56fermi_dirac_1_e :: Double -> (Double,Double)
57fermi_dirac_1_e x = createSFR "fermi_dirac_1_e" $ gsl_sf_fermi_dirac_1_e x 57fermi_dirac_1_e x = createSFR "fermi_dirac_1_e" $ gsl_sf_fermi_dirac_1_e x
58foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_1_e" gsl_sf_fermi_dirac_1_e :: Double -> Ptr () -> IO CInt 58foreign import ccall unsafe "gsl_sf_fermi_dirac_1_e" gsl_sf_fermi_dirac_1_e :: Double -> Ptr () -> IO CInt
59 59
60fermi_dirac_1 :: Double -> Double 60fermi_dirac_1 :: Double -> Double
61fermi_dirac_1 = gsl_sf_fermi_dirac_1 61fermi_dirac_1 = gsl_sf_fermi_dirac_1
62foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_1" gsl_sf_fermi_dirac_1 :: Double -> Double 62foreign import ccall unsafe "gsl_sf_fermi_dirac_1" gsl_sf_fermi_dirac_1 :: Double -> Double
63 63
64fermi_dirac_2_e :: Double -> (Double,Double) 64fermi_dirac_2_e :: Double -> (Double,Double)
65fermi_dirac_2_e x = createSFR "fermi_dirac_2_e" $ gsl_sf_fermi_dirac_2_e x 65fermi_dirac_2_e x = createSFR "fermi_dirac_2_e" $ gsl_sf_fermi_dirac_2_e x
66foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_2_e" gsl_sf_fermi_dirac_2_e :: Double -> Ptr () -> IO CInt 66foreign import ccall unsafe "gsl_sf_fermi_dirac_2_e" gsl_sf_fermi_dirac_2_e :: Double -> Ptr () -> IO CInt
67 67
68fermi_dirac_2 :: Double -> Double 68fermi_dirac_2 :: Double -> Double
69fermi_dirac_2 = gsl_sf_fermi_dirac_2 69fermi_dirac_2 = gsl_sf_fermi_dirac_2
70foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_2" gsl_sf_fermi_dirac_2 :: Double -> Double 70foreign import ccall unsafe "gsl_sf_fermi_dirac_2" gsl_sf_fermi_dirac_2 :: Double -> Double
71 71
72fermi_dirac_int_e :: CInt -> Double -> (Double,Double) 72fermi_dirac_int_e :: CInt -> Double -> (Double,Double)
73fermi_dirac_int_e j x = createSFR "fermi_dirac_int_e" $ gsl_sf_fermi_dirac_int_e j x 73fermi_dirac_int_e j x = createSFR "fermi_dirac_int_e" $ gsl_sf_fermi_dirac_int_e j x
74foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_int_e" gsl_sf_fermi_dirac_int_e :: CInt -> Double -> Ptr () -> IO CInt 74foreign import ccall unsafe "gsl_sf_fermi_dirac_int_e" gsl_sf_fermi_dirac_int_e :: CInt -> Double -> Ptr () -> IO CInt
75 75
76fermi_dirac_int :: CInt -> Double -> Double 76fermi_dirac_int :: CInt -> Double -> Double
77fermi_dirac_int = gsl_sf_fermi_dirac_int 77fermi_dirac_int = gsl_sf_fermi_dirac_int
78foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_int" gsl_sf_fermi_dirac_int :: CInt -> Double -> Double 78foreign import ccall unsafe "gsl_sf_fermi_dirac_int" gsl_sf_fermi_dirac_int :: CInt -> Double -> Double
79 79
80fermi_dirac_mhalf_e :: Double -> (Double,Double) 80fermi_dirac_mhalf_e :: Double -> (Double,Double)
81fermi_dirac_mhalf_e x = createSFR "fermi_dirac_mhalf_e" $ gsl_sf_fermi_dirac_mhalf_e x 81fermi_dirac_mhalf_e x = createSFR "fermi_dirac_mhalf_e" $ gsl_sf_fermi_dirac_mhalf_e x
82foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_mhalf_e" gsl_sf_fermi_dirac_mhalf_e :: Double -> Ptr () -> IO CInt 82foreign import ccall unsafe "gsl_sf_fermi_dirac_mhalf_e" gsl_sf_fermi_dirac_mhalf_e :: Double -> Ptr () -> IO CInt
83 83
84fermi_dirac_mhalf :: Double -> Double 84fermi_dirac_mhalf :: Double -> Double
85fermi_dirac_mhalf = gsl_sf_fermi_dirac_mhalf 85fermi_dirac_mhalf = gsl_sf_fermi_dirac_mhalf
86foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_mhalf" gsl_sf_fermi_dirac_mhalf :: Double -> Double 86foreign import ccall unsafe "gsl_sf_fermi_dirac_mhalf" gsl_sf_fermi_dirac_mhalf :: Double -> Double
87 87
88fermi_dirac_half_e :: Double -> (Double,Double) 88fermi_dirac_half_e :: Double -> (Double,Double)
89fermi_dirac_half_e x = createSFR "fermi_dirac_half_e" $ gsl_sf_fermi_dirac_half_e x 89fermi_dirac_half_e x = createSFR "fermi_dirac_half_e" $ gsl_sf_fermi_dirac_half_e x
90foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_half_e" gsl_sf_fermi_dirac_half_e :: Double -> Ptr () -> IO CInt 90foreign import ccall unsafe "gsl_sf_fermi_dirac_half_e" gsl_sf_fermi_dirac_half_e :: Double -> Ptr () -> IO CInt
91 91
92fermi_dirac_half :: Double -> Double 92fermi_dirac_half :: Double -> Double
93fermi_dirac_half = gsl_sf_fermi_dirac_half 93fermi_dirac_half = gsl_sf_fermi_dirac_half
94foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_half" gsl_sf_fermi_dirac_half :: Double -> Double 94foreign import ccall unsafe "gsl_sf_fermi_dirac_half" gsl_sf_fermi_dirac_half :: Double -> Double
95 95
96fermi_dirac_3half_e :: Double -> (Double,Double) 96fermi_dirac_3half_e :: Double -> (Double,Double)
97fermi_dirac_3half_e x = createSFR "fermi_dirac_3half_e" $ gsl_sf_fermi_dirac_3half_e x 97fermi_dirac_3half_e x = createSFR "fermi_dirac_3half_e" $ gsl_sf_fermi_dirac_3half_e x
98foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_3half_e" gsl_sf_fermi_dirac_3half_e :: Double -> Ptr () -> IO CInt 98foreign import ccall unsafe "gsl_sf_fermi_dirac_3half_e" gsl_sf_fermi_dirac_3half_e :: Double -> Ptr () -> IO CInt
99 99
100fermi_dirac_3half :: Double -> Double 100fermi_dirac_3half :: Double -> Double
101fermi_dirac_3half = gsl_sf_fermi_dirac_3half 101fermi_dirac_3half = gsl_sf_fermi_dirac_3half
102foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_3half" gsl_sf_fermi_dirac_3half :: Double -> Double 102foreign import ccall unsafe "gsl_sf_fermi_dirac_3half" gsl_sf_fermi_dirac_3half :: Double -> Double
103 103
104fermi_dirac_inc_0_e :: Double -> Double -> (Double,Double) 104fermi_dirac_inc_0_e :: Double -> Double -> (Double,Double)
105fermi_dirac_inc_0_e x b = createSFR "fermi_dirac_inc_0_e" $ gsl_sf_fermi_dirac_inc_0_e x b 105fermi_dirac_inc_0_e x b = createSFR "fermi_dirac_inc_0_e" $ gsl_sf_fermi_dirac_inc_0_e x b
106foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_inc_0_e" gsl_sf_fermi_dirac_inc_0_e :: Double -> Double -> Ptr () -> IO CInt 106foreign import ccall unsafe "gsl_sf_fermi_dirac_inc_0_e" gsl_sf_fermi_dirac_inc_0_e :: Double -> Double -> Ptr () -> IO CInt
107 107
108fermi_dirac_inc_0 :: Double -> Double -> Double 108fermi_dirac_inc_0 :: Double -> Double -> Double
109fermi_dirac_inc_0 = gsl_sf_fermi_dirac_inc_0 109fermi_dirac_inc_0 = gsl_sf_fermi_dirac_inc_0
110foreign import ccall SAFE_CHEAP "gsl_sf_fermi_dirac_inc_0" gsl_sf_fermi_dirac_inc_0 :: Double -> Double -> Double 110foreign import ccall unsafe "gsl_sf_fermi_dirac_inc_0" gsl_sf_fermi_dirac_inc_0 :: Double -> Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Gamma.hs b/packages/special/lib/Numeric/GSL/Special/Gamma.hs
index 78115f1..bf4d920 100644
--- a/packages/special/lib/Numeric/GSL/Special/Gamma.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Gamma.hs
@@ -62,176 +62,176 @@ import Numeric.GSL.Special.Internal
62 62
63lngamma_e :: Double -> (Double,Double) 63lngamma_e :: Double -> (Double,Double)
64lngamma_e x = createSFR "lngamma_e" $ gsl_sf_lngamma_e x 64lngamma_e x = createSFR "lngamma_e" $ gsl_sf_lngamma_e x
65foreign import ccall SAFE_CHEAP "gsl_sf_lngamma_e" gsl_sf_lngamma_e :: Double -> Ptr () -> IO CInt 65foreign import ccall unsafe "gsl_sf_lngamma_e" gsl_sf_lngamma_e :: Double -> Ptr () -> IO CInt
66 66
67lngamma :: Double -> Double 67lngamma :: Double -> Double
68lngamma = gsl_sf_lngamma 68lngamma = gsl_sf_lngamma
69foreign import ccall SAFE_CHEAP "gsl_sf_lngamma" gsl_sf_lngamma :: Double -> Double 69foreign import ccall unsafe "gsl_sf_lngamma" gsl_sf_lngamma :: Double -> Double
70 70
71lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt 71lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt
72lngamma_sgn_e = gsl_sf_lngamma_sgn_e 72lngamma_sgn_e = gsl_sf_lngamma_sgn_e
73foreign import ccall SAFE_CHEAP "gsl_sf_lngamma_sgn_e" gsl_sf_lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt 73foreign import ccall unsafe "gsl_sf_lngamma_sgn_e" gsl_sf_lngamma_sgn_e :: Double -> Ptr () -> Ptr Double -> CInt
74 74
75gamma_e :: Double -> (Double,Double) 75gamma_e :: Double -> (Double,Double)
76gamma_e x = createSFR "gamma_e" $ gsl_sf_gamma_e x 76gamma_e x = createSFR "gamma_e" $ gsl_sf_gamma_e x
77foreign import ccall SAFE_CHEAP "gsl_sf_gamma_e" gsl_sf_gamma_e :: Double -> Ptr () -> IO CInt 77foreign import ccall unsafe "gsl_sf_gamma_e" gsl_sf_gamma_e :: Double -> Ptr () -> IO CInt
78 78
79gamma :: Double -> Double 79gamma :: Double -> Double
80gamma = gsl_sf_gamma 80gamma = gsl_sf_gamma
81foreign import ccall SAFE_CHEAP "gsl_sf_gamma" gsl_sf_gamma :: Double -> Double 81foreign import ccall unsafe "gsl_sf_gamma" gsl_sf_gamma :: Double -> Double
82 82
83gammastar_e :: Double -> (Double,Double) 83gammastar_e :: Double -> (Double,Double)
84gammastar_e x = createSFR "gammastar_e" $ gsl_sf_gammastar_e x 84gammastar_e x = createSFR "gammastar_e" $ gsl_sf_gammastar_e x
85foreign import ccall SAFE_CHEAP "gsl_sf_gammastar_e" gsl_sf_gammastar_e :: Double -> Ptr () -> IO CInt 85foreign import ccall unsafe "gsl_sf_gammastar_e" gsl_sf_gammastar_e :: Double -> Ptr () -> IO CInt
86 86
87gammastar :: Double -> Double 87gammastar :: Double -> Double
88gammastar = gsl_sf_gammastar 88gammastar = gsl_sf_gammastar
89foreign import ccall SAFE_CHEAP "gsl_sf_gammastar" gsl_sf_gammastar :: Double -> Double 89foreign import ccall unsafe "gsl_sf_gammastar" gsl_sf_gammastar :: Double -> Double
90 90
91gammainv_e :: Double -> (Double,Double) 91gammainv_e :: Double -> (Double,Double)
92gammainv_e x = createSFR "gammainv_e" $ gsl_sf_gammainv_e x 92gammainv_e x = createSFR "gammainv_e" $ gsl_sf_gammainv_e x
93foreign import ccall SAFE_CHEAP "gsl_sf_gammainv_e" gsl_sf_gammainv_e :: Double -> Ptr () -> IO CInt 93foreign import ccall unsafe "gsl_sf_gammainv_e" gsl_sf_gammainv_e :: Double -> Ptr () -> IO CInt
94 94
95gammainv :: Double -> Double 95gammainv :: Double -> Double
96gammainv = gsl_sf_gammainv 96gammainv = gsl_sf_gammainv
97foreign import ccall SAFE_CHEAP "gsl_sf_gammainv" gsl_sf_gammainv :: Double -> Double 97foreign import ccall unsafe "gsl_sf_gammainv" gsl_sf_gammainv :: Double -> Double
98 98
99lngamma_complex_e :: Double -> Double -> ((Double,Double),(Double,Double)) 99lngamma_complex_e :: Double -> Double -> ((Double,Double),(Double,Double))
100lngamma_complex_e zr zi = create2SFR "lngamma_complex_e" $ gsl_sf_lngamma_complex_e zr zi 100lngamma_complex_e zr zi = create2SFR "lngamma_complex_e" $ gsl_sf_lngamma_complex_e zr zi
101foreign import ccall SAFE_CHEAP "gsl_sf_lngamma_complex_e" gsl_sf_lngamma_complex_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 101foreign import ccall unsafe "gsl_sf_lngamma_complex_e" gsl_sf_lngamma_complex_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
102 102
103taylorcoeff_e :: CInt -> Double -> (Double,Double) 103taylorcoeff_e :: CInt -> Double -> (Double,Double)
104taylorcoeff_e n x = createSFR "taylorcoeff_e" $ gsl_sf_taylorcoeff_e n x 104taylorcoeff_e n x = createSFR "taylorcoeff_e" $ gsl_sf_taylorcoeff_e n x
105foreign import ccall SAFE_CHEAP "gsl_sf_taylorcoeff_e" gsl_sf_taylorcoeff_e :: CInt -> Double -> Ptr () -> IO CInt 105foreign import ccall unsafe "gsl_sf_taylorcoeff_e" gsl_sf_taylorcoeff_e :: CInt -> Double -> Ptr () -> IO CInt
106 106
107taylorcoeff :: CInt -> Double -> Double 107taylorcoeff :: CInt -> Double -> Double
108taylorcoeff = gsl_sf_taylorcoeff 108taylorcoeff = gsl_sf_taylorcoeff
109foreign import ccall SAFE_CHEAP "gsl_sf_taylorcoeff" gsl_sf_taylorcoeff :: CInt -> Double -> Double 109foreign import ccall unsafe "gsl_sf_taylorcoeff" gsl_sf_taylorcoeff :: CInt -> Double -> Double
110 110
111fact_e :: CInt -> (Double,Double) 111fact_e :: CInt -> (Double,Double)
112fact_e n = createSFR "fact_e" $ gsl_sf_fact_e n 112fact_e n = createSFR "fact_e" $ gsl_sf_fact_e n
113foreign import ccall SAFE_CHEAP "gsl_sf_fact_e" gsl_sf_fact_e :: CInt -> Ptr () -> IO CInt 113foreign import ccall unsafe "gsl_sf_fact_e" gsl_sf_fact_e :: CInt -> Ptr () -> IO CInt
114 114
115fact :: CInt -> Double 115fact :: CInt -> Double
116fact = gsl_sf_fact 116fact = gsl_sf_fact
117foreign import ccall SAFE_CHEAP "gsl_sf_fact" gsl_sf_fact :: CInt -> Double 117foreign import ccall unsafe "gsl_sf_fact" gsl_sf_fact :: CInt -> Double
118 118
119doublefact_e :: CInt -> (Double,Double) 119doublefact_e :: CInt -> (Double,Double)
120doublefact_e n = createSFR "doublefact_e" $ gsl_sf_doublefact_e n 120doublefact_e n = createSFR "doublefact_e" $ gsl_sf_doublefact_e n
121foreign import ccall SAFE_CHEAP "gsl_sf_doublefact_e" gsl_sf_doublefact_e :: CInt -> Ptr () -> IO CInt 121foreign import ccall unsafe "gsl_sf_doublefact_e" gsl_sf_doublefact_e :: CInt -> Ptr () -> IO CInt
122 122
123doublefact :: CInt -> Double 123doublefact :: CInt -> Double
124doublefact = gsl_sf_doublefact 124doublefact = gsl_sf_doublefact
125foreign import ccall SAFE_CHEAP "gsl_sf_doublefact" gsl_sf_doublefact :: CInt -> Double 125foreign import ccall unsafe "gsl_sf_doublefact" gsl_sf_doublefact :: CInt -> Double
126 126
127lnfact_e :: CInt -> (Double,Double) 127lnfact_e :: CInt -> (Double,Double)
128lnfact_e n = createSFR "lnfact_e" $ gsl_sf_lnfact_e n 128lnfact_e n = createSFR "lnfact_e" $ gsl_sf_lnfact_e n
129foreign import ccall SAFE_CHEAP "gsl_sf_lnfact_e" gsl_sf_lnfact_e :: CInt -> Ptr () -> IO CInt 129foreign import ccall unsafe "gsl_sf_lnfact_e" gsl_sf_lnfact_e :: CInt -> Ptr () -> IO CInt
130 130
131lnfact :: CInt -> Double 131lnfact :: CInt -> Double
132lnfact = gsl_sf_lnfact 132lnfact = gsl_sf_lnfact
133foreign import ccall SAFE_CHEAP "gsl_sf_lnfact" gsl_sf_lnfact :: CInt -> Double 133foreign import ccall unsafe "gsl_sf_lnfact" gsl_sf_lnfact :: CInt -> Double
134 134
135lndoublefact_e :: CInt -> (Double,Double) 135lndoublefact_e :: CInt -> (Double,Double)
136lndoublefact_e n = createSFR "lndoublefact_e" $ gsl_sf_lndoublefact_e n 136lndoublefact_e n = createSFR "lndoublefact_e" $ gsl_sf_lndoublefact_e n
137foreign import ccall SAFE_CHEAP "gsl_sf_lndoublefact_e" gsl_sf_lndoublefact_e :: CInt -> Ptr () -> IO CInt 137foreign import ccall unsafe "gsl_sf_lndoublefact_e" gsl_sf_lndoublefact_e :: CInt -> Ptr () -> IO CInt
138 138
139lndoublefact :: CInt -> Double 139lndoublefact :: CInt -> Double
140lndoublefact = gsl_sf_lndoublefact 140lndoublefact = gsl_sf_lndoublefact
141foreign import ccall SAFE_CHEAP "gsl_sf_lndoublefact" gsl_sf_lndoublefact :: CInt -> Double 141foreign import ccall unsafe "gsl_sf_lndoublefact" gsl_sf_lndoublefact :: CInt -> Double
142 142
143lnchoose_e :: CInt -> CInt -> (Double,Double) 143lnchoose_e :: CInt -> CInt -> (Double,Double)
144lnchoose_e n m = createSFR "lnchoose_e" $ gsl_sf_lnchoose_e n m 144lnchoose_e n m = createSFR "lnchoose_e" $ gsl_sf_lnchoose_e n m
145foreign import ccall SAFE_CHEAP "gsl_sf_lnchoose_e" gsl_sf_lnchoose_e :: CInt -> CInt -> Ptr () -> IO CInt 145foreign import ccall unsafe "gsl_sf_lnchoose_e" gsl_sf_lnchoose_e :: CInt -> CInt -> Ptr () -> IO CInt
146 146
147lnchoose :: CInt -> CInt -> Double 147lnchoose :: CInt -> CInt -> Double
148lnchoose = gsl_sf_lnchoose 148lnchoose = gsl_sf_lnchoose
149foreign import ccall SAFE_CHEAP "gsl_sf_lnchoose" gsl_sf_lnchoose :: CInt -> CInt -> Double 149foreign import ccall unsafe "gsl_sf_lnchoose" gsl_sf_lnchoose :: CInt -> CInt -> Double
150 150
151choose_e :: CInt -> CInt -> (Double,Double) 151choose_e :: CInt -> CInt -> (Double,Double)
152choose_e n m = createSFR "choose_e" $ gsl_sf_choose_e n m 152choose_e n m = createSFR "choose_e" $ gsl_sf_choose_e n m
153foreign import ccall SAFE_CHEAP "gsl_sf_choose_e" gsl_sf_choose_e :: CInt -> CInt -> Ptr () -> IO CInt 153foreign import ccall unsafe "gsl_sf_choose_e" gsl_sf_choose_e :: CInt -> CInt -> Ptr () -> IO CInt
154 154
155choose :: CInt -> CInt -> Double 155choose :: CInt -> CInt -> Double
156choose = gsl_sf_choose 156choose = gsl_sf_choose
157foreign import ccall SAFE_CHEAP "gsl_sf_choose" gsl_sf_choose :: CInt -> CInt -> Double 157foreign import ccall unsafe "gsl_sf_choose" gsl_sf_choose :: CInt -> CInt -> Double
158 158
159lnpoch_e :: Double -> Double -> (Double,Double) 159lnpoch_e :: Double -> Double -> (Double,Double)
160lnpoch_e a x = createSFR "lnpoch_e" $ gsl_sf_lnpoch_e a x 160lnpoch_e a x = createSFR "lnpoch_e" $ gsl_sf_lnpoch_e a x
161foreign import ccall SAFE_CHEAP "gsl_sf_lnpoch_e" gsl_sf_lnpoch_e :: Double -> Double -> Ptr () -> IO CInt 161foreign import ccall unsafe "gsl_sf_lnpoch_e" gsl_sf_lnpoch_e :: Double -> Double -> Ptr () -> IO CInt
162 162
163lnpoch :: Double -> Double -> Double 163lnpoch :: Double -> Double -> Double
164lnpoch = gsl_sf_lnpoch 164lnpoch = gsl_sf_lnpoch
165foreign import ccall SAFE_CHEAP "gsl_sf_lnpoch" gsl_sf_lnpoch :: Double -> Double -> Double 165foreign import ccall unsafe "gsl_sf_lnpoch" gsl_sf_lnpoch :: Double -> Double -> Double
166 166
167lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt 167lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt
168lnpoch_sgn_e = gsl_sf_lnpoch_sgn_e 168lnpoch_sgn_e = gsl_sf_lnpoch_sgn_e
169foreign import ccall SAFE_CHEAP "gsl_sf_lnpoch_sgn_e" gsl_sf_lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt 169foreign import ccall unsafe "gsl_sf_lnpoch_sgn_e" gsl_sf_lnpoch_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt
170 170
171poch_e :: Double -> Double -> (Double,Double) 171poch_e :: Double -> Double -> (Double,Double)
172poch_e a x = createSFR "poch_e" $ gsl_sf_poch_e a x 172poch_e a x = createSFR "poch_e" $ gsl_sf_poch_e a x
173foreign import ccall SAFE_CHEAP "gsl_sf_poch_e" gsl_sf_poch_e :: Double -> Double -> Ptr () -> IO CInt 173foreign import ccall unsafe "gsl_sf_poch_e" gsl_sf_poch_e :: Double -> Double -> Ptr () -> IO CInt
174 174
175poch :: Double -> Double -> Double 175poch :: Double -> Double -> Double
176poch = gsl_sf_poch 176poch = gsl_sf_poch
177foreign import ccall SAFE_CHEAP "gsl_sf_poch" gsl_sf_poch :: Double -> Double -> Double 177foreign import ccall unsafe "gsl_sf_poch" gsl_sf_poch :: Double -> Double -> Double
178 178
179pochrel_e :: Double -> Double -> (Double,Double) 179pochrel_e :: Double -> Double -> (Double,Double)
180pochrel_e a x = createSFR "pochrel_e" $ gsl_sf_pochrel_e a x 180pochrel_e a x = createSFR "pochrel_e" $ gsl_sf_pochrel_e a x
181foreign import ccall SAFE_CHEAP "gsl_sf_pochrel_e" gsl_sf_pochrel_e :: Double -> Double -> Ptr () -> IO CInt 181foreign import ccall unsafe "gsl_sf_pochrel_e" gsl_sf_pochrel_e :: Double -> Double -> Ptr () -> IO CInt
182 182
183pochrel :: Double -> Double -> Double 183pochrel :: Double -> Double -> Double
184pochrel = gsl_sf_pochrel 184pochrel = gsl_sf_pochrel
185foreign import ccall SAFE_CHEAP "gsl_sf_pochrel" gsl_sf_pochrel :: Double -> Double -> Double 185foreign import ccall unsafe "gsl_sf_pochrel" gsl_sf_pochrel :: Double -> Double -> Double
186 186
187gamma_inc_Q_e :: Double -> Double -> (Double,Double) 187gamma_inc_Q_e :: Double -> Double -> (Double,Double)
188gamma_inc_Q_e a x = createSFR "gamma_inc_Q_e" $ gsl_sf_gamma_inc_Q_e a x 188gamma_inc_Q_e a x = createSFR "gamma_inc_Q_e" $ gsl_sf_gamma_inc_Q_e a x
189foreign import ccall SAFE_CHEAP "gsl_sf_gamma_inc_Q_e" gsl_sf_gamma_inc_Q_e :: Double -> Double -> Ptr () -> IO CInt 189foreign import ccall unsafe "gsl_sf_gamma_inc_Q_e" gsl_sf_gamma_inc_Q_e :: Double -> Double -> Ptr () -> IO CInt
190 190
191gamma_inc_Q :: Double -> Double -> Double 191gamma_inc_Q :: Double -> Double -> Double
192gamma_inc_Q = gsl_sf_gamma_inc_Q 192gamma_inc_Q = gsl_sf_gamma_inc_Q
193foreign import ccall SAFE_CHEAP "gsl_sf_gamma_inc_Q" gsl_sf_gamma_inc_Q :: Double -> Double -> Double 193foreign import ccall unsafe "gsl_sf_gamma_inc_Q" gsl_sf_gamma_inc_Q :: Double -> Double -> Double
194 194
195gamma_inc_P_e :: Double -> Double -> (Double,Double) 195gamma_inc_P_e :: Double -> Double -> (Double,Double)
196gamma_inc_P_e a x = createSFR "gamma_inc_P_e" $ gsl_sf_gamma_inc_P_e a x 196gamma_inc_P_e a x = createSFR "gamma_inc_P_e" $ gsl_sf_gamma_inc_P_e a x
197foreign import ccall SAFE_CHEAP "gsl_sf_gamma_inc_P_e" gsl_sf_gamma_inc_P_e :: Double -> Double -> Ptr () -> IO CInt 197foreign import ccall unsafe "gsl_sf_gamma_inc_P_e" gsl_sf_gamma_inc_P_e :: Double -> Double -> Ptr () -> IO CInt
198 198
199gamma_inc_P :: Double -> Double -> Double 199gamma_inc_P :: Double -> Double -> Double
200gamma_inc_P = gsl_sf_gamma_inc_P 200gamma_inc_P = gsl_sf_gamma_inc_P
201foreign import ccall SAFE_CHEAP "gsl_sf_gamma_inc_P" gsl_sf_gamma_inc_P :: Double -> Double -> Double 201foreign import ccall unsafe "gsl_sf_gamma_inc_P" gsl_sf_gamma_inc_P :: Double -> Double -> Double
202 202
203gamma_inc_e :: Double -> Double -> (Double,Double) 203gamma_inc_e :: Double -> Double -> (Double,Double)
204gamma_inc_e a x = createSFR "gamma_inc_e" $ gsl_sf_gamma_inc_e a x 204gamma_inc_e a x = createSFR "gamma_inc_e" $ gsl_sf_gamma_inc_e a x
205foreign import ccall SAFE_CHEAP "gsl_sf_gamma_inc_e" gsl_sf_gamma_inc_e :: Double -> Double -> Ptr () -> IO CInt 205foreign import ccall unsafe "gsl_sf_gamma_inc_e" gsl_sf_gamma_inc_e :: Double -> Double -> Ptr () -> IO CInt
206 206
207gamma_inc :: Double -> Double -> Double 207gamma_inc :: Double -> Double -> Double
208gamma_inc = gsl_sf_gamma_inc 208gamma_inc = gsl_sf_gamma_inc
209foreign import ccall SAFE_CHEAP "gsl_sf_gamma_inc" gsl_sf_gamma_inc :: Double -> Double -> Double 209foreign import ccall unsafe "gsl_sf_gamma_inc" gsl_sf_gamma_inc :: Double -> Double -> Double
210 210
211lnbeta_e :: Double -> Double -> (Double,Double) 211lnbeta_e :: Double -> Double -> (Double,Double)
212lnbeta_e a b = createSFR "lnbeta_e" $ gsl_sf_lnbeta_e a b 212lnbeta_e a b = createSFR "lnbeta_e" $ gsl_sf_lnbeta_e a b
213foreign import ccall SAFE_CHEAP "gsl_sf_lnbeta_e" gsl_sf_lnbeta_e :: Double -> Double -> Ptr () -> IO CInt 213foreign import ccall unsafe "gsl_sf_lnbeta_e" gsl_sf_lnbeta_e :: Double -> Double -> Ptr () -> IO CInt
214 214
215lnbeta :: Double -> Double -> Double 215lnbeta :: Double -> Double -> Double
216lnbeta = gsl_sf_lnbeta 216lnbeta = gsl_sf_lnbeta
217foreign import ccall SAFE_CHEAP "gsl_sf_lnbeta" gsl_sf_lnbeta :: Double -> Double -> Double 217foreign import ccall unsafe "gsl_sf_lnbeta" gsl_sf_lnbeta :: Double -> Double -> Double
218 218
219lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt 219lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt
220lnbeta_sgn_e = gsl_sf_lnbeta_sgn_e 220lnbeta_sgn_e = gsl_sf_lnbeta_sgn_e
221foreign import ccall SAFE_CHEAP "gsl_sf_lnbeta_sgn_e" gsl_sf_lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt 221foreign import ccall unsafe "gsl_sf_lnbeta_sgn_e" gsl_sf_lnbeta_sgn_e :: Double -> Double -> Ptr () -> Ptr Double -> CInt
222 222
223beta_e :: Double -> Double -> (Double,Double) 223beta_e :: Double -> Double -> (Double,Double)
224beta_e a b = createSFR "beta_e" $ gsl_sf_beta_e a b 224beta_e a b = createSFR "beta_e" $ gsl_sf_beta_e a b
225foreign import ccall SAFE_CHEAP "gsl_sf_beta_e" gsl_sf_beta_e :: Double -> Double -> Ptr () -> IO CInt 225foreign import ccall unsafe "gsl_sf_beta_e" gsl_sf_beta_e :: Double -> Double -> Ptr () -> IO CInt
226 226
227beta :: Double -> Double -> Double 227beta :: Double -> Double -> Double
228beta = gsl_sf_beta 228beta = gsl_sf_beta
229foreign import ccall SAFE_CHEAP "gsl_sf_beta" gsl_sf_beta :: Double -> Double -> Double 229foreign import ccall unsafe "gsl_sf_beta" gsl_sf_beta :: Double -> Double -> Double
230 230
231beta_inc_e :: Double -> Double -> Double -> (Double,Double) 231beta_inc_e :: Double -> Double -> Double -> (Double,Double)
232beta_inc_e a b x = createSFR "beta_inc_e" $ gsl_sf_beta_inc_e a b x 232beta_inc_e a b x = createSFR "beta_inc_e" $ gsl_sf_beta_inc_e a b x
233foreign import ccall SAFE_CHEAP "gsl_sf_beta_inc_e" gsl_sf_beta_inc_e :: Double -> Double -> Double -> Ptr () -> IO CInt 233foreign import ccall unsafe "gsl_sf_beta_inc_e" gsl_sf_beta_inc_e :: Double -> Double -> Double -> Ptr () -> IO CInt
234 234
235beta_inc :: Double -> Double -> Double -> Double 235beta_inc :: Double -> Double -> Double -> Double
236beta_inc = gsl_sf_beta_inc 236beta_inc = gsl_sf_beta_inc
237foreign import ccall SAFE_CHEAP "gsl_sf_beta_inc" gsl_sf_beta_inc :: Double -> Double -> Double -> Double 237foreign import ccall unsafe "gsl_sf_beta_inc" gsl_sf_beta_inc :: Double -> Double -> Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Gegenbauer.hs b/packages/special/lib/Numeric/GSL/Special/Gegenbauer.hs
index a3c998a..bf8c08e 100644
--- a/packages/special/lib/Numeric/GSL/Special/Gegenbauer.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Gegenbauer.hs
@@ -29,36 +29,36 @@ import Numeric.GSL.Special.Internal
29 29
30gegenpoly_1_e :: Double -> Double -> (Double,Double) 30gegenpoly_1_e :: Double -> Double -> (Double,Double)
31gegenpoly_1_e lambda x = createSFR "gegenpoly_1_e" $ gsl_sf_gegenpoly_1_e lambda x 31gegenpoly_1_e lambda x = createSFR "gegenpoly_1_e" $ gsl_sf_gegenpoly_1_e lambda x
32foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_1_e" gsl_sf_gegenpoly_1_e :: Double -> Double -> Ptr () -> IO CInt 32foreign import ccall unsafe "gsl_sf_gegenpoly_1_e" gsl_sf_gegenpoly_1_e :: Double -> Double -> Ptr () -> IO CInt
33 33
34gegenpoly_2_e :: Double -> Double -> (Double,Double) 34gegenpoly_2_e :: Double -> Double -> (Double,Double)
35gegenpoly_2_e lambda x = createSFR "gegenpoly_2_e" $ gsl_sf_gegenpoly_2_e lambda x 35gegenpoly_2_e lambda x = createSFR "gegenpoly_2_e" $ gsl_sf_gegenpoly_2_e lambda x
36foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_2_e" gsl_sf_gegenpoly_2_e :: Double -> Double -> Ptr () -> IO CInt 36foreign import ccall unsafe "gsl_sf_gegenpoly_2_e" gsl_sf_gegenpoly_2_e :: Double -> Double -> Ptr () -> IO CInt
37 37
38gegenpoly_3_e :: Double -> Double -> (Double,Double) 38gegenpoly_3_e :: Double -> Double -> (Double,Double)
39gegenpoly_3_e lambda x = createSFR "gegenpoly_3_e" $ gsl_sf_gegenpoly_3_e lambda x 39gegenpoly_3_e lambda x = createSFR "gegenpoly_3_e" $ gsl_sf_gegenpoly_3_e lambda x
40foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_3_e" gsl_sf_gegenpoly_3_e :: Double -> Double -> Ptr () -> IO CInt 40foreign import ccall unsafe "gsl_sf_gegenpoly_3_e" gsl_sf_gegenpoly_3_e :: Double -> Double -> Ptr () -> IO CInt
41 41
42gegenpoly_1 :: Double -> Double -> Double 42gegenpoly_1 :: Double -> Double -> Double
43gegenpoly_1 = gsl_sf_gegenpoly_1 43gegenpoly_1 = gsl_sf_gegenpoly_1
44foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_1" gsl_sf_gegenpoly_1 :: Double -> Double -> Double 44foreign import ccall unsafe "gsl_sf_gegenpoly_1" gsl_sf_gegenpoly_1 :: Double -> Double -> Double
45 45
46gegenpoly_2 :: Double -> Double -> Double 46gegenpoly_2 :: Double -> Double -> Double
47gegenpoly_2 = gsl_sf_gegenpoly_2 47gegenpoly_2 = gsl_sf_gegenpoly_2
48foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_2" gsl_sf_gegenpoly_2 :: Double -> Double -> Double 48foreign import ccall unsafe "gsl_sf_gegenpoly_2" gsl_sf_gegenpoly_2 :: Double -> Double -> Double
49 49
50gegenpoly_3 :: Double -> Double -> Double 50gegenpoly_3 :: Double -> Double -> Double
51gegenpoly_3 = gsl_sf_gegenpoly_3 51gegenpoly_3 = gsl_sf_gegenpoly_3
52foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_3" gsl_sf_gegenpoly_3 :: Double -> Double -> Double 52foreign import ccall unsafe "gsl_sf_gegenpoly_3" gsl_sf_gegenpoly_3 :: Double -> Double -> Double
53 53
54gegenpoly_n_e :: CInt -> Double -> Double -> (Double,Double) 54gegenpoly_n_e :: CInt -> Double -> Double -> (Double,Double)
55gegenpoly_n_e n lambda x = createSFR "gegenpoly_n_e" $ gsl_sf_gegenpoly_n_e n lambda x 55gegenpoly_n_e n lambda x = createSFR "gegenpoly_n_e" $ gsl_sf_gegenpoly_n_e n lambda x
56foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_n_e" gsl_sf_gegenpoly_n_e :: CInt -> Double -> Double -> Ptr () -> IO CInt 56foreign import ccall unsafe "gsl_sf_gegenpoly_n_e" gsl_sf_gegenpoly_n_e :: CInt -> Double -> Double -> Ptr () -> IO CInt
57 57
58gegenpoly_n :: CInt -> Double -> Double -> Double 58gegenpoly_n :: CInt -> Double -> Double -> Double
59gegenpoly_n = gsl_sf_gegenpoly_n 59gegenpoly_n = gsl_sf_gegenpoly_n
60foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_n" gsl_sf_gegenpoly_n :: CInt -> Double -> Double -> Double 60foreign import ccall unsafe "gsl_sf_gegenpoly_n" gsl_sf_gegenpoly_n :: CInt -> Double -> Double -> Double
61 61
62gegenpoly_array :: CInt -> Double -> Double -> Ptr Double -> CInt 62gegenpoly_array :: CInt -> Double -> Double -> Ptr Double -> CInt
63gegenpoly_array = gsl_sf_gegenpoly_array 63gegenpoly_array = gsl_sf_gegenpoly_array
64foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_array" gsl_sf_gegenpoly_array :: CInt -> Double -> Double -> Ptr Double -> CInt 64foreign import ccall unsafe "gsl_sf_gegenpoly_array" gsl_sf_gegenpoly_array :: CInt -> Double -> Double -> Ptr Double -> CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Hyperg.hs b/packages/special/lib/Numeric/GSL/Special/Hyperg.hs
index ac237a5..ec974a4 100644
--- a/packages/special/lib/Numeric/GSL/Special/Hyperg.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Hyperg.hs
@@ -43,88 +43,88 @@ import Numeric.GSL.Special.Internal
43 43
44hyperg_0F1_e :: Double -> Double -> (Double,Double) 44hyperg_0F1_e :: Double -> Double -> (Double,Double)
45hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x 45hyperg_0F1_e c x = createSFR "hyperg_0F1_e" $ gsl_sf_hyperg_0F1_e c x
46foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr () -> IO CInt 46foreign import ccall unsafe "gsl_sf_hyperg_0F1_e" gsl_sf_hyperg_0F1_e :: Double -> Double -> Ptr () -> IO CInt
47 47
48hyperg_0F1 :: Double -> Double -> Double 48hyperg_0F1 :: Double -> Double -> Double
49hyperg_0F1 = gsl_sf_hyperg_0F1 49hyperg_0F1 = gsl_sf_hyperg_0F1
50foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double 50foreign import ccall unsafe "gsl_sf_hyperg_0F1" gsl_sf_hyperg_0F1 :: Double -> Double -> Double
51 51
52hyperg_1F1_int_e :: CInt -> CInt -> Double -> (Double,Double) 52hyperg_1F1_int_e :: CInt -> CInt -> Double -> (Double,Double)
53hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x 53hyperg_1F1_int_e m n x = createSFR "hyperg_1F1_int_e" $ gsl_sf_hyperg_1F1_int_e m n x
54foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 54foreign import ccall unsafe "gsl_sf_hyperg_1F1_int_e" gsl_sf_hyperg_1F1_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
55 55
56hyperg_1F1_int :: CInt -> CInt -> Double -> Double 56hyperg_1F1_int :: CInt -> CInt -> Double -> Double
57hyperg_1F1_int = gsl_sf_hyperg_1F1_int 57hyperg_1F1_int = gsl_sf_hyperg_1F1_int
58foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: CInt -> CInt -> Double -> Double 58foreign import ccall unsafe "gsl_sf_hyperg_1F1_int" gsl_sf_hyperg_1F1_int :: CInt -> CInt -> Double -> Double
59 59
60hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double) 60hyperg_1F1_e :: Double -> Double -> Double -> (Double,Double)
61hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x 61hyperg_1F1_e a b x = createSFR "hyperg_1F1_e" $ gsl_sf_hyperg_1F1_e a b x
62foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr () -> IO CInt 62foreign import ccall unsafe "gsl_sf_hyperg_1F1_e" gsl_sf_hyperg_1F1_e :: Double -> Double -> Double -> Ptr () -> IO CInt
63 63
64hyperg_1F1 :: Double -> Double -> Double -> Double 64hyperg_1F1 :: Double -> Double -> Double -> Double
65hyperg_1F1 = gsl_sf_hyperg_1F1 65hyperg_1F1 = gsl_sf_hyperg_1F1
66foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double 66foreign import ccall unsafe "gsl_sf_hyperg_1F1" gsl_sf_hyperg_1F1 :: Double -> Double -> Double -> Double
67 67
68hyperg_U_int_e :: CInt -> CInt -> Double -> (Double,Double) 68hyperg_U_int_e :: CInt -> CInt -> Double -> (Double,Double)
69hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x 69hyperg_U_int_e m n x = createSFR "hyperg_U_int_e" $ gsl_sf_hyperg_U_int_e m n x
70foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 70foreign import ccall unsafe "gsl_sf_hyperg_U_int_e" gsl_sf_hyperg_U_int_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
71 71
72hyperg_U_int :: CInt -> CInt -> Double -> Double 72hyperg_U_int :: CInt -> CInt -> Double -> Double
73hyperg_U_int = gsl_sf_hyperg_U_int 73hyperg_U_int = gsl_sf_hyperg_U_int
74foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: CInt -> CInt -> Double -> Double 74foreign import ccall unsafe "gsl_sf_hyperg_U_int" gsl_sf_hyperg_U_int :: CInt -> CInt -> Double -> Double
75 75
76hyperg_U_int_e10_e :: CInt -> CInt -> Double -> (Double,Int,Double) 76hyperg_U_int_e10_e :: CInt -> CInt -> Double -> (Double,Int,Double)
77hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x 77hyperg_U_int_e10_e m n x = createSFR_E10 "hyperg_U_int_e10_e" $ gsl_sf_hyperg_U_int_e10_e m n x
78foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 78foreign import ccall unsafe "gsl_sf_hyperg_U_int_e10_e" gsl_sf_hyperg_U_int_e10_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
79 79
80hyperg_U_e :: Double -> Double -> Double -> (Double,Double) 80hyperg_U_e :: Double -> Double -> Double -> (Double,Double)
81hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x 81hyperg_U_e a b x = createSFR "hyperg_U_e" $ gsl_sf_hyperg_U_e a b x
82foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr () -> IO CInt 82foreign import ccall unsafe "gsl_sf_hyperg_U_e" gsl_sf_hyperg_U_e :: Double -> Double -> Double -> Ptr () -> IO CInt
83 83
84hyperg_U :: Double -> Double -> Double -> Double 84hyperg_U :: Double -> Double -> Double -> Double
85hyperg_U = gsl_sf_hyperg_U 85hyperg_U = gsl_sf_hyperg_U
86foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double 86foreign import ccall unsafe "gsl_sf_hyperg_U" gsl_sf_hyperg_U :: Double -> Double -> Double -> Double
87 87
88hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double) 88hyperg_U_e10_e :: Double -> Double -> Double -> (Double,Int,Double)
89hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x 89hyperg_U_e10_e a b x = createSFR_E10 "hyperg_U_e10_e" $ gsl_sf_hyperg_U_e10_e a b x
90foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO CInt 90foreign import ccall unsafe "gsl_sf_hyperg_U_e10_e" gsl_sf_hyperg_U_e10_e :: Double -> Double -> Double -> Ptr () -> IO CInt
91 91
92hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double) 92hyperg_2F1_e :: Double -> Double -> Double -> Double -> (Double,Double)
93hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x 93hyperg_2F1_e a b c x = createSFR "hyperg_2F1_e" $ gsl_sf_hyperg_2F1_e a b c x
94foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 94foreign import ccall unsafe "gsl_sf_hyperg_2F1_e" gsl_sf_hyperg_2F1_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
95 95
96hyperg_2F1 :: Double -> Double -> Double -> Double -> Double 96hyperg_2F1 :: Double -> Double -> Double -> Double -> Double
97hyperg_2F1 = gsl_sf_hyperg_2F1 97hyperg_2F1 = gsl_sf_hyperg_2F1
98foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double 98foreign import ccall unsafe "gsl_sf_hyperg_2F1" gsl_sf_hyperg_2F1 :: Double -> Double -> Double -> Double -> Double
99 99
100hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double) 100hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> (Double,Double)
101hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x 101hyperg_2F1_conj_e aR aI c x = createSFR "hyperg_2F1_conj_e" $ gsl_sf_hyperg_2F1_conj_e aR aI c x
102foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 102foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_e" gsl_sf_hyperg_2F1_conj_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
103 103
104hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double 104hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double
105hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj 105hyperg_2F1_conj = gsl_sf_hyperg_2F1_conj
106foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double 106foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj" gsl_sf_hyperg_2F1_conj :: Double -> Double -> Double -> Double -> Double
107 107
108hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) 108hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double)
109hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x 109hyperg_2F1_renorm_e a b c x = createSFR "hyperg_2F1_renorm_e" $ gsl_sf_hyperg_2F1_renorm_e a b c x
110foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 110foreign import ccall unsafe "gsl_sf_hyperg_2F1_renorm_e" gsl_sf_hyperg_2F1_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
111 111
112hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double 112hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double
113hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm 113hyperg_2F1_renorm = gsl_sf_hyperg_2F1_renorm
114foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double 114foreign import ccall unsafe "gsl_sf_hyperg_2F1_renorm" gsl_sf_hyperg_2F1_renorm :: Double -> Double -> Double -> Double -> Double
115 115
116hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double) 116hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> (Double,Double)
117hyperg_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 117hyperg_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
118foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_renorm_e" gsl_sf_hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 118foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_renorm_e" gsl_sf_hyperg_2F1_conj_renorm_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
119 119
120hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double 120hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double
121hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm 121hyperg_2F1_conj_renorm = gsl_sf_hyperg_2F1_conj_renorm
122foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double 122foreign import ccall unsafe "gsl_sf_hyperg_2F1_conj_renorm" gsl_sf_hyperg_2F1_conj_renorm :: Double -> Double -> Double -> Double -> Double
123 123
124hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double) 124hyperg_2F0_e :: Double -> Double -> Double -> (Double,Double)
125hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x 125hyperg_2F0_e a b x = createSFR "hyperg_2F0_e" $ gsl_sf_hyperg_2F0_e a b x
126foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr () -> IO CInt 126foreign import ccall unsafe "gsl_sf_hyperg_2F0_e" gsl_sf_hyperg_2F0_e :: Double -> Double -> Double -> Ptr () -> IO CInt
127 127
128hyperg_2F0 :: Double -> Double -> Double -> Double 128hyperg_2F0 :: Double -> Double -> Double -> Double
129hyperg_2F0 = gsl_sf_hyperg_2F0 129hyperg_2F0 = gsl_sf_hyperg_2F0
130foreign import ccall SAFE_CHEAP "gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double 130foreign import ccall unsafe "gsl_sf_hyperg_2F0" gsl_sf_hyperg_2F0 :: Double -> Double -> Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Laguerre.hs b/packages/special/lib/Numeric/GSL/Special/Laguerre.hs
index 28b3d20..4110601 100644
--- a/packages/special/lib/Numeric/GSL/Special/Laguerre.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Laguerre.hs
@@ -29,32 +29,32 @@ import Numeric.GSL.Special.Internal
29 29
30laguerre_1_e :: Double -> Double -> (Double,Double) 30laguerre_1_e :: Double -> Double -> (Double,Double)
31laguerre_1_e a x = createSFR "laguerre_1_e" $ gsl_sf_laguerre_1_e a x 31laguerre_1_e a x = createSFR "laguerre_1_e" $ gsl_sf_laguerre_1_e a x
32foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_1_e" gsl_sf_laguerre_1_e :: Double -> Double -> Ptr () -> IO CInt 32foreign import ccall unsafe "gsl_sf_laguerre_1_e" gsl_sf_laguerre_1_e :: Double -> Double -> Ptr () -> IO CInt
33 33
34laguerre_2_e :: Double -> Double -> (Double,Double) 34laguerre_2_e :: Double -> Double -> (Double,Double)
35laguerre_2_e a x = createSFR "laguerre_2_e" $ gsl_sf_laguerre_2_e a x 35laguerre_2_e a x = createSFR "laguerre_2_e" $ gsl_sf_laguerre_2_e a x
36foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_2_e" gsl_sf_laguerre_2_e :: Double -> Double -> Ptr () -> IO CInt 36foreign import ccall unsafe "gsl_sf_laguerre_2_e" gsl_sf_laguerre_2_e :: Double -> Double -> Ptr () -> IO CInt
37 37
38laguerre_3_e :: Double -> Double -> (Double,Double) 38laguerre_3_e :: Double -> Double -> (Double,Double)
39laguerre_3_e a x = createSFR "laguerre_3_e" $ gsl_sf_laguerre_3_e a x 39laguerre_3_e a x = createSFR "laguerre_3_e" $ gsl_sf_laguerre_3_e a x
40foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_3_e" gsl_sf_laguerre_3_e :: Double -> Double -> Ptr () -> IO CInt 40foreign import ccall unsafe "gsl_sf_laguerre_3_e" gsl_sf_laguerre_3_e :: Double -> Double -> Ptr () -> IO CInt
41 41
42laguerre_1 :: Double -> Double -> Double 42laguerre_1 :: Double -> Double -> Double
43laguerre_1 = gsl_sf_laguerre_1 43laguerre_1 = gsl_sf_laguerre_1
44foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_1" gsl_sf_laguerre_1 :: Double -> Double -> Double 44foreign import ccall unsafe "gsl_sf_laguerre_1" gsl_sf_laguerre_1 :: Double -> Double -> Double
45 45
46laguerre_2 :: Double -> Double -> Double 46laguerre_2 :: Double -> Double -> Double
47laguerre_2 = gsl_sf_laguerre_2 47laguerre_2 = gsl_sf_laguerre_2
48foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_2" gsl_sf_laguerre_2 :: Double -> Double -> Double 48foreign import ccall unsafe "gsl_sf_laguerre_2" gsl_sf_laguerre_2 :: Double -> Double -> Double
49 49
50laguerre_3 :: Double -> Double -> Double 50laguerre_3 :: Double -> Double -> Double
51laguerre_3 = gsl_sf_laguerre_3 51laguerre_3 = gsl_sf_laguerre_3
52foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_3" gsl_sf_laguerre_3 :: Double -> Double -> Double 52foreign import ccall unsafe "gsl_sf_laguerre_3" gsl_sf_laguerre_3 :: Double -> Double -> Double
53 53
54laguerre_n_e :: CInt -> Double -> Double -> (Double,Double) 54laguerre_n_e :: CInt -> Double -> Double -> (Double,Double)
55laguerre_n_e n a x = createSFR "laguerre_n_e" $ gsl_sf_laguerre_n_e n a x 55laguerre_n_e n a x = createSFR "laguerre_n_e" $ gsl_sf_laguerre_n_e n a x
56foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_n_e" gsl_sf_laguerre_n_e :: CInt -> Double -> Double -> Ptr () -> IO CInt 56foreign import ccall unsafe "gsl_sf_laguerre_n_e" gsl_sf_laguerre_n_e :: CInt -> Double -> Double -> Ptr () -> IO CInt
57 57
58laguerre_n :: CInt -> Double -> Double -> Double 58laguerre_n :: CInt -> Double -> Double -> Double
59laguerre_n = gsl_sf_laguerre_n 59laguerre_n = gsl_sf_laguerre_n
60foreign import ccall SAFE_CHEAP "gsl_sf_laguerre_n" gsl_sf_laguerre_n :: CInt -> Double -> Double -> Double 60foreign import ccall unsafe "gsl_sf_laguerre_n" gsl_sf_laguerre_n :: CInt -> Double -> Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Lambert.hs b/packages/special/lib/Numeric/GSL/Special/Lambert.hs
index 44fbfb1..381f54c 100644
--- a/packages/special/lib/Numeric/GSL/Special/Lambert.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Lambert.hs
@@ -25,16 +25,16 @@ import Numeric.GSL.Special.Internal
25 25
26lambert_W0_e :: Double -> (Double,Double) 26lambert_W0_e :: Double -> (Double,Double)
27lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x 27lambert_W0_e x = createSFR "lambert_W0_e" $ gsl_sf_lambert_W0_e x
28foreign import ccall SAFE_CHEAP "gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr () -> IO CInt 28foreign import ccall unsafe "gsl_sf_lambert_W0_e" gsl_sf_lambert_W0_e :: Double -> Ptr () -> IO CInt
29 29
30lambert_W0 :: Double -> Double 30lambert_W0 :: Double -> Double
31lambert_W0 = gsl_sf_lambert_W0 31lambert_W0 = gsl_sf_lambert_W0
32foreign import ccall SAFE_CHEAP "gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double 32foreign import ccall unsafe "gsl_sf_lambert_W0" gsl_sf_lambert_W0 :: Double -> Double
33 33
34lambert_Wm1_e :: Double -> (Double,Double) 34lambert_Wm1_e :: Double -> (Double,Double)
35lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x 35lambert_Wm1_e x = createSFR "lambert_Wm1_e" $ gsl_sf_lambert_Wm1_e x
36foreign import ccall SAFE_CHEAP "gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr () -> IO CInt 36foreign import ccall unsafe "gsl_sf_lambert_Wm1_e" gsl_sf_lambert_Wm1_e :: Double -> Ptr () -> IO CInt
37 37
38lambert_Wm1 :: Double -> Double 38lambert_Wm1 :: Double -> Double
39lambert_Wm1 = gsl_sf_lambert_Wm1 39lambert_Wm1 = gsl_sf_lambert_Wm1
40foreign import ccall SAFE_CHEAP "gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double 40foreign import ccall unsafe "gsl_sf_lambert_Wm1" gsl_sf_lambert_Wm1 :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Legendre.hs b/packages/special/lib/Numeric/GSL/Special/Legendre.hs
index cb33e2e..380c43c 100644
--- a/packages/special/lib/Numeric/GSL/Special/Legendre.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Legendre.hs
@@ -58,176 +58,176 @@ import Numeric.GSL.Special.Internal
58 58
59legendre_Pl_e :: CInt -> Double -> (Double,Double) 59legendre_Pl_e :: CInt -> Double -> (Double,Double)
60legendre_Pl_e l x = createSFR "legendre_Pl_e" $ gsl_sf_legendre_Pl_e l x 60legendre_Pl_e l x = createSFR "legendre_Pl_e" $ gsl_sf_legendre_Pl_e l x
61foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Pl_e" gsl_sf_legendre_Pl_e :: CInt -> Double -> Ptr () -> IO CInt 61foreign import ccall unsafe "gsl_sf_legendre_Pl_e" gsl_sf_legendre_Pl_e :: CInt -> Double -> Ptr () -> IO CInt
62 62
63legendre_Pl :: CInt -> Double -> Double 63legendre_Pl :: CInt -> Double -> Double
64legendre_Pl = gsl_sf_legendre_Pl 64legendre_Pl = gsl_sf_legendre_Pl
65foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Pl" gsl_sf_legendre_Pl :: CInt -> Double -> Double 65foreign import ccall unsafe "gsl_sf_legendre_Pl" gsl_sf_legendre_Pl :: CInt -> Double -> Double
66 66
67legendre_Pl_array :: CInt -> Double -> Ptr Double -> CInt 67legendre_Pl_array :: CInt -> Double -> Ptr Double -> CInt
68legendre_Pl_array = gsl_sf_legendre_Pl_array 68legendre_Pl_array = gsl_sf_legendre_Pl_array
69foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Pl_array" gsl_sf_legendre_Pl_array :: CInt -> Double -> Ptr Double -> CInt 69foreign import ccall unsafe "gsl_sf_legendre_Pl_array" gsl_sf_legendre_Pl_array :: CInt -> Double -> Ptr Double -> CInt
70 70
71legendre_Pl_deriv_array :: CInt -> Double -> Ptr Double -> Ptr Double -> CInt 71legendre_Pl_deriv_array :: CInt -> Double -> Ptr Double -> Ptr Double -> CInt
72legendre_Pl_deriv_array = gsl_sf_legendre_Pl_deriv_array 72legendre_Pl_deriv_array = gsl_sf_legendre_Pl_deriv_array
73foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Pl_deriv_array" gsl_sf_legendre_Pl_deriv_array :: CInt -> Double -> Ptr Double -> Ptr Double -> CInt 73foreign import ccall unsafe "gsl_sf_legendre_Pl_deriv_array" gsl_sf_legendre_Pl_deriv_array :: CInt -> Double -> Ptr Double -> Ptr Double -> CInt
74 74
75legendre_P1_e :: Double -> (Double,Double) 75legendre_P1_e :: Double -> (Double,Double)
76legendre_P1_e x = createSFR "legendre_P1_e" $ gsl_sf_legendre_P1_e x 76legendre_P1_e x = createSFR "legendre_P1_e" $ gsl_sf_legendre_P1_e x
77foreign import ccall SAFE_CHEAP "gsl_sf_legendre_P1_e" gsl_sf_legendre_P1_e :: Double -> Ptr () -> IO CInt 77foreign import ccall unsafe "gsl_sf_legendre_P1_e" gsl_sf_legendre_P1_e :: Double -> Ptr () -> IO CInt
78 78
79legendre_P2_e :: Double -> (Double,Double) 79legendre_P2_e :: Double -> (Double,Double)
80legendre_P2_e x = createSFR "legendre_P2_e" $ gsl_sf_legendre_P2_e x 80legendre_P2_e x = createSFR "legendre_P2_e" $ gsl_sf_legendre_P2_e x
81foreign import ccall SAFE_CHEAP "gsl_sf_legendre_P2_e" gsl_sf_legendre_P2_e :: Double -> Ptr () -> IO CInt 81foreign import ccall unsafe "gsl_sf_legendre_P2_e" gsl_sf_legendre_P2_e :: Double -> Ptr () -> IO CInt
82 82
83legendre_P3_e :: Double -> (Double,Double) 83legendre_P3_e :: Double -> (Double,Double)
84legendre_P3_e x = createSFR "legendre_P3_e" $ gsl_sf_legendre_P3_e x 84legendre_P3_e x = createSFR "legendre_P3_e" $ gsl_sf_legendre_P3_e x
85foreign import ccall SAFE_CHEAP "gsl_sf_legendre_P3_e" gsl_sf_legendre_P3_e :: Double -> Ptr () -> IO CInt 85foreign import ccall unsafe "gsl_sf_legendre_P3_e" gsl_sf_legendre_P3_e :: Double -> Ptr () -> IO CInt
86 86
87legendre_P1 :: Double -> Double 87legendre_P1 :: Double -> Double
88legendre_P1 = gsl_sf_legendre_P1 88legendre_P1 = gsl_sf_legendre_P1
89foreign import ccall SAFE_CHEAP "gsl_sf_legendre_P1" gsl_sf_legendre_P1 :: Double -> Double 89foreign import ccall unsafe "gsl_sf_legendre_P1" gsl_sf_legendre_P1 :: Double -> Double
90 90
91legendre_P2 :: Double -> Double 91legendre_P2 :: Double -> Double
92legendre_P2 = gsl_sf_legendre_P2 92legendre_P2 = gsl_sf_legendre_P2
93foreign import ccall SAFE_CHEAP "gsl_sf_legendre_P2" gsl_sf_legendre_P2 :: Double -> Double 93foreign import ccall unsafe "gsl_sf_legendre_P2" gsl_sf_legendre_P2 :: Double -> Double
94 94
95legendre_P3 :: Double -> Double 95legendre_P3 :: Double -> Double
96legendre_P3 = gsl_sf_legendre_P3 96legendre_P3 = gsl_sf_legendre_P3
97foreign import ccall SAFE_CHEAP "gsl_sf_legendre_P3" gsl_sf_legendre_P3 :: Double -> Double 97foreign import ccall unsafe "gsl_sf_legendre_P3" gsl_sf_legendre_P3 :: Double -> Double
98 98
99legendre_Q0_e :: Double -> (Double,Double) 99legendre_Q0_e :: Double -> (Double,Double)
100legendre_Q0_e x = createSFR "legendre_Q0_e" $ gsl_sf_legendre_Q0_e x 100legendre_Q0_e x = createSFR "legendre_Q0_e" $ gsl_sf_legendre_Q0_e x
101foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Q0_e" gsl_sf_legendre_Q0_e :: Double -> Ptr () -> IO CInt 101foreign import ccall unsafe "gsl_sf_legendre_Q0_e" gsl_sf_legendre_Q0_e :: Double -> Ptr () -> IO CInt
102 102
103legendre_Q0 :: Double -> Double 103legendre_Q0 :: Double -> Double
104legendre_Q0 = gsl_sf_legendre_Q0 104legendre_Q0 = gsl_sf_legendre_Q0
105foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Q0" gsl_sf_legendre_Q0 :: Double -> Double 105foreign import ccall unsafe "gsl_sf_legendre_Q0" gsl_sf_legendre_Q0 :: Double -> Double
106 106
107legendre_Q1_e :: Double -> (Double,Double) 107legendre_Q1_e :: Double -> (Double,Double)
108legendre_Q1_e x = createSFR "legendre_Q1_e" $ gsl_sf_legendre_Q1_e x 108legendre_Q1_e x = createSFR "legendre_Q1_e" $ gsl_sf_legendre_Q1_e x
109foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Q1_e" gsl_sf_legendre_Q1_e :: Double -> Ptr () -> IO CInt 109foreign import ccall unsafe "gsl_sf_legendre_Q1_e" gsl_sf_legendre_Q1_e :: Double -> Ptr () -> IO CInt
110 110
111legendre_Q1 :: Double -> Double 111legendre_Q1 :: Double -> Double
112legendre_Q1 = gsl_sf_legendre_Q1 112legendre_Q1 = gsl_sf_legendre_Q1
113foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Q1" gsl_sf_legendre_Q1 :: Double -> Double 113foreign import ccall unsafe "gsl_sf_legendre_Q1" gsl_sf_legendre_Q1 :: Double -> Double
114 114
115legendre_Ql_e :: CInt -> Double -> (Double,Double) 115legendre_Ql_e :: CInt -> Double -> (Double,Double)
116legendre_Ql_e l x = createSFR "legendre_Ql_e" $ gsl_sf_legendre_Ql_e l x 116legendre_Ql_e l x = createSFR "legendre_Ql_e" $ gsl_sf_legendre_Ql_e l x
117foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Ql_e" gsl_sf_legendre_Ql_e :: CInt -> Double -> Ptr () -> IO CInt 117foreign import ccall unsafe "gsl_sf_legendre_Ql_e" gsl_sf_legendre_Ql_e :: CInt -> Double -> Ptr () -> IO CInt
118 118
119legendre_Ql :: CInt -> Double -> Double 119legendre_Ql :: CInt -> Double -> Double
120legendre_Ql = gsl_sf_legendre_Ql 120legendre_Ql = gsl_sf_legendre_Ql
121foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Ql" gsl_sf_legendre_Ql :: CInt -> Double -> Double 121foreign import ccall unsafe "gsl_sf_legendre_Ql" gsl_sf_legendre_Ql :: CInt -> Double -> Double
122 122
123legendre_Plm_e :: CInt -> CInt -> Double -> (Double,Double) 123legendre_Plm_e :: CInt -> CInt -> Double -> (Double,Double)
124legendre_Plm_e l m x = createSFR "legendre_Plm_e" $ gsl_sf_legendre_Plm_e l m x 124legendre_Plm_e l m x = createSFR "legendre_Plm_e" $ gsl_sf_legendre_Plm_e l m x
125foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Plm_e" gsl_sf_legendre_Plm_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 125foreign import ccall unsafe "gsl_sf_legendre_Plm_e" gsl_sf_legendre_Plm_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
126 126
127legendre_Plm :: CInt -> CInt -> Double -> Double 127legendre_Plm :: CInt -> CInt -> Double -> Double
128legendre_Plm = gsl_sf_legendre_Plm 128legendre_Plm = gsl_sf_legendre_Plm
129foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Plm" gsl_sf_legendre_Plm :: CInt -> CInt -> Double -> Double 129foreign import ccall unsafe "gsl_sf_legendre_Plm" gsl_sf_legendre_Plm :: CInt -> CInt -> Double -> Double
130 130
131legendre_Plm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 131legendre_Plm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
132legendre_Plm_array = gsl_sf_legendre_Plm_array 132legendre_Plm_array = gsl_sf_legendre_Plm_array
133foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Plm_array" gsl_sf_legendre_Plm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 133foreign import ccall unsafe "gsl_sf_legendre_Plm_array" gsl_sf_legendre_Plm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
134 134
135legendre_Plm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt 135legendre_Plm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt
136legendre_Plm_deriv_array = gsl_sf_legendre_Plm_deriv_array 136legendre_Plm_deriv_array = gsl_sf_legendre_Plm_deriv_array
137foreign import ccall SAFE_CHEAP "gsl_sf_legendre_Plm_deriv_array" gsl_sf_legendre_Plm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt 137foreign import ccall unsafe "gsl_sf_legendre_Plm_deriv_array" gsl_sf_legendre_Plm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt
138 138
139legendre_sphPlm_e :: CInt -> CInt -> Double -> (Double,Double) 139legendre_sphPlm_e :: CInt -> CInt -> Double -> (Double,Double)
140legendre_sphPlm_e l m x = createSFR "legendre_sphPlm_e" $ gsl_sf_legendre_sphPlm_e l m x 140legendre_sphPlm_e l m x = createSFR "legendre_sphPlm_e" $ gsl_sf_legendre_sphPlm_e l m x
141foreign import ccall SAFE_CHEAP "gsl_sf_legendre_sphPlm_e" gsl_sf_legendre_sphPlm_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt 141foreign import ccall unsafe "gsl_sf_legendre_sphPlm_e" gsl_sf_legendre_sphPlm_e :: CInt -> CInt -> Double -> Ptr () -> IO CInt
142 142
143legendre_sphPlm :: CInt -> CInt -> Double -> Double 143legendre_sphPlm :: CInt -> CInt -> Double -> Double
144legendre_sphPlm = gsl_sf_legendre_sphPlm 144legendre_sphPlm = gsl_sf_legendre_sphPlm
145foreign import ccall SAFE_CHEAP "gsl_sf_legendre_sphPlm" gsl_sf_legendre_sphPlm :: CInt -> CInt -> Double -> Double 145foreign import ccall unsafe "gsl_sf_legendre_sphPlm" gsl_sf_legendre_sphPlm :: CInt -> CInt -> Double -> Double
146 146
147legendre_sphPlm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 147legendre_sphPlm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
148legendre_sphPlm_array = gsl_sf_legendre_sphPlm_array 148legendre_sphPlm_array = gsl_sf_legendre_sphPlm_array
149foreign import ccall SAFE_CHEAP "gsl_sf_legendre_sphPlm_array" gsl_sf_legendre_sphPlm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt 149foreign import ccall unsafe "gsl_sf_legendre_sphPlm_array" gsl_sf_legendre_sphPlm_array :: CInt -> CInt -> Double -> Ptr Double -> CInt
150 150
151legendre_sphPlm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt 151legendre_sphPlm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt
152legendre_sphPlm_deriv_array = gsl_sf_legendre_sphPlm_deriv_array 152legendre_sphPlm_deriv_array = gsl_sf_legendre_sphPlm_deriv_array
153foreign import ccall SAFE_CHEAP "gsl_sf_legendre_sphPlm_deriv_array" gsl_sf_legendre_sphPlm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt 153foreign import ccall unsafe "gsl_sf_legendre_sphPlm_deriv_array" gsl_sf_legendre_sphPlm_deriv_array :: CInt -> CInt -> Double -> Ptr Double -> Ptr Double -> CInt
154 154
155legendre_array_size :: CInt -> CInt -> CInt 155legendre_array_size :: CInt -> CInt -> CInt
156legendre_array_size = gsl_sf_legendre_array_size 156legendre_array_size = gsl_sf_legendre_array_size
157foreign import ccall SAFE_CHEAP "gsl_sf_legendre_array_size" gsl_sf_legendre_array_size :: CInt -> CInt -> CInt 157foreign import ccall unsafe "gsl_sf_legendre_array_size" gsl_sf_legendre_array_size :: CInt -> CInt -> CInt
158 158
159conicalP_half_e :: Double -> Double -> (Double,Double) 159conicalP_half_e :: Double -> Double -> (Double,Double)
160conicalP_half_e lambda x = createSFR "conicalP_half_e" $ gsl_sf_conicalP_half_e lambda x 160conicalP_half_e lambda x = createSFR "conicalP_half_e" $ gsl_sf_conicalP_half_e lambda x
161foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_half_e" gsl_sf_conicalP_half_e :: Double -> Double -> Ptr () -> IO CInt 161foreign import ccall unsafe "gsl_sf_conicalP_half_e" gsl_sf_conicalP_half_e :: Double -> Double -> Ptr () -> IO CInt
162 162
163conicalP_half :: Double -> Double -> Double 163conicalP_half :: Double -> Double -> Double
164conicalP_half = gsl_sf_conicalP_half 164conicalP_half = gsl_sf_conicalP_half
165foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_half" gsl_sf_conicalP_half :: Double -> Double -> Double 165foreign import ccall unsafe "gsl_sf_conicalP_half" gsl_sf_conicalP_half :: Double -> Double -> Double
166 166
167conicalP_mhalf_e :: Double -> Double -> (Double,Double) 167conicalP_mhalf_e :: Double -> Double -> (Double,Double)
168conicalP_mhalf_e lambda x = createSFR "conicalP_mhalf_e" $ gsl_sf_conicalP_mhalf_e lambda x 168conicalP_mhalf_e lambda x = createSFR "conicalP_mhalf_e" $ gsl_sf_conicalP_mhalf_e lambda x
169foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_mhalf_e" gsl_sf_conicalP_mhalf_e :: Double -> Double -> Ptr () -> IO CInt 169foreign import ccall unsafe "gsl_sf_conicalP_mhalf_e" gsl_sf_conicalP_mhalf_e :: Double -> Double -> Ptr () -> IO CInt
170 170
171conicalP_mhalf :: Double -> Double -> Double 171conicalP_mhalf :: Double -> Double -> Double
172conicalP_mhalf = gsl_sf_conicalP_mhalf 172conicalP_mhalf = gsl_sf_conicalP_mhalf
173foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_mhalf" gsl_sf_conicalP_mhalf :: Double -> Double -> Double 173foreign import ccall unsafe "gsl_sf_conicalP_mhalf" gsl_sf_conicalP_mhalf :: Double -> Double -> Double
174 174
175conicalP_0_e :: Double -> Double -> (Double,Double) 175conicalP_0_e :: Double -> Double -> (Double,Double)
176conicalP_0_e lambda x = createSFR "conicalP_0_e" $ gsl_sf_conicalP_0_e lambda x 176conicalP_0_e lambda x = createSFR "conicalP_0_e" $ gsl_sf_conicalP_0_e lambda x
177foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_0_e" gsl_sf_conicalP_0_e :: Double -> Double -> Ptr () -> IO CInt 177foreign import ccall unsafe "gsl_sf_conicalP_0_e" gsl_sf_conicalP_0_e :: Double -> Double -> Ptr () -> IO CInt
178 178
179conicalP_0 :: Double -> Double -> Double 179conicalP_0 :: Double -> Double -> Double
180conicalP_0 = gsl_sf_conicalP_0 180conicalP_0 = gsl_sf_conicalP_0
181foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_0" gsl_sf_conicalP_0 :: Double -> Double -> Double 181foreign import ccall unsafe "gsl_sf_conicalP_0" gsl_sf_conicalP_0 :: Double -> Double -> Double
182 182
183conicalP_1_e :: Double -> Double -> (Double,Double) 183conicalP_1_e :: Double -> Double -> (Double,Double)
184conicalP_1_e lambda x = createSFR "conicalP_1_e" $ gsl_sf_conicalP_1_e lambda x 184conicalP_1_e lambda x = createSFR "conicalP_1_e" $ gsl_sf_conicalP_1_e lambda x
185foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_1_e" gsl_sf_conicalP_1_e :: Double -> Double -> Ptr () -> IO CInt 185foreign import ccall unsafe "gsl_sf_conicalP_1_e" gsl_sf_conicalP_1_e :: Double -> Double -> Ptr () -> IO CInt
186 186
187conicalP_1 :: Double -> Double -> Double 187conicalP_1 :: Double -> Double -> Double
188conicalP_1 = gsl_sf_conicalP_1 188conicalP_1 = gsl_sf_conicalP_1
189foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_1" gsl_sf_conicalP_1 :: Double -> Double -> Double 189foreign import ccall unsafe "gsl_sf_conicalP_1" gsl_sf_conicalP_1 :: Double -> Double -> Double
190 190
191conicalP_sph_reg_e :: CInt -> Double -> Double -> (Double,Double) 191conicalP_sph_reg_e :: CInt -> Double -> Double -> (Double,Double)
192conicalP_sph_reg_e l lambda x = createSFR "conicalP_sph_reg_e" $ gsl_sf_conicalP_sph_reg_e l lambda x 192conicalP_sph_reg_e l lambda x = createSFR "conicalP_sph_reg_e" $ gsl_sf_conicalP_sph_reg_e l lambda x
193foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_sph_reg_e" gsl_sf_conicalP_sph_reg_e :: CInt -> Double -> Double -> Ptr () -> IO CInt 193foreign import ccall unsafe "gsl_sf_conicalP_sph_reg_e" gsl_sf_conicalP_sph_reg_e :: CInt -> Double -> Double -> Ptr () -> IO CInt
194 194
195conicalP_sph_reg :: CInt -> Double -> Double -> Double 195conicalP_sph_reg :: CInt -> Double -> Double -> Double
196conicalP_sph_reg = gsl_sf_conicalP_sph_reg 196conicalP_sph_reg = gsl_sf_conicalP_sph_reg
197foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_sph_reg" gsl_sf_conicalP_sph_reg :: CInt -> Double -> Double -> Double 197foreign import ccall unsafe "gsl_sf_conicalP_sph_reg" gsl_sf_conicalP_sph_reg :: CInt -> Double -> Double -> Double
198 198
199conicalP_cyl_reg_e :: CInt -> Double -> Double -> (Double,Double) 199conicalP_cyl_reg_e :: CInt -> Double -> Double -> (Double,Double)
200conicalP_cyl_reg_e m lambda x = createSFR "conicalP_cyl_reg_e" $ gsl_sf_conicalP_cyl_reg_e m lambda x 200conicalP_cyl_reg_e m lambda x = createSFR "conicalP_cyl_reg_e" $ gsl_sf_conicalP_cyl_reg_e m lambda x
201foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_cyl_reg_e" gsl_sf_conicalP_cyl_reg_e :: CInt -> Double -> Double -> Ptr () -> IO CInt 201foreign import ccall unsafe "gsl_sf_conicalP_cyl_reg_e" gsl_sf_conicalP_cyl_reg_e :: CInt -> Double -> Double -> Ptr () -> IO CInt
202 202
203conicalP_cyl_reg :: CInt -> Double -> Double -> Double 203conicalP_cyl_reg :: CInt -> Double -> Double -> Double
204conicalP_cyl_reg = gsl_sf_conicalP_cyl_reg 204conicalP_cyl_reg = gsl_sf_conicalP_cyl_reg
205foreign import ccall SAFE_CHEAP "gsl_sf_conicalP_cyl_reg" gsl_sf_conicalP_cyl_reg :: CInt -> Double -> Double -> Double 205foreign import ccall unsafe "gsl_sf_conicalP_cyl_reg" gsl_sf_conicalP_cyl_reg :: CInt -> Double -> Double -> Double
206 206
207legendre_H3d_0_e :: Double -> Double -> (Double,Double) 207legendre_H3d_0_e :: Double -> Double -> (Double,Double)
208legendre_H3d_0_e lambda eta = createSFR "legendre_H3d_0_e" $ gsl_sf_legendre_H3d_0_e lambda eta 208legendre_H3d_0_e lambda eta = createSFR "legendre_H3d_0_e" $ gsl_sf_legendre_H3d_0_e lambda eta
209foreign import ccall SAFE_CHEAP "gsl_sf_legendre_H3d_0_e" gsl_sf_legendre_H3d_0_e :: Double -> Double -> Ptr () -> IO CInt 209foreign import ccall unsafe "gsl_sf_legendre_H3d_0_e" gsl_sf_legendre_H3d_0_e :: Double -> Double -> Ptr () -> IO CInt
210 210
211legendre_H3d_0 :: Double -> Double -> Double 211legendre_H3d_0 :: Double -> Double -> Double
212legendre_H3d_0 = gsl_sf_legendre_H3d_0 212legendre_H3d_0 = gsl_sf_legendre_H3d_0
213foreign import ccall SAFE_CHEAP "gsl_sf_legendre_H3d_0" gsl_sf_legendre_H3d_0 :: Double -> Double -> Double 213foreign import ccall unsafe "gsl_sf_legendre_H3d_0" gsl_sf_legendre_H3d_0 :: Double -> Double -> Double
214 214
215legendre_H3d_1_e :: Double -> Double -> (Double,Double) 215legendre_H3d_1_e :: Double -> Double -> (Double,Double)
216legendre_H3d_1_e lambda eta = createSFR "legendre_H3d_1_e" $ gsl_sf_legendre_H3d_1_e lambda eta 216legendre_H3d_1_e lambda eta = createSFR "legendre_H3d_1_e" $ gsl_sf_legendre_H3d_1_e lambda eta
217foreign import ccall SAFE_CHEAP "gsl_sf_legendre_H3d_1_e" gsl_sf_legendre_H3d_1_e :: Double -> Double -> Ptr () -> IO CInt 217foreign import ccall unsafe "gsl_sf_legendre_H3d_1_e" gsl_sf_legendre_H3d_1_e :: Double -> Double -> Ptr () -> IO CInt
218 218
219legendre_H3d_1 :: Double -> Double -> Double 219legendre_H3d_1 :: Double -> Double -> Double
220legendre_H3d_1 = gsl_sf_legendre_H3d_1 220legendre_H3d_1 = gsl_sf_legendre_H3d_1
221foreign import ccall SAFE_CHEAP "gsl_sf_legendre_H3d_1" gsl_sf_legendre_H3d_1 :: Double -> Double -> Double 221foreign import ccall unsafe "gsl_sf_legendre_H3d_1" gsl_sf_legendre_H3d_1 :: Double -> Double -> Double
222 222
223legendre_H3d_e :: CInt -> Double -> Double -> (Double,Double) 223legendre_H3d_e :: CInt -> Double -> Double -> (Double,Double)
224legendre_H3d_e l lambda eta = createSFR "legendre_H3d_e" $ gsl_sf_legendre_H3d_e l lambda eta 224legendre_H3d_e l lambda eta = createSFR "legendre_H3d_e" $ gsl_sf_legendre_H3d_e l lambda eta
225foreign import ccall SAFE_CHEAP "gsl_sf_legendre_H3d_e" gsl_sf_legendre_H3d_e :: CInt -> Double -> Double -> Ptr () -> IO CInt 225foreign import ccall unsafe "gsl_sf_legendre_H3d_e" gsl_sf_legendre_H3d_e :: CInt -> Double -> Double -> Ptr () -> IO CInt
226 226
227legendre_H3d :: CInt -> Double -> Double -> Double 227legendre_H3d :: CInt -> Double -> Double -> Double
228legendre_H3d = gsl_sf_legendre_H3d 228legendre_H3d = gsl_sf_legendre_H3d
229foreign import ccall SAFE_CHEAP "gsl_sf_legendre_H3d" gsl_sf_legendre_H3d :: CInt -> Double -> Double -> Double 229foreign import ccall unsafe "gsl_sf_legendre_H3d" gsl_sf_legendre_H3d :: CInt -> Double -> Double -> Double
230 230
231legendre_H3d_array :: CInt -> Double -> Double -> Ptr Double -> CInt 231legendre_H3d_array :: CInt -> Double -> Double -> Ptr Double -> CInt
232legendre_H3d_array = gsl_sf_legendre_H3d_array 232legendre_H3d_array = gsl_sf_legendre_H3d_array
233foreign import ccall SAFE_CHEAP "gsl_sf_legendre_H3d_array" gsl_sf_legendre_H3d_array :: CInt -> Double -> Double -> Ptr Double -> CInt 233foreign import ccall unsafe "gsl_sf_legendre_H3d_array" gsl_sf_legendre_H3d_array :: CInt -> Double -> Double -> Ptr Double -> CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Log.hs b/packages/special/lib/Numeric/GSL/Special/Log.hs
index 3becf15..bbc88fe 100644
--- a/packages/special/lib/Numeric/GSL/Special/Log.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Log.hs
@@ -30,36 +30,36 @@ import Numeric.GSL.Special.Internal
30 30
31log_e :: Double -> (Double,Double) 31log_e :: Double -> (Double,Double)
32log_e x = createSFR "log_e" $ gsl_sf_log_e x 32log_e x = createSFR "log_e" $ gsl_sf_log_e x
33foreign import ccall SAFE_CHEAP "gsl_sf_log_e" gsl_sf_log_e :: Double -> Ptr () -> IO CInt 33foreign import ccall unsafe "gsl_sf_log_e" gsl_sf_log_e :: Double -> Ptr () -> IO CInt
34 34
35log :: Double -> Double 35log :: Double -> Double
36log = gsl_sf_log 36log = gsl_sf_log
37foreign import ccall SAFE_CHEAP "gsl_sf_log" gsl_sf_log :: Double -> Double 37foreign import ccall unsafe "gsl_sf_log" gsl_sf_log :: Double -> Double
38 38
39log_abs_e :: Double -> (Double,Double) 39log_abs_e :: Double -> (Double,Double)
40log_abs_e x = createSFR "log_abs_e" $ gsl_sf_log_abs_e x 40log_abs_e x = createSFR "log_abs_e" $ gsl_sf_log_abs_e x
41foreign import ccall SAFE_CHEAP "gsl_sf_log_abs_e" gsl_sf_log_abs_e :: Double -> Ptr () -> IO CInt 41foreign import ccall unsafe "gsl_sf_log_abs_e" gsl_sf_log_abs_e :: Double -> Ptr () -> IO CInt
42 42
43log_abs :: Double -> Double 43log_abs :: Double -> Double
44log_abs = gsl_sf_log_abs 44log_abs = gsl_sf_log_abs
45foreign import ccall SAFE_CHEAP "gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double 45foreign import ccall unsafe "gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double
46 46
47complex_log_e :: Double -> Double -> ((Double,Double),(Double,Double)) 47complex_log_e :: Double -> Double -> ((Double,Double),(Double,Double))
48complex_log_e zr zi = create2SFR "complex_log_e" $ gsl_sf_complex_log_e zr zi 48complex_log_e zr zi = create2SFR "complex_log_e" $ gsl_sf_complex_log_e zr zi
49foreign import ccall SAFE_CHEAP "gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 49foreign import ccall unsafe "gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
50 50
51log_1plusx_e :: Double -> (Double,Double) 51log_1plusx_e :: Double -> (Double,Double)
52log_1plusx_e x = createSFR "log_1plusx_e" $ gsl_sf_log_1plusx_e x 52log_1plusx_e x = createSFR "log_1plusx_e" $ gsl_sf_log_1plusx_e x
53foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx_e" gsl_sf_log_1plusx_e :: Double -> Ptr () -> IO CInt 53foreign import ccall unsafe "gsl_sf_log_1plusx_e" gsl_sf_log_1plusx_e :: Double -> Ptr () -> IO CInt
54 54
55log_1plusx :: Double -> Double 55log_1plusx :: Double -> Double
56log_1plusx = gsl_sf_log_1plusx 56log_1plusx = gsl_sf_log_1plusx
57foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx" gsl_sf_log_1plusx :: Double -> Double 57foreign import ccall unsafe "gsl_sf_log_1plusx" gsl_sf_log_1plusx :: Double -> Double
58 58
59log_1plusx_mx_e :: Double -> (Double,Double) 59log_1plusx_mx_e :: Double -> (Double,Double)
60log_1plusx_mx_e x = createSFR "log_1plusx_mx_e" $ gsl_sf_log_1plusx_mx_e x 60log_1plusx_mx_e x = createSFR "log_1plusx_mx_e" $ gsl_sf_log_1plusx_mx_e x
61foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx_mx_e" gsl_sf_log_1plusx_mx_e :: Double -> Ptr () -> IO CInt 61foreign import ccall unsafe "gsl_sf_log_1plusx_mx_e" gsl_sf_log_1plusx_mx_e :: Double -> Ptr () -> IO CInt
62 62
63log_1plusx_mx :: Double -> Double 63log_1plusx_mx :: Double -> Double
64log_1plusx_mx = gsl_sf_log_1plusx_mx 64log_1plusx_mx = gsl_sf_log_1plusx_mx
65foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx_mx" gsl_sf_log_1plusx_mx :: Double -> Double 65foreign import ccall unsafe "gsl_sf_log_1plusx_mx" gsl_sf_log_1plusx_mx :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Pow_int.hs b/packages/special/lib/Numeric/GSL/Special/Pow_int.hs
index 08fd497..b9dcdc3 100644
--- a/packages/special/lib/Numeric/GSL/Special/Pow_int.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Pow_int.hs
@@ -23,8 +23,8 @@ import Numeric.GSL.Special.Internal
23 23
24pow_int_e :: Double -> CInt -> (Double,Double) 24pow_int_e :: Double -> CInt -> (Double,Double)
25pow_int_e x n = createSFR "pow_int_e" $ gsl_sf_pow_int_e x n 25pow_int_e x n = createSFR "pow_int_e" $ gsl_sf_pow_int_e x n
26foreign import ccall SAFE_CHEAP "gsl_sf_pow_int_e" gsl_sf_pow_int_e :: Double -> CInt -> Ptr () -> IO CInt 26foreign import ccall unsafe "gsl_sf_pow_int_e" gsl_sf_pow_int_e :: Double -> CInt -> Ptr () -> IO CInt
27 27
28pow_int :: Double -> CInt -> Double 28pow_int :: Double -> CInt -> Double
29pow_int = gsl_sf_pow_int 29pow_int = gsl_sf_pow_int
30foreign import ccall SAFE_CHEAP "gsl_sf_pow_int" gsl_sf_pow_int :: Double -> CInt -> Double 30foreign import ccall unsafe "gsl_sf_pow_int" gsl_sf_pow_int :: Double -> CInt -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Psi.hs b/packages/special/lib/Numeric/GSL/Special/Psi.hs
index da53d1b..2aede62 100644
--- a/packages/special/lib/Numeric/GSL/Special/Psi.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Psi.hs
@@ -34,52 +34,52 @@ import Numeric.GSL.Special.Internal
34 34
35psi_int_e :: CInt -> (Double,Double) 35psi_int_e :: CInt -> (Double,Double)
36psi_int_e n = createSFR "psi_int_e" $ gsl_sf_psi_int_e n 36psi_int_e n = createSFR "psi_int_e" $ gsl_sf_psi_int_e n
37foreign import ccall SAFE_CHEAP "gsl_sf_psi_int_e" gsl_sf_psi_int_e :: CInt -> Ptr () -> IO CInt 37foreign import ccall unsafe "gsl_sf_psi_int_e" gsl_sf_psi_int_e :: CInt -> Ptr () -> IO CInt
38 38
39psi_int :: CInt -> Double 39psi_int :: CInt -> Double
40psi_int = gsl_sf_psi_int 40psi_int = gsl_sf_psi_int
41foreign import ccall SAFE_CHEAP "gsl_sf_psi_int" gsl_sf_psi_int :: CInt -> Double 41foreign import ccall unsafe "gsl_sf_psi_int" gsl_sf_psi_int :: CInt -> Double
42 42
43psi_e :: Double -> (Double,Double) 43psi_e :: Double -> (Double,Double)
44psi_e x = createSFR "psi_e" $ gsl_sf_psi_e x 44psi_e x = createSFR "psi_e" $ gsl_sf_psi_e x
45foreign import ccall SAFE_CHEAP "gsl_sf_psi_e" gsl_sf_psi_e :: Double -> Ptr () -> IO CInt 45foreign import ccall unsafe "gsl_sf_psi_e" gsl_sf_psi_e :: Double -> Ptr () -> IO CInt
46 46
47psi :: Double -> Double 47psi :: Double -> Double
48psi = gsl_sf_psi 48psi = gsl_sf_psi
49foreign import ccall SAFE_CHEAP "gsl_sf_psi" gsl_sf_psi :: Double -> Double 49foreign import ccall unsafe "gsl_sf_psi" gsl_sf_psi :: Double -> Double
50 50
51psi_1piy_e :: Double -> (Double,Double) 51psi_1piy_e :: Double -> (Double,Double)
52psi_1piy_e y = createSFR "psi_1piy_e" $ gsl_sf_psi_1piy_e y 52psi_1piy_e y = createSFR "psi_1piy_e" $ gsl_sf_psi_1piy_e y
53foreign import ccall SAFE_CHEAP "gsl_sf_psi_1piy_e" gsl_sf_psi_1piy_e :: Double -> Ptr () -> IO CInt 53foreign import ccall unsafe "gsl_sf_psi_1piy_e" gsl_sf_psi_1piy_e :: Double -> Ptr () -> IO CInt
54 54
55psi_1piy :: Double -> Double 55psi_1piy :: Double -> Double
56psi_1piy = gsl_sf_psi_1piy 56psi_1piy = gsl_sf_psi_1piy
57foreign import ccall SAFE_CHEAP "gsl_sf_psi_1piy" gsl_sf_psi_1piy :: Double -> Double 57foreign import ccall unsafe "gsl_sf_psi_1piy" gsl_sf_psi_1piy :: Double -> Double
58 58
59complex_psi_e :: Double -> Double -> ((Double,Double),(Double,Double)) 59complex_psi_e :: Double -> Double -> ((Double,Double),(Double,Double))
60complex_psi_e x y = create2SFR "complex_psi_e" $ gsl_sf_complex_psi_e x y 60complex_psi_e x y = create2SFR "complex_psi_e" $ gsl_sf_complex_psi_e x y
61foreign import ccall SAFE_CHEAP "gsl_sf_complex_psi_e" gsl_sf_complex_psi_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 61foreign import ccall unsafe "gsl_sf_complex_psi_e" gsl_sf_complex_psi_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
62 62
63psi_1_int_e :: CInt -> (Double,Double) 63psi_1_int_e :: CInt -> (Double,Double)
64psi_1_int_e n = createSFR "psi_1_int_e" $ gsl_sf_psi_1_int_e n 64psi_1_int_e n = createSFR "psi_1_int_e" $ gsl_sf_psi_1_int_e n
65foreign import ccall SAFE_CHEAP "gsl_sf_psi_1_int_e" gsl_sf_psi_1_int_e :: CInt -> Ptr () -> IO CInt 65foreign import ccall unsafe "gsl_sf_psi_1_int_e" gsl_sf_psi_1_int_e :: CInt -> Ptr () -> IO CInt
66 66
67psi_1_int :: CInt -> Double 67psi_1_int :: CInt -> Double
68psi_1_int = gsl_sf_psi_1_int 68psi_1_int = gsl_sf_psi_1_int
69foreign import ccall SAFE_CHEAP "gsl_sf_psi_1_int" gsl_sf_psi_1_int :: CInt -> Double 69foreign import ccall unsafe "gsl_sf_psi_1_int" gsl_sf_psi_1_int :: CInt -> Double
70 70
71psi_1_e :: Double -> (Double,Double) 71psi_1_e :: Double -> (Double,Double)
72psi_1_e x = createSFR "psi_1_e" $ gsl_sf_psi_1_e x 72psi_1_e x = createSFR "psi_1_e" $ gsl_sf_psi_1_e x
73foreign import ccall SAFE_CHEAP "gsl_sf_psi_1_e" gsl_sf_psi_1_e :: Double -> Ptr () -> IO CInt 73foreign import ccall unsafe "gsl_sf_psi_1_e" gsl_sf_psi_1_e :: Double -> Ptr () -> IO CInt
74 74
75psi_1 :: Double -> Double 75psi_1 :: Double -> Double
76psi_1 = gsl_sf_psi_1 76psi_1 = gsl_sf_psi_1
77foreign import ccall SAFE_CHEAP "gsl_sf_psi_1" gsl_sf_psi_1 :: Double -> Double 77foreign import ccall unsafe "gsl_sf_psi_1" gsl_sf_psi_1 :: Double -> Double
78 78
79psi_n_e :: CInt -> Double -> (Double,Double) 79psi_n_e :: CInt -> Double -> (Double,Double)
80psi_n_e n x = createSFR "psi_n_e" $ gsl_sf_psi_n_e n x 80psi_n_e n x = createSFR "psi_n_e" $ gsl_sf_psi_n_e n x
81foreign import ccall SAFE_CHEAP "gsl_sf_psi_n_e" gsl_sf_psi_n_e :: CInt -> Double -> Ptr () -> IO CInt 81foreign import ccall unsafe "gsl_sf_psi_n_e" gsl_sf_psi_n_e :: CInt -> Double -> Ptr () -> IO CInt
82 82
83psi_n :: CInt -> Double -> Double 83psi_n :: CInt -> Double -> Double
84psi_n = gsl_sf_psi_n 84psi_n = gsl_sf_psi_n
85foreign import ccall SAFE_CHEAP "gsl_sf_psi_n" gsl_sf_psi_n :: CInt -> Double -> Double 85foreign import ccall unsafe "gsl_sf_psi_n" gsl_sf_psi_n :: CInt -> Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Synchrotron.hs b/packages/special/lib/Numeric/GSL/Special/Synchrotron.hs
index b3292a6..06d5967 100644
--- a/packages/special/lib/Numeric/GSL/Special/Synchrotron.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Synchrotron.hs
@@ -25,16 +25,16 @@ import Numeric.GSL.Special.Internal
25 25
26synchrotron_1_e :: Double -> (Double,Double) 26synchrotron_1_e :: Double -> (Double,Double)
27synchrotron_1_e x = createSFR "synchrotron_1_e" $ gsl_sf_synchrotron_1_e x 27synchrotron_1_e x = createSFR "synchrotron_1_e" $ gsl_sf_synchrotron_1_e x
28foreign import ccall SAFE_CHEAP "gsl_sf_synchrotron_1_e" gsl_sf_synchrotron_1_e :: Double -> Ptr () -> IO CInt 28foreign import ccall unsafe "gsl_sf_synchrotron_1_e" gsl_sf_synchrotron_1_e :: Double -> Ptr () -> IO CInt
29 29
30synchrotron_1 :: Double -> Double 30synchrotron_1 :: Double -> Double
31synchrotron_1 = gsl_sf_synchrotron_1 31synchrotron_1 = gsl_sf_synchrotron_1
32foreign import ccall SAFE_CHEAP "gsl_sf_synchrotron_1" gsl_sf_synchrotron_1 :: Double -> Double 32foreign import ccall unsafe "gsl_sf_synchrotron_1" gsl_sf_synchrotron_1 :: Double -> Double
33 33
34synchrotron_2_e :: Double -> (Double,Double) 34synchrotron_2_e :: Double -> (Double,Double)
35synchrotron_2_e x = createSFR "synchrotron_2_e" $ gsl_sf_synchrotron_2_e x 35synchrotron_2_e x = createSFR "synchrotron_2_e" $ gsl_sf_synchrotron_2_e x
36foreign import ccall SAFE_CHEAP "gsl_sf_synchrotron_2_e" gsl_sf_synchrotron_2_e :: Double -> Ptr () -> IO CInt 36foreign import ccall unsafe "gsl_sf_synchrotron_2_e" gsl_sf_synchrotron_2_e :: Double -> Ptr () -> IO CInt
37 37
38synchrotron_2 :: Double -> Double 38synchrotron_2 :: Double -> Double
39synchrotron_2 = gsl_sf_synchrotron_2 39synchrotron_2 = gsl_sf_synchrotron_2
40foreign import ccall SAFE_CHEAP "gsl_sf_synchrotron_2" gsl_sf_synchrotron_2 :: Double -> Double 40foreign import ccall unsafe "gsl_sf_synchrotron_2" gsl_sf_synchrotron_2 :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Transport.hs b/packages/special/lib/Numeric/GSL/Special/Transport.hs
index b92b578..f2d83a2 100644
--- a/packages/special/lib/Numeric/GSL/Special/Transport.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Transport.hs
@@ -29,32 +29,32 @@ import Numeric.GSL.Special.Internal
29 29
30transport_2_e :: Double -> (Double,Double) 30transport_2_e :: Double -> (Double,Double)
31transport_2_e x = createSFR "transport_2_e" $ gsl_sf_transport_2_e x 31transport_2_e x = createSFR "transport_2_e" $ gsl_sf_transport_2_e x
32foreign import ccall SAFE_CHEAP "gsl_sf_transport_2_e" gsl_sf_transport_2_e :: Double -> Ptr () -> IO CInt 32foreign import ccall unsafe "gsl_sf_transport_2_e" gsl_sf_transport_2_e :: Double -> Ptr () -> IO CInt
33 33
34transport_2 :: Double -> Double 34transport_2 :: Double -> Double
35transport_2 = gsl_sf_transport_2 35transport_2 = gsl_sf_transport_2
36foreign import ccall SAFE_CHEAP "gsl_sf_transport_2" gsl_sf_transport_2 :: Double -> Double 36foreign import ccall unsafe "gsl_sf_transport_2" gsl_sf_transport_2 :: Double -> Double
37 37
38transport_3_e :: Double -> (Double,Double) 38transport_3_e :: Double -> (Double,Double)
39transport_3_e x = createSFR "transport_3_e" $ gsl_sf_transport_3_e x 39transport_3_e x = createSFR "transport_3_e" $ gsl_sf_transport_3_e x
40foreign import ccall SAFE_CHEAP "gsl_sf_transport_3_e" gsl_sf_transport_3_e :: Double -> Ptr () -> IO CInt 40foreign import ccall unsafe "gsl_sf_transport_3_e" gsl_sf_transport_3_e :: Double -> Ptr () -> IO CInt
41 41
42transport_3 :: Double -> Double 42transport_3 :: Double -> Double
43transport_3 = gsl_sf_transport_3 43transport_3 = gsl_sf_transport_3
44foreign import ccall SAFE_CHEAP "gsl_sf_transport_3" gsl_sf_transport_3 :: Double -> Double 44foreign import ccall unsafe "gsl_sf_transport_3" gsl_sf_transport_3 :: Double -> Double
45 45
46transport_4_e :: Double -> (Double,Double) 46transport_4_e :: Double -> (Double,Double)
47transport_4_e x = createSFR "transport_4_e" $ gsl_sf_transport_4_e x 47transport_4_e x = createSFR "transport_4_e" $ gsl_sf_transport_4_e x
48foreign import ccall SAFE_CHEAP "gsl_sf_transport_4_e" gsl_sf_transport_4_e :: Double -> Ptr () -> IO CInt 48foreign import ccall unsafe "gsl_sf_transport_4_e" gsl_sf_transport_4_e :: Double -> Ptr () -> IO CInt
49 49
50transport_4 :: Double -> Double 50transport_4 :: Double -> Double
51transport_4 = gsl_sf_transport_4 51transport_4 = gsl_sf_transport_4
52foreign import ccall SAFE_CHEAP "gsl_sf_transport_4" gsl_sf_transport_4 :: Double -> Double 52foreign import ccall unsafe "gsl_sf_transport_4" gsl_sf_transport_4 :: Double -> Double
53 53
54transport_5_e :: Double -> (Double,Double) 54transport_5_e :: Double -> (Double,Double)
55transport_5_e x = createSFR "transport_5_e" $ gsl_sf_transport_5_e x 55transport_5_e x = createSFR "transport_5_e" $ gsl_sf_transport_5_e x
56foreign import ccall SAFE_CHEAP "gsl_sf_transport_5_e" gsl_sf_transport_5_e :: Double -> Ptr () -> IO CInt 56foreign import ccall unsafe "gsl_sf_transport_5_e" gsl_sf_transport_5_e :: Double -> Ptr () -> IO CInt
57 57
58transport_5 :: Double -> Double 58transport_5 :: Double -> Double
59transport_5 = gsl_sf_transport_5 59transport_5 = gsl_sf_transport_5
60foreign import ccall SAFE_CHEAP "gsl_sf_transport_5" gsl_sf_transport_5 :: Double -> Double 60foreign import ccall unsafe "gsl_sf_transport_5" gsl_sf_transport_5 :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/Trig.hs b/packages/special/lib/Numeric/GSL/Special/Trig.hs
index 43fdc95..6180144 100644
--- a/packages/special/lib/Numeric/GSL/Special/Trig.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Trig.hs
@@ -44,100 +44,100 @@ import Numeric.GSL.Special.Internal
44 44
45sin_e :: Double -> (Double,Double) 45sin_e :: Double -> (Double,Double)
46sin_e x = createSFR "sin_e" $ gsl_sf_sin_e x 46sin_e x = createSFR "sin_e" $ gsl_sf_sin_e x
47foreign import ccall SAFE_CHEAP "gsl_sf_sin_e" gsl_sf_sin_e :: Double -> Ptr () -> IO CInt 47foreign import ccall unsafe "gsl_sf_sin_e" gsl_sf_sin_e :: Double -> Ptr () -> IO CInt
48 48
49sin :: Double -> Double 49sin :: Double -> Double
50sin = gsl_sf_sin 50sin = gsl_sf_sin
51foreign import ccall SAFE_CHEAP "gsl_sf_sin" gsl_sf_sin :: Double -> Double 51foreign import ccall unsafe "gsl_sf_sin" gsl_sf_sin :: Double -> Double
52 52
53cos_e :: Double -> (Double,Double) 53cos_e :: Double -> (Double,Double)
54cos_e x = createSFR "cos_e" $ gsl_sf_cos_e x 54cos_e x = createSFR "cos_e" $ gsl_sf_cos_e x
55foreign import ccall SAFE_CHEAP "gsl_sf_cos_e" gsl_sf_cos_e :: Double -> Ptr () -> IO CInt 55foreign import ccall unsafe "gsl_sf_cos_e" gsl_sf_cos_e :: Double -> Ptr () -> IO CInt
56 56
57cos :: Double -> Double 57cos :: Double -> Double
58cos = gsl_sf_cos 58cos = gsl_sf_cos
59foreign import ccall SAFE_CHEAP "gsl_sf_cos" gsl_sf_cos :: Double -> Double 59foreign import ccall unsafe "gsl_sf_cos" gsl_sf_cos :: Double -> Double
60 60
61hypot_e :: Double -> Double -> (Double,Double) 61hypot_e :: Double -> Double -> (Double,Double)
62hypot_e x y = createSFR "hypot_e" $ gsl_sf_hypot_e x y 62hypot_e x y = createSFR "hypot_e" $ gsl_sf_hypot_e x y
63foreign import ccall SAFE_CHEAP "gsl_sf_hypot_e" gsl_sf_hypot_e :: Double -> Double -> Ptr () -> IO CInt 63foreign import ccall unsafe "gsl_sf_hypot_e" gsl_sf_hypot_e :: Double -> Double -> Ptr () -> IO CInt
64 64
65hypot :: Double -> Double -> Double 65hypot :: Double -> Double -> Double
66hypot = gsl_sf_hypot 66hypot = gsl_sf_hypot
67foreign import ccall SAFE_CHEAP "gsl_sf_hypot" gsl_sf_hypot :: Double -> Double -> Double 67foreign import ccall unsafe "gsl_sf_hypot" gsl_sf_hypot :: Double -> Double -> Double
68 68
69complex_sin_e :: Double -> Double -> ((Double,Double),(Double,Double)) 69complex_sin_e :: Double -> Double -> ((Double,Double),(Double,Double))
70complex_sin_e zr zi = create2SFR "complex_sin_e" $ gsl_sf_complex_sin_e zr zi 70complex_sin_e zr zi = create2SFR "complex_sin_e" $ gsl_sf_complex_sin_e zr zi
71foreign import ccall SAFE_CHEAP "gsl_sf_complex_sin_e" gsl_sf_complex_sin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 71foreign import ccall unsafe "gsl_sf_complex_sin_e" gsl_sf_complex_sin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
72 72
73complex_cos_e :: Double -> Double -> ((Double,Double),(Double,Double)) 73complex_cos_e :: Double -> Double -> ((Double,Double),(Double,Double))
74complex_cos_e zr zi = create2SFR "complex_cos_e" $ gsl_sf_complex_cos_e zr zi 74complex_cos_e zr zi = create2SFR "complex_cos_e" $ gsl_sf_complex_cos_e zr zi
75foreign import ccall SAFE_CHEAP "gsl_sf_complex_cos_e" gsl_sf_complex_cos_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 75foreign import ccall unsafe "gsl_sf_complex_cos_e" gsl_sf_complex_cos_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
76 76
77complex_logsin_e :: Double -> Double -> ((Double,Double),(Double,Double)) 77complex_logsin_e :: Double -> Double -> ((Double,Double),(Double,Double))
78complex_logsin_e zr zi = create2SFR "complex_logsin_e" $ gsl_sf_complex_logsin_e zr zi 78complex_logsin_e zr zi = create2SFR "complex_logsin_e" $ gsl_sf_complex_logsin_e zr zi
79foreign import ccall SAFE_CHEAP "gsl_sf_complex_logsin_e" gsl_sf_complex_logsin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 79foreign import ccall unsafe "gsl_sf_complex_logsin_e" gsl_sf_complex_logsin_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
80 80
81sinc_e :: Double -> (Double,Double) 81sinc_e :: Double -> (Double,Double)
82sinc_e x = createSFR "sinc_e" $ gsl_sf_sinc_e x 82sinc_e x = createSFR "sinc_e" $ gsl_sf_sinc_e x
83foreign import ccall SAFE_CHEAP "gsl_sf_sinc_e" gsl_sf_sinc_e :: Double -> Ptr () -> IO CInt 83foreign import ccall unsafe "gsl_sf_sinc_e" gsl_sf_sinc_e :: Double -> Ptr () -> IO CInt
84 84
85sinc :: Double -> Double 85sinc :: Double -> Double
86sinc = gsl_sf_sinc 86sinc = gsl_sf_sinc
87foreign import ccall SAFE_CHEAP "gsl_sf_sinc" gsl_sf_sinc :: Double -> Double 87foreign import ccall unsafe "gsl_sf_sinc" gsl_sf_sinc :: Double -> Double
88 88
89lnsinh_e :: Double -> (Double,Double) 89lnsinh_e :: Double -> (Double,Double)
90lnsinh_e x = createSFR "lnsinh_e" $ gsl_sf_lnsinh_e x 90lnsinh_e x = createSFR "lnsinh_e" $ gsl_sf_lnsinh_e x
91foreign import ccall SAFE_CHEAP "gsl_sf_lnsinh_e" gsl_sf_lnsinh_e :: Double -> Ptr () -> IO CInt 91foreign import ccall unsafe "gsl_sf_lnsinh_e" gsl_sf_lnsinh_e :: Double -> Ptr () -> IO CInt
92 92
93lnsinh :: Double -> Double 93lnsinh :: Double -> Double
94lnsinh = gsl_sf_lnsinh 94lnsinh = gsl_sf_lnsinh
95foreign import ccall SAFE_CHEAP "gsl_sf_lnsinh" gsl_sf_lnsinh :: Double -> Double 95foreign import ccall unsafe "gsl_sf_lnsinh" gsl_sf_lnsinh :: Double -> Double
96 96
97lncosh_e :: Double -> (Double,Double) 97lncosh_e :: Double -> (Double,Double)
98lncosh_e x = createSFR "lncosh_e" $ gsl_sf_lncosh_e x 98lncosh_e x = createSFR "lncosh_e" $ gsl_sf_lncosh_e x
99foreign import ccall SAFE_CHEAP "gsl_sf_lncosh_e" gsl_sf_lncosh_e :: Double -> Ptr () -> IO CInt 99foreign import ccall unsafe "gsl_sf_lncosh_e" gsl_sf_lncosh_e :: Double -> Ptr () -> IO CInt
100 100
101lncosh :: Double -> Double 101lncosh :: Double -> Double
102lncosh = gsl_sf_lncosh 102lncosh = gsl_sf_lncosh
103foreign import ccall SAFE_CHEAP "gsl_sf_lncosh" gsl_sf_lncosh :: Double -> Double 103foreign import ccall unsafe "gsl_sf_lncosh" gsl_sf_lncosh :: Double -> Double
104 104
105polar_to_rect :: Double -> Double -> ((Double,Double),(Double,Double)) 105polar_to_rect :: Double -> Double -> ((Double,Double),(Double,Double))
106polar_to_rect r theta = create2SFR "polar_to_rect" $ gsl_sf_polar_to_rect r theta 106polar_to_rect r theta = create2SFR "polar_to_rect" $ gsl_sf_polar_to_rect r theta
107foreign import ccall SAFE_CHEAP "gsl_sf_polar_to_rect" gsl_sf_polar_to_rect :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 107foreign import ccall unsafe "gsl_sf_polar_to_rect" gsl_sf_polar_to_rect :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
108 108
109rect_to_polar :: Double -> Double -> ((Double,Double),(Double,Double)) 109rect_to_polar :: Double -> Double -> ((Double,Double),(Double,Double))
110rect_to_polar x y = create2SFR "rect_to_polar" $ gsl_sf_rect_to_polar x y 110rect_to_polar x y = create2SFR "rect_to_polar" $ gsl_sf_rect_to_polar x y
111foreign import ccall SAFE_CHEAP "gsl_sf_rect_to_polar" gsl_sf_rect_to_polar :: Double -> Double -> Ptr () -> Ptr () -> IO CInt 111foreign import ccall unsafe "gsl_sf_rect_to_polar" gsl_sf_rect_to_polar :: Double -> Double -> Ptr () -> Ptr () -> IO CInt
112 112
113sin_err_e :: Double -> Double -> (Double,Double) 113sin_err_e :: Double -> Double -> (Double,Double)
114sin_err_e x dx = createSFR "sin_err_e" $ gsl_sf_sin_err_e x dx 114sin_err_e x dx = createSFR "sin_err_e" $ gsl_sf_sin_err_e x dx
115foreign import ccall SAFE_CHEAP "gsl_sf_sin_err_e" gsl_sf_sin_err_e :: Double -> Double -> Ptr () -> IO CInt 115foreign import ccall unsafe "gsl_sf_sin_err_e" gsl_sf_sin_err_e :: Double -> Double -> Ptr () -> IO CInt
116 116
117cos_err_e :: Double -> Double -> (Double,Double) 117cos_err_e :: Double -> Double -> (Double,Double)
118cos_err_e x dx = createSFR "cos_err_e" $ gsl_sf_cos_err_e x dx 118cos_err_e x dx = createSFR "cos_err_e" $ gsl_sf_cos_err_e x dx
119foreign import ccall SAFE_CHEAP "gsl_sf_cos_err_e" gsl_sf_cos_err_e :: Double -> Double -> Ptr () -> IO CInt 119foreign import ccall unsafe "gsl_sf_cos_err_e" gsl_sf_cos_err_e :: Double -> Double -> Ptr () -> IO CInt
120 120
121angle_restrict_symm_e :: Ptr Double -> CInt 121angle_restrict_symm_e :: Ptr Double -> CInt
122angle_restrict_symm_e = gsl_sf_angle_restrict_symm_e 122angle_restrict_symm_e = gsl_sf_angle_restrict_symm_e
123foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_symm_e" gsl_sf_angle_restrict_symm_e :: Ptr Double -> CInt 123foreign import ccall unsafe "gsl_sf_angle_restrict_symm_e" gsl_sf_angle_restrict_symm_e :: Ptr Double -> CInt
124 124
125angle_restrict_symm :: Double -> Double 125angle_restrict_symm :: Double -> Double
126angle_restrict_symm = gsl_sf_angle_restrict_symm 126angle_restrict_symm = gsl_sf_angle_restrict_symm
127foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_symm" gsl_sf_angle_restrict_symm :: Double -> Double 127foreign import ccall unsafe "gsl_sf_angle_restrict_symm" gsl_sf_angle_restrict_symm :: Double -> Double
128 128
129angle_restrict_pos_e :: Ptr Double -> CInt 129angle_restrict_pos_e :: Ptr Double -> CInt
130angle_restrict_pos_e = gsl_sf_angle_restrict_pos_e 130angle_restrict_pos_e = gsl_sf_angle_restrict_pos_e
131foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_pos_e" gsl_sf_angle_restrict_pos_e :: Ptr Double -> CInt 131foreign import ccall unsafe "gsl_sf_angle_restrict_pos_e" gsl_sf_angle_restrict_pos_e :: Ptr Double -> CInt
132 132
133angle_restrict_pos :: Double -> Double 133angle_restrict_pos :: Double -> Double
134angle_restrict_pos = gsl_sf_angle_restrict_pos 134angle_restrict_pos = gsl_sf_angle_restrict_pos
135foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_pos" gsl_sf_angle_restrict_pos :: Double -> Double 135foreign import ccall unsafe "gsl_sf_angle_restrict_pos" gsl_sf_angle_restrict_pos :: Double -> Double
136 136
137angle_restrict_symm_err_e :: Double -> (Double,Double) 137angle_restrict_symm_err_e :: Double -> (Double,Double)
138angle_restrict_symm_err_e theta = createSFR "angle_restrict_symm_err_e" $ gsl_sf_angle_restrict_symm_err_e theta 138angle_restrict_symm_err_e theta = createSFR "angle_restrict_symm_err_e" $ gsl_sf_angle_restrict_symm_err_e theta
139foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_symm_err_e" gsl_sf_angle_restrict_symm_err_e :: Double -> Ptr () -> IO CInt 139foreign import ccall unsafe "gsl_sf_angle_restrict_symm_err_e" gsl_sf_angle_restrict_symm_err_e :: Double -> Ptr () -> IO CInt
140 140
141angle_restrict_pos_err_e :: Double -> (Double,Double) 141angle_restrict_pos_err_e :: Double -> (Double,Double)
142angle_restrict_pos_err_e theta = createSFR "angle_restrict_pos_err_e" $ gsl_sf_angle_restrict_pos_err_e theta 142angle_restrict_pos_err_e theta = createSFR "angle_restrict_pos_err_e" $ gsl_sf_angle_restrict_pos_err_e theta
143foreign import ccall SAFE_CHEAP "gsl_sf_angle_restrict_pos_err_e" gsl_sf_angle_restrict_pos_err_e :: Double -> Ptr () -> IO CInt 143foreign import ccall unsafe "gsl_sf_angle_restrict_pos_err_e" gsl_sf_angle_restrict_pos_err_e :: Double -> Ptr () -> IO CInt
diff --git a/packages/special/lib/Numeric/GSL/Special/Zeta.hs b/packages/special/lib/Numeric/GSL/Special/Zeta.hs
index a57a918..5b59630 100644
--- a/packages/special/lib/Numeric/GSL/Special/Zeta.hs
+++ b/packages/special/lib/Numeric/GSL/Special/Zeta.hs
@@ -35,56 +35,56 @@ import Numeric.GSL.Special.Internal
35 35
36zeta_int_e :: CInt -> (Double,Double) 36zeta_int_e :: CInt -> (Double,Double)
37zeta_int_e n = createSFR "zeta_int_e" $ gsl_sf_zeta_int_e n 37zeta_int_e n = createSFR "zeta_int_e" $ gsl_sf_zeta_int_e n
38foreign import ccall SAFE_CHEAP "gsl_sf_zeta_int_e" gsl_sf_zeta_int_e :: CInt -> Ptr () -> IO CInt 38foreign import ccall unsafe "gsl_sf_zeta_int_e" gsl_sf_zeta_int_e :: CInt -> Ptr () -> IO CInt
39 39
40zeta_int :: CInt -> Double 40zeta_int :: CInt -> Double
41zeta_int = gsl_sf_zeta_int 41zeta_int = gsl_sf_zeta_int
42foreign import ccall SAFE_CHEAP "gsl_sf_zeta_int" gsl_sf_zeta_int :: CInt -> Double 42foreign import ccall unsafe "gsl_sf_zeta_int" gsl_sf_zeta_int :: CInt -> Double
43 43
44zeta_e :: Double -> (Double,Double) 44zeta_e :: Double -> (Double,Double)
45zeta_e s = createSFR "zeta_e" $ gsl_sf_zeta_e s 45zeta_e s = createSFR "zeta_e" $ gsl_sf_zeta_e s
46foreign import ccall SAFE_CHEAP "gsl_sf_zeta_e" gsl_sf_zeta_e :: Double -> Ptr () -> IO CInt 46foreign import ccall unsafe "gsl_sf_zeta_e" gsl_sf_zeta_e :: Double -> Ptr () -> IO CInt
47 47
48zeta :: Double -> Double 48zeta :: Double -> Double
49zeta = gsl_sf_zeta 49zeta = gsl_sf_zeta
50foreign import ccall SAFE_CHEAP "gsl_sf_zeta" gsl_sf_zeta :: Double -> Double 50foreign import ccall unsafe "gsl_sf_zeta" gsl_sf_zeta :: Double -> Double
51 51
52zetam1_e :: Double -> (Double,Double) 52zetam1_e :: Double -> (Double,Double)
53zetam1_e s = createSFR "zetam1_e" $ gsl_sf_zetam1_e s 53zetam1_e s = createSFR "zetam1_e" $ gsl_sf_zetam1_e s
54foreign import ccall SAFE_CHEAP "gsl_sf_zetam1_e" gsl_sf_zetam1_e :: Double -> Ptr () -> IO CInt 54foreign import ccall unsafe "gsl_sf_zetam1_e" gsl_sf_zetam1_e :: Double -> Ptr () -> IO CInt
55 55
56zetam1 :: Double -> Double 56zetam1 :: Double -> Double
57zetam1 = gsl_sf_zetam1 57zetam1 = gsl_sf_zetam1
58foreign import ccall SAFE_CHEAP "gsl_sf_zetam1" gsl_sf_zetam1 :: Double -> Double 58foreign import ccall unsafe "gsl_sf_zetam1" gsl_sf_zetam1 :: Double -> Double
59 59
60zetam1_int_e :: CInt -> (Double,Double) 60zetam1_int_e :: CInt -> (Double,Double)
61zetam1_int_e s = createSFR "zetam1_int_e" $ gsl_sf_zetam1_int_e s 61zetam1_int_e s = createSFR "zetam1_int_e" $ gsl_sf_zetam1_int_e s
62foreign import ccall SAFE_CHEAP "gsl_sf_zetam1_int_e" gsl_sf_zetam1_int_e :: CInt -> Ptr () -> IO CInt 62foreign import ccall unsafe "gsl_sf_zetam1_int_e" gsl_sf_zetam1_int_e :: CInt -> Ptr () -> IO CInt
63 63
64zetam1_int :: CInt -> Double 64zetam1_int :: CInt -> Double
65zetam1_int = gsl_sf_zetam1_int 65zetam1_int = gsl_sf_zetam1_int
66foreign import ccall SAFE_CHEAP "gsl_sf_zetam1_int" gsl_sf_zetam1_int :: CInt -> Double 66foreign import ccall unsafe "gsl_sf_zetam1_int" gsl_sf_zetam1_int :: CInt -> Double
67 67
68hzeta_e :: Double -> Double -> (Double,Double) 68hzeta_e :: Double -> Double -> (Double,Double)
69hzeta_e s q = createSFR "hzeta_e" $ gsl_sf_hzeta_e s q 69hzeta_e s q = createSFR "hzeta_e" $ gsl_sf_hzeta_e s q
70foreign import ccall SAFE_CHEAP "gsl_sf_hzeta_e" gsl_sf_hzeta_e :: Double -> Double -> Ptr () -> IO CInt 70foreign import ccall unsafe "gsl_sf_hzeta_e" gsl_sf_hzeta_e :: Double -> Double -> Ptr () -> IO CInt
71 71
72hzeta :: Double -> Double -> Double 72hzeta :: Double -> Double -> Double
73hzeta = gsl_sf_hzeta 73hzeta = gsl_sf_hzeta
74foreign import ccall SAFE_CHEAP "gsl_sf_hzeta" gsl_sf_hzeta :: Double -> Double -> Double 74foreign import ccall unsafe "gsl_sf_hzeta" gsl_sf_hzeta :: Double -> Double -> Double
75 75
76eta_int_e :: CInt -> (Double,Double) 76eta_int_e :: CInt -> (Double,Double)
77eta_int_e n = createSFR "eta_int_e" $ gsl_sf_eta_int_e n 77eta_int_e n = createSFR "eta_int_e" $ gsl_sf_eta_int_e n
78foreign import ccall SAFE_CHEAP "gsl_sf_eta_int_e" gsl_sf_eta_int_e :: CInt -> Ptr () -> IO CInt 78foreign import ccall unsafe "gsl_sf_eta_int_e" gsl_sf_eta_int_e :: CInt -> Ptr () -> IO CInt
79 79
80eta_int :: CInt -> Double 80eta_int :: CInt -> Double
81eta_int = gsl_sf_eta_int 81eta_int = gsl_sf_eta_int
82foreign import ccall SAFE_CHEAP "gsl_sf_eta_int" gsl_sf_eta_int :: CInt -> Double 82foreign import ccall unsafe "gsl_sf_eta_int" gsl_sf_eta_int :: CInt -> Double
83 83
84eta_e :: Double -> (Double,Double) 84eta_e :: Double -> (Double,Double)
85eta_e s = createSFR "eta_e" $ gsl_sf_eta_e s 85eta_e s = createSFR "eta_e" $ gsl_sf_eta_e s
86foreign import ccall SAFE_CHEAP "gsl_sf_eta_e" gsl_sf_eta_e :: Double -> Ptr () -> IO CInt 86foreign import ccall unsafe "gsl_sf_eta_e" gsl_sf_eta_e :: Double -> Ptr () -> IO CInt
87 87
88eta :: Double -> Double 88eta :: Double -> Double
89eta = gsl_sf_eta 89eta = gsl_sf_eta
90foreign import ccall SAFE_CHEAP "gsl_sf_eta" gsl_sf_eta :: Double -> Double 90foreign import ccall unsafe "gsl_sf_eta" gsl_sf_eta :: Double -> Double
diff --git a/packages/special/lib/Numeric/GSL/Special/auto.hs b/packages/special/lib/Numeric/GSL/Special/auto.hs
index 36947ad..d628eff 100755
--- a/packages/special/lib/Numeric/GSL/Special/auto.hs
+++ b/packages/special/lib/Numeric/GSL/Special/auto.hs
@@ -186,7 +186,7 @@ showCt (Pointer s) = s ++ "*"
186 186
187showCa (t, a) = showCt t ++" "++ a 187showCa (t, a) = showCt t ++" "++ a
188 188
189showH hc h@(Header t n args) = "foreign import ccall SAFE_CHEAP \""++n++"\" "++n++" :: "++ (concat$intersperse" -> "$map showHa args) ++" -> " ++ t' 189showH hc h@(Header t n args) = "foreign import ccall unsafe \""++n++"\" "++n++" :: "++ (concat$intersperse" -> "$map showHa args) ++" -> " ++ t'
190 where t' | pure h = showHt t 190 where t' | pure h = showHt t
191 | otherwise = "IO "++showHt t 191 | otherwise = "IO "++showHt t
192 192