diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Clausen.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Clausen.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Clausen.hs b/lib/Numeric/GSL/Special/Clausen.hs index 0c0b70c..4c9f6de 100644 --- a/lib/Numeric/GSL/Special/Clausen.hs +++ b/lib/Numeric/GSL/Special/Clausen.hs | |||
@@ -20,9 +20,11 @@ module Numeric.GSL.Special.Clausen( | |||
20 | import Foreign(Ptr) | 20 | import Foreign(Ptr) |
21 | import Foreign.C.Types(CInt) | 21 | import Foreign.C.Types(CInt) |
22 | import Numeric.GSL.Special.Internal | 22 | import Numeric.GSL.Special.Internal |
23 | |||
23 | clausen_e :: Double -> (Double,Double) | 24 | clausen_e :: Double -> (Double,Double) |
24 | clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x | 25 | clausen_e x = createSFR "clausen_e" $ gsl_sf_clausen_e x |
25 | foreign import ccall "gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr () -> IO CInt | 26 | foreign import ccall "gsl_sf_clausen_e" gsl_sf_clausen_e :: Double -> Ptr () -> IO CInt |
27 | |||
26 | clausen :: Double -> Double | 28 | clausen :: Double -> Double |
27 | clausen = gsl_sf_clausen | 29 | clausen = gsl_sf_clausen |
28 | foreign import ccall "gsl_sf_clausen" gsl_sf_clausen :: Double -> Double | 30 | foreign import ccall "gsl_sf_clausen" gsl_sf_clausen :: Double -> Double |