summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Gegenbauer.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Gegenbauer.hs')
-rw-r--r--lib/Numeric/GSL/Special/Gegenbauer.hs64
1 files changed, 0 insertions, 64 deletions
diff --git a/lib/Numeric/GSL/Special/Gegenbauer.hs b/lib/Numeric/GSL/Special/Gegenbauer.hs
deleted file mode 100644
index 31568f3..0000000
--- a/lib/Numeric/GSL/Special/Gegenbauer.hs
+++ /dev/null
@@ -1,64 +0,0 @@
1------------------------------------------------------------
2-- |
3-- Module : Numeric.GSL.Special.Gegenbauer
4-- Copyright : (c) Alberto Ruiz 2006
5-- License : GPL
6-- Maintainer : Alberto Ruiz (aruiz at um dot es)
7-- Stability : provisional
8-- Portability : uses ffi
9--
10-- Wrappers for selected functions described at:
11--
12-- <http://www.google.com/search?q=gsl_sf_gegenbauer.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13------------------------------------------------------------
14
15module Numeric.GSL.Special.Gegenbauer(
16 gegenpoly_1_e
17, gegenpoly_2_e
18, gegenpoly_3_e
19, gegenpoly_1
20, gegenpoly_2
21, gegenpoly_3
22, gegenpoly_n_e
23, gegenpoly_n
24) where
25
26import Foreign(Ptr)
27import Foreign.C.Types(CInt)
28import Numeric.GSL.Special.Internal
29
30gegenpoly_1_e :: Double -> Double -> (Double,Double)
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
33
34gegenpoly_2_e :: Double -> Double -> (Double,Double)
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
37
38gegenpoly_3_e :: Double -> Double -> (Double,Double)
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
41
42gegenpoly_1 :: Double -> Double -> Double
43gegenpoly_1 = gsl_sf_gegenpoly_1
44foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_1" gsl_sf_gegenpoly_1 :: Double -> Double -> Double
45
46gegenpoly_2 :: Double -> Double -> Double
47gegenpoly_2 = gsl_sf_gegenpoly_2
48foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_2" gsl_sf_gegenpoly_2 :: Double -> Double -> Double
49
50gegenpoly_3 :: Double -> Double -> Double
51gegenpoly_3 = gsl_sf_gegenpoly_3
52foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_3" gsl_sf_gegenpoly_3 :: Double -> Double -> Double
53
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
56foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_n_e" gsl_sf_gegenpoly_n_e :: CInt -> Double -> Double -> Ptr () -> IO CInt
57
58gegenpoly_n :: CInt -> Double -> Double -> Double
59gegenpoly_n = gsl_sf_gegenpoly_n
60foreign import ccall SAFE_CHEAP "gsl_sf_gegenpoly_n" gsl_sf_gegenpoly_n :: CInt -> Double -> Double -> Double
61
62gegenpoly_array :: CInt -> Double -> Double -> Ptr Double -> CInt
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