summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Clausen.hs
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2009-06-17 12:27:17 +0000
committerAlberto Ruiz <aruiz@um.es>2009-06-17 12:27:17 +0000
commite58f1e0e94407983fa18cd535cf76427019f1519 (patch)
tree4ffffdb92fd78e2233485895fb288111af0bf386 /lib/Numeric/GSL/Special/Clausen.hs
parent45e0e90ffdedd3c1fbe3da750018c65a1535cf75 (diff)
added special transport and elljac
Diffstat (limited to 'lib/Numeric/GSL/Special/Clausen.hs')
-rw-r--r--lib/Numeric/GSL/Special/Clausen.hs32
1 files changed, 11 insertions, 21 deletions
diff --git a/lib/Numeric/GSL/Special/Clausen.hs b/lib/Numeric/GSL/Special/Clausen.hs
index 4ebf0e2..0c0b70c 100644
--- a/lib/Numeric/GSL/Special/Clausen.hs
+++ b/lib/Numeric/GSL/Special/Clausen.hs
@@ -1,17 +1,15 @@
1------------------------------------------------------------ 1------------------------------------------------------------
2{- | 2-- |
3Module : Numeric.GSL.Special.Clausen 3-- Module : Numeric.GSL.Special.Clausen
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_clausen.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> 12-- <http://www.google.com/search?q=gsl_sf_clausen.h&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
13
14-}
15------------------------------------------------------------ 13------------------------------------------------------------
16 14
17module Numeric.GSL.Special.Clausen( 15module Numeric.GSL.Special.Clausen(
@@ -22,17 +20,9 @@ module Numeric.GSL.Special.Clausen(
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_clausen_e(double x,gsl_sf_result* result);
27--
28-- <http://www.google.com/search?q=gsl_sf_clausen_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
29clausen_e :: Double -> (Double,Double) 23clausen_e :: Double -> (Double,Double)
30clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x 24clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x
31foreign import ccall "gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr () -> IO CInt 25foreign import ccall "gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr () -> IO CInt
32
33-- | wrapper for double gsl_sf_clausen(double x);
34--
35-- <http://www.google.com/search?q=gsl_sf_clausen&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky>
36clausen :: Double -> Double 26clausen :: Double -> Double
37clausen = gsl_sf_clausen 27clausen = gsl_sf_clausen
38foreign import ccall "gsl_sf_clausen" gsl_sf_clausen :: Double -> Double 28foreign import ccall "gsl_sf_clausen" gsl_sf_clausen :: Double -> Double