diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Erf.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Erf.hs | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Erf.hs b/lib/Numeric/GSL/Special/Erf.hs index 5dff3c4..34ade6f 100644 --- a/lib/Numeric/GSL/Special/Erf.hs +++ b/lib/Numeric/GSL/Special/Erf.hs | |||
@@ -30,39 +30,51 @@ module Numeric.GSL.Special.Erf( | |||
30 | import Foreign(Ptr) | 30 | import Foreign(Ptr) |
31 | import Foreign.C.Types(CInt) | 31 | import Foreign.C.Types(CInt) |
32 | import Numeric.GSL.Special.Internal | 32 | import Numeric.GSL.Special.Internal |
33 | |||
33 | erfc_e :: Double -> (Double,Double) | 34 | erfc_e :: Double -> (Double,Double) |
34 | erfc_e x = createSFR "erfc_e" $ gsl_sf_erfc_e x | 35 | erfc_e x = createSFR "erfc_e" $ gsl_sf_erfc_e x |
35 | foreign import ccall "gsl_sf_erfc_e" gsl_sf_erfc_e :: Double -> Ptr () -> IO CInt | 36 | foreign import ccall "gsl_sf_erfc_e" gsl_sf_erfc_e :: Double -> Ptr () -> IO CInt |
37 | |||
36 | erfc :: Double -> Double | 38 | erfc :: Double -> Double |
37 | erfc = gsl_sf_erfc | 39 | erfc = gsl_sf_erfc |
38 | foreign import ccall "gsl_sf_erfc" gsl_sf_erfc :: Double -> Double | 40 | foreign import ccall "gsl_sf_erfc" gsl_sf_erfc :: Double -> Double |
41 | |||
39 | log_erfc_e :: Double -> (Double,Double) | 42 | log_erfc_e :: Double -> (Double,Double) |
40 | log_erfc_e x = createSFR "log_erfc_e" $ gsl_sf_log_erfc_e x | 43 | log_erfc_e x = createSFR "log_erfc_e" $ gsl_sf_log_erfc_e x |
41 | foreign import ccall "gsl_sf_log_erfc_e" gsl_sf_log_erfc_e :: Double -> Ptr () -> IO CInt | 44 | foreign import ccall "gsl_sf_log_erfc_e" gsl_sf_log_erfc_e :: Double -> Ptr () -> IO CInt |
45 | |||
42 | log_erfc :: Double -> Double | 46 | log_erfc :: Double -> Double |
43 | log_erfc = gsl_sf_log_erfc | 47 | log_erfc = gsl_sf_log_erfc |
44 | foreign import ccall "gsl_sf_log_erfc" gsl_sf_log_erfc :: Double -> Double | 48 | foreign import ccall "gsl_sf_log_erfc" gsl_sf_log_erfc :: Double -> Double |
49 | |||
45 | erf_e :: Double -> (Double,Double) | 50 | erf_e :: Double -> (Double,Double) |
46 | erf_e x = createSFR "erf_e" $ gsl_sf_erf_e x | 51 | erf_e x = createSFR "erf_e" $ gsl_sf_erf_e x |
47 | foreign import ccall "gsl_sf_erf_e" gsl_sf_erf_e :: Double -> Ptr () -> IO CInt | 52 | foreign import ccall "gsl_sf_erf_e" gsl_sf_erf_e :: Double -> Ptr () -> IO CInt |
53 | |||
48 | erf :: Double -> Double | 54 | erf :: Double -> Double |
49 | erf = gsl_sf_erf | 55 | erf = gsl_sf_erf |
50 | foreign import ccall "gsl_sf_erf" gsl_sf_erf :: Double -> Double | 56 | foreign import ccall "gsl_sf_erf" gsl_sf_erf :: Double -> Double |
57 | |||
51 | erf_Z_e :: Double -> (Double,Double) | 58 | erf_Z_e :: Double -> (Double,Double) |
52 | erf_Z_e x = createSFR "erf_Z_e" $ gsl_sf_erf_Z_e x | 59 | erf_Z_e x = createSFR "erf_Z_e" $ gsl_sf_erf_Z_e x |
53 | foreign import ccall "gsl_sf_erf_Z_e" gsl_sf_erf_Z_e :: Double -> Ptr () -> IO CInt | 60 | foreign import ccall "gsl_sf_erf_Z_e" gsl_sf_erf_Z_e :: Double -> Ptr () -> IO CInt |
61 | |||
54 | erf_Q_e :: Double -> (Double,Double) | 62 | erf_Q_e :: Double -> (Double,Double) |
55 | erf_Q_e x = createSFR "erf_Q_e" $ gsl_sf_erf_Q_e x | 63 | erf_Q_e x = createSFR "erf_Q_e" $ gsl_sf_erf_Q_e x |
56 | foreign import ccall "gsl_sf_erf_Q_e" gsl_sf_erf_Q_e :: Double -> Ptr () -> IO CInt | 64 | foreign import ccall "gsl_sf_erf_Q_e" gsl_sf_erf_Q_e :: Double -> Ptr () -> IO CInt |
65 | |||
57 | erf_Z :: Double -> Double | 66 | erf_Z :: Double -> Double |
58 | erf_Z = gsl_sf_erf_Z | 67 | erf_Z = gsl_sf_erf_Z |
59 | foreign import ccall "gsl_sf_erf_Z" gsl_sf_erf_Z :: Double -> Double | 68 | foreign import ccall "gsl_sf_erf_Z" gsl_sf_erf_Z :: Double -> Double |
69 | |||
60 | erf_Q :: Double -> Double | 70 | erf_Q :: Double -> Double |
61 | erf_Q = gsl_sf_erf_Q | 71 | erf_Q = gsl_sf_erf_Q |
62 | foreign import ccall "gsl_sf_erf_Q" gsl_sf_erf_Q :: Double -> Double | 72 | foreign import ccall "gsl_sf_erf_Q" gsl_sf_erf_Q :: Double -> Double |
73 | |||
63 | hazard_e :: Double -> (Double,Double) | 74 | hazard_e :: Double -> (Double,Double) |
64 | hazard_e x = createSFR "hazard_e" $ gsl_sf_hazard_e x | 75 | hazard_e x = createSFR "hazard_e" $ gsl_sf_hazard_e x |
65 | foreign import ccall "gsl_sf_hazard_e" gsl_sf_hazard_e :: Double -> Ptr () -> IO CInt | 76 | foreign import ccall "gsl_sf_hazard_e" gsl_sf_hazard_e :: Double -> Ptr () -> IO CInt |
77 | |||
66 | hazard :: Double -> Double | 78 | hazard :: Double -> Double |
67 | hazard = gsl_sf_hazard | 79 | hazard = gsl_sf_hazard |
68 | foreign import ccall "gsl_sf_hazard" gsl_sf_hazard :: Double -> Double | 80 | foreign import ccall "gsl_sf_hazard" gsl_sf_hazard :: Double -> Double |