diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Elementary.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Elementary.hs | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/lib/Numeric/GSL/Special/Elementary.hs b/lib/Numeric/GSL/Special/Elementary.hs deleted file mode 100644 index 7e7f8b6..0000000 --- a/lib/Numeric/GSL/Special/Elementary.hs +++ /dev/null | |||
@@ -1,35 +0,0 @@ | |||
1 | ------------------------------------------------------------ | ||
2 | -- | | ||
3 | -- Module : Numeric.GSL.Special.Elementary | ||
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_elementary.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | ||
13 | ------------------------------------------------------------ | ||
14 | |||
15 | module Numeric.GSL.Special.Elementary( | ||
16 | multiply_e | ||
17 | , multiply | ||
18 | , multiply_err_e | ||
19 | ) where | ||
20 | |||
21 | import Foreign(Ptr) | ||
22 | import Foreign.C.Types(CInt) | ||
23 | import Numeric.GSL.Special.Internal | ||
24 | |||
25 | multiply_e :: Double -> Double -> (Double,Double) | ||
26 | multiply_e x y = createSFR "multiply_e" $ gsl_sf_multiply_e x y | ||
27 | foreign import ccall SAFE_CHEAP "gsl_sf_multiply_e" gsl_sf_multiply_e :: Double -> Double -> Ptr () -> IO CInt | ||
28 | |||
29 | multiply :: Double -> Double -> Double | ||
30 | multiply = gsl_sf_multiply | ||
31 | foreign import ccall SAFE_CHEAP "gsl_sf_multiply" gsl_sf_multiply :: Double -> Double -> Double | ||
32 | |||
33 | multiply_err_e :: Double -> Double -> Double -> Double -> (Double,Double) | ||
34 | multiply_err_e x dx y dy = createSFR "multiply_err_e" $ gsl_sf_multiply_err_e x dx y dy | ||
35 | foreign import ccall SAFE_CHEAP "gsl_sf_multiply_err_e" gsl_sf_multiply_err_e :: Double -> Double -> Double -> Double -> Ptr () -> IO CInt | ||