summaryrefslogtreecommitdiff
path: root/packages/special/lib/Numeric/GSL/Special/Exp.hs
diff options
context:
space:
mode:
authorClark Gaebel <cgaebel@csclub.uwaterloo.ca>2012-03-10 18:26:56 -0500
committerClark Gaebel <cgaebel@csclub.uwaterloo.ca>2012-03-10 18:26:56 -0500
commitf8b7b3734fa6bb8d63914719e09d17940add27d4 (patch)
tree233c1c41ea8d5a0cf43bf9430cc2b60cff38a3e9 /packages/special/lib/Numeric/GSL/Special/Exp.hs
parent13fe05779923baad386b0059ff6fbc7c6af405d9 (diff)
Removed foreign import safety.
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Exp.hs')
-rw-r--r--packages/special/lib/Numeric/GSL/Special/Exp.hs38
1 files changed, 19 insertions, 19 deletions
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
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-07 12:43:34 +0000