summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Dawson.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Dawson.hs')
-rw-r--r--lib/Numeric/GSL/Special/Dawson.hs32
1 files changed, 11 insertions, 21 deletions
diff --git a/lib/Numeric/GSL/Special/Dawson.hs b/lib/Numeric/GSL/Special/Dawson.hs
index 40d4d4e..37cc68e 100644
--- a/lib/Numeric/GSL/Special/Dawson.hs
+++ b/lib/Numeric/GSL/Special/Dawson.hs
@@ -1,17 +1,15 @@
1------------------------------------------------------------ 1------------------------------------------------------------
2{- | 2-- |
3Module : Numeric.GSL.Special.Dawson 3-- Module : Numeric.GSL.Special.Dawson
4Copyright : (c) Alberto Ruiz 2006 4-- Copyright : (c) Alberto Ruiz 2006
5License : GPL-style 5-- License : GPL
6Maintainer : Alberto Ruiz (aruiz at um dot es) 6-- Maintainer : Alberto Ruiz (aruiz at um dot es)
7Stability : provisional 7-- Stability : provisional
8Portability : uses ffi 8-- Portability : uses ffi
9 9--
10Wrappers for selected functions described at: 10-- Wrappers for selected functions described at:
11 11--
12<http://www.google.com/search?q=gsl_sf_dawson.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 12-- <http://www.google.com/search?q=gsl_sf_dawson.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13
14-}
15------------------------------------------------------------ 13------------------------------------------------------------
16 14
17module Numeric.GSL.Special.Dawson( 15module Numeric.GSL.Special.Dawson(
@@ -22,17 +20,9 @@ module Numeric.GSL.Special.Dawson(
22import Foreign(Ptr) 20import Foreign(Ptr)
23import Foreign.C.Types(CInt) 21import Foreign.C.Types(CInt)
24import Numeric.GSL.Special.Internal 22import Numeric.GSL.Special.Internal
25
26-- | wrapper for int gsl_sf_dawson_e(double x,gsl_sf_result* result);
27--
28-- <http://www.google.com/search?q=gsl_sf_dawson_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
29dawson_e :: Double -> (Double,Double) 23dawson_e :: Double -> (Double,Double)
30dawson_e x = createSFR "dawson_e" $ gsl_sf_dawson_e x 24dawson_e x = createSFR "dawson_e" $ gsl_sf_dawson_e x
31foreign import ccall "gsl_sf_dawson_e" gsl_sf_dawson_e :: Double -> Ptr () -> IO CInt 25foreign import ccall "gsl_sf_dawson_e" gsl_sf_dawson_e :: Double -> Ptr () -> IO CInt
32
33-- | wrapper for double gsl_sf_dawson(double x);
34--
35-- <http://www.google.com/search?q=gsl_sf_dawson&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
36dawson :: Double -> Double 26dawson :: Double -> Double
37dawson = gsl_sf_dawson 27dawson = gsl_sf_dawson
38foreign import ccall "gsl_sf_dawson" gsl_sf_dawson :: Double -> Double 28foreign import ccall "gsl_sf_dawson" gsl_sf_dawson :: Double -> Double