summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Exp.hs
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2009-06-19 07:37:05 +0000
committerAlberto Ruiz <aruiz@um.es>2009-06-19 07:37:05 +0000
commita9722cf16fe322985c998ab290cf03213b539e49 (patch)
treefc06b55ff719a7908eae23748bacfe140ce5374f /lib/Numeric/GSL/Special/Exp.hs
parentf589b9e673c3aef62834b3e2e88d96226bb7c24f (diff)
minor changes
Diffstat (limited to 'lib/Numeric/GSL/Special/Exp.hs')
-rw-r--r--lib/Numeric/GSL/Special/Exp.hs19
1 files changed, 19 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Exp.hs b/lib/Numeric/GSL/Special/Exp.hs
index fa3a15e..1380590 100644
--- a/lib/Numeric/GSL/Special/Exp.hs
+++ b/lib/Numeric/GSL/Special/Exp.hs
@@ -37,60 +37,79 @@ module Numeric.GSL.Special.Exp(
37import Foreign(Ptr) 37import Foreign(Ptr)
38import Foreign.C.Types(CInt) 38import Foreign.C.Types(CInt)
39import Numeric.GSL.Special.Internal 39import Numeric.GSL.Special.Internal
40
40exp_e :: Double -> (Double,Double) 41exp_e :: Double -> (Double,Double)
41exp_e x = createSFR "exp_e" $ gsl_sf_exp_e x 42exp_e x = createSFR "exp_e" $ gsl_sf_exp_e x
42foreign import ccall "gsl_sf_exp_e" gsl_sf_exp_e :: Double -> Ptr () -> IO CInt 43foreign import ccall "gsl_sf_exp_e" gsl_sf_exp_e :: Double -> Ptr () -> IO CInt
44
43exp :: Double -> Double 45exp :: Double -> Double
44exp = gsl_sf_exp 46exp = gsl_sf_exp
45foreign import ccall "gsl_sf_exp" gsl_sf_exp :: Double -> Double 47foreign import ccall "gsl_sf_exp" gsl_sf_exp :: Double -> Double
48
46exp_e10_e :: Double -> (Double,Int,Double) 49exp_e10_e :: Double -> (Double,Int,Double)
47exp_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
48foreign import ccall "gsl_sf_exp_e10_e" gsl_sf_exp_e10_e :: Double -> Ptr () -> IO CInt 51foreign import ccall "gsl_sf_exp_e10_e" gsl_sf_exp_e10_e :: Double -> Ptr () -> IO CInt
52
49exp_mult_e :: Double -> Double -> (Double,Double) 53exp_mult_e :: Double -> Double -> (Double,Double)
50exp_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
51foreign import ccall "gsl_sf_exp_mult_e" gsl_sf_exp_mult_e :: Double -> Double -> Ptr () -> IO CInt 55foreign import ccall "gsl_sf_exp_mult_e" gsl_sf_exp_mult_e :: Double -> Double -> Ptr () -> IO CInt
56
52exp_mult :: Double -> Double -> Double 57exp_mult :: Double -> Double -> Double
53exp_mult = gsl_sf_exp_mult 58exp_mult = gsl_sf_exp_mult
54foreign import ccall "gsl_sf_exp_mult" gsl_sf_exp_mult :: Double -> Double -> Double 59foreign import ccall "gsl_sf_exp_mult" gsl_sf_exp_mult :: Double -> Double -> Double
60
55exp_mult_e10_e :: Double -> Double -> (Double,Int,Double) 61exp_mult_e10_e :: Double -> Double -> (Double,Int,Double)
56exp_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
57foreign import ccall "gsl_sf_exp_mult_e10_e" gsl_sf_exp_mult_e10_e :: Double -> Double -> Ptr () -> IO CInt 63foreign import ccall "gsl_sf_exp_mult_e10_e" gsl_sf_exp_mult_e10_e :: Double -> Double -> Ptr () -> IO CInt
64
58expm1_e :: Double -> (Double,Double) 65expm1_e :: Double -> (Double,Double)
59expm1_e x = createSFR "expm1_e" $ gsl_sf_expm1_e x 66expm1_e x = createSFR "expm1_e" $ gsl_sf_expm1_e x
60foreign import ccall "gsl_sf_expm1_e" gsl_sf_expm1_e :: Double -> Ptr () -> IO CInt 67foreign import ccall "gsl_sf_expm1_e" gsl_sf_expm1_e :: Double -> Ptr () -> IO CInt
68
61expm1 :: Double -> Double 69expm1 :: Double -> Double
62expm1 = gsl_sf_expm1 70expm1 = gsl_sf_expm1
63foreign import ccall "gsl_sf_expm1" gsl_sf_expm1 :: Double -> Double 71foreign import ccall "gsl_sf_expm1" gsl_sf_expm1 :: Double -> Double
72
64exprel_e :: Double -> (Double,Double) 73exprel_e :: Double -> (Double,Double)
65exprel_e x = createSFR "exprel_e" $ gsl_sf_exprel_e x 74exprel_e x = createSFR "exprel_e" $ gsl_sf_exprel_e x
66foreign import ccall "gsl_sf_exprel_e" gsl_sf_exprel_e :: Double -> Ptr () -> IO CInt 75foreign import ccall "gsl_sf_exprel_e" gsl_sf_exprel_e :: Double -> Ptr () -> IO CInt
76
67exprel :: Double -> Double 77exprel :: Double -> Double
68exprel = gsl_sf_exprel 78exprel = gsl_sf_exprel
69foreign import ccall "gsl_sf_exprel" gsl_sf_exprel :: Double -> Double 79foreign import ccall "gsl_sf_exprel" gsl_sf_exprel :: Double -> Double
80
70exprel_2_e :: Double -> (Double,Double) 81exprel_2_e :: Double -> (Double,Double)
71exprel_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
72foreign import ccall "gsl_sf_exprel_2_e" gsl_sf_exprel_2_e :: Double -> Ptr () -> IO CInt 83foreign import ccall "gsl_sf_exprel_2_e" gsl_sf_exprel_2_e :: Double -> Ptr () -> IO CInt
84
73exprel_2 :: Double -> Double 85exprel_2 :: Double -> Double
74exprel_2 = gsl_sf_exprel_2 86exprel_2 = gsl_sf_exprel_2
75foreign import ccall "gsl_sf_exprel_2" gsl_sf_exprel_2 :: Double -> Double 87foreign import ccall "gsl_sf_exprel_2" gsl_sf_exprel_2 :: Double -> Double
88
76exprel_n_e :: CInt -> Double -> (Double,Double) 89exprel_n_e :: CInt -> Double -> (Double,Double)
77exprel_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
78foreign import ccall "gsl_sf_exprel_n_e" gsl_sf_exprel_n_e :: CInt -> Double -> Ptr () -> IO CInt 91foreign import ccall "gsl_sf_exprel_n_e" gsl_sf_exprel_n_e :: CInt -> Double -> Ptr () -> IO CInt
92
79exprel_n :: CInt -> Double -> Double 93exprel_n :: CInt -> Double -> Double
80exprel_n = gsl_sf_exprel_n 94exprel_n = gsl_sf_exprel_n
81foreign import ccall "gsl_sf_exprel_n" gsl_sf_exprel_n :: CInt -> Double -> Double 95foreign import ccall "gsl_sf_exprel_n" gsl_sf_exprel_n :: CInt -> Double -> Double
96
82exprel_n_CF_e :: Double -> Double -> (Double,Double) 97exprel_n_CF_e :: Double -> Double -> (Double,Double)
83exprel_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
84foreign import ccall "gsl_sf_exprel_n_CF_e" gsl_sf_exprel_n_CF_e :: Double -> Double -> Ptr () -> IO CInt 99foreign import ccall "gsl_sf_exprel_n_CF_e" gsl_sf_exprel_n_CF_e :: Double -> Double -> Ptr () -> IO CInt
100
85exp_err_e :: Double -> Double -> (Double,Double) 101exp_err_e :: Double -> Double -> (Double,Double)
86exp_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
87foreign import ccall "gsl_sf_exp_err_e" gsl_sf_exp_err_e :: Double -> Double -> Ptr () -> IO CInt 103foreign import ccall "gsl_sf_exp_err_e" gsl_sf_exp_err_e :: Double -> Double -> Ptr () -> IO CInt
104
88exp_err_e10_e :: Double -> Double -> (Double,Int,Double) 105exp_err_e10_e :: Double -> Double -> (Double,Int,Double)
89exp_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
90foreign import ccall "gsl_sf_exp_err_e10_e" gsl_sf_exp_err_e10_e :: Double -> Double -> Ptr () -> IO CInt 107foreign import ccall "gsl_sf_exp_err_e10_e" gsl_sf_exp_err_e10_e :: Double -> Double -> Ptr () -> IO CInt
108
91exp_mult_err_e :: Double -> Double -> Double -> Double -> (Double,Double) 109exp_mult_err_e :: Double -> Double -> Double -> Double -> (Double,Double)
92exp_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
93foreign import ccall "gsl_sf_exp_mult_err_e" gsl_sf_exp_mult_err_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 111foreign import ccall "gsl_sf_exp_mult_err_e" gsl_sf_exp_mult_err_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt
112
94exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> (Double,Int,Double) 113exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> (Double,Int,Double)
95exp_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
96foreign import ccall "gsl_sf_exp_mult_err_e10_e" gsl_sf_exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt 115foreign import ccall "gsl_sf_exp_mult_err_e10_e" gsl_sf_exp_mult_err_e10_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt