diff options
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Log.hs')
-rw-r--r-- | packages/special/lib/Numeric/GSL/Special/Log.hs | 18 |
1 files changed, 9 insertions, 9 deletions
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 | ||
31 | log_e :: Double -> (Double,Double) | 31 | log_e :: Double -> (Double,Double) |
32 | log_e x = createSFR "log_e" $ gsl_sf_log_e x | 32 | log_e x = createSFR "log_e" $ gsl_sf_log_e x |
33 | foreign import ccall SAFE_CHEAP "gsl_sf_log_e" gsl_sf_log_e :: Double -> Ptr () -> IO CInt | 33 | foreign import ccall unsafe "gsl_sf_log_e" gsl_sf_log_e :: Double -> Ptr () -> IO CInt |
34 | 34 | ||
35 | log :: Double -> Double | 35 | log :: Double -> Double |
36 | log = gsl_sf_log | 36 | log = gsl_sf_log |
37 | foreign import ccall SAFE_CHEAP "gsl_sf_log" gsl_sf_log :: Double -> Double | 37 | foreign import ccall unsafe "gsl_sf_log" gsl_sf_log :: Double -> Double |
38 | 38 | ||
39 | log_abs_e :: Double -> (Double,Double) | 39 | log_abs_e :: Double -> (Double,Double) |
40 | log_abs_e x = createSFR "log_abs_e" $ gsl_sf_log_abs_e x | 40 | log_abs_e x = createSFR "log_abs_e" $ gsl_sf_log_abs_e x |
41 | foreign import ccall SAFE_CHEAP "gsl_sf_log_abs_e" gsl_sf_log_abs_e :: Double -> Ptr () -> IO CInt | 41 | foreign import ccall unsafe "gsl_sf_log_abs_e" gsl_sf_log_abs_e :: Double -> Ptr () -> IO CInt |
42 | 42 | ||
43 | log_abs :: Double -> Double | 43 | log_abs :: Double -> Double |
44 | log_abs = gsl_sf_log_abs | 44 | log_abs = gsl_sf_log_abs |
45 | foreign import ccall SAFE_CHEAP "gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double | 45 | foreign import ccall unsafe "gsl_sf_log_abs" gsl_sf_log_abs :: Double -> Double |
46 | 46 | ||
47 | complex_log_e :: Double -> Double -> ((Double,Double),(Double,Double)) | 47 | complex_log_e :: Double -> Double -> ((Double,Double),(Double,Double)) |
48 | complex_log_e zr zi = create2SFR "complex_log_e" $ gsl_sf_complex_log_e zr zi | 48 | complex_log_e zr zi = create2SFR "complex_log_e" $ gsl_sf_complex_log_e zr zi |
49 | foreign import ccall SAFE_CHEAP "gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt | 49 | foreign import ccall unsafe "gsl_sf_complex_log_e" gsl_sf_complex_log_e :: Double -> Double -> Ptr () -> Ptr () -> IO CInt |
50 | 50 | ||
51 | log_1plusx_e :: Double -> (Double,Double) | 51 | log_1plusx_e :: Double -> (Double,Double) |
52 | log_1plusx_e x = createSFR "log_1plusx_e" $ gsl_sf_log_1plusx_e x | 52 | log_1plusx_e x = createSFR "log_1plusx_e" $ gsl_sf_log_1plusx_e x |
53 | foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx_e" gsl_sf_log_1plusx_e :: Double -> Ptr () -> IO CInt | 53 | foreign import ccall unsafe "gsl_sf_log_1plusx_e" gsl_sf_log_1plusx_e :: Double -> Ptr () -> IO CInt |
54 | 54 | ||
55 | log_1plusx :: Double -> Double | 55 | log_1plusx :: Double -> Double |
56 | log_1plusx = gsl_sf_log_1plusx | 56 | log_1plusx = gsl_sf_log_1plusx |
57 | foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx" gsl_sf_log_1plusx :: Double -> Double | 57 | foreign import ccall unsafe "gsl_sf_log_1plusx" gsl_sf_log_1plusx :: Double -> Double |
58 | 58 | ||
59 | log_1plusx_mx_e :: Double -> (Double,Double) | 59 | log_1plusx_mx_e :: Double -> (Double,Double) |
60 | log_1plusx_mx_e x = createSFR "log_1plusx_mx_e" $ gsl_sf_log_1plusx_mx_e x | 60 | log_1plusx_mx_e x = createSFR "log_1plusx_mx_e" $ gsl_sf_log_1plusx_mx_e x |
61 | foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx_mx_e" gsl_sf_log_1plusx_mx_e :: Double -> Ptr () -> IO CInt | 61 | foreign import ccall unsafe "gsl_sf_log_1plusx_mx_e" gsl_sf_log_1plusx_mx_e :: Double -> Ptr () -> IO CInt |
62 | 62 | ||
63 | log_1plusx_mx :: Double -> Double | 63 | log_1plusx_mx :: Double -> Double |
64 | log_1plusx_mx = gsl_sf_log_1plusx_mx | 64 | log_1plusx_mx = gsl_sf_log_1plusx_mx |
65 | foreign import ccall SAFE_CHEAP "gsl_sf_log_1plusx_mx" gsl_sf_log_1plusx_mx :: Double -> Double | 65 | foreign import ccall unsafe "gsl_sf_log_1plusx_mx" gsl_sf_log_1plusx_mx :: Double -> Double |