summaryrefslogtreecommitdiff
path: root/lib/Numeric/GSL/Special/Synchrotron.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/GSL/Special/Synchrotron.hs')
-rw-r--r--lib/Numeric/GSL/Special/Synchrotron.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Synchrotron.hs b/lib/Numeric/GSL/Special/Synchrotron.hs
index 6103a8a..48381e4 100644
--- a/lib/Numeric/GSL/Special/Synchrotron.hs
+++ b/lib/Numeric/GSL/Special/Synchrotron.hs
@@ -22,15 +22,19 @@ module Numeric.GSL.Special.Synchrotron(
22import Foreign(Ptr) 22import Foreign(Ptr)
23import Foreign.C.Types(CInt) 23import Foreign.C.Types(CInt)
24import Numeric.GSL.Special.Internal 24import Numeric.GSL.Special.Internal
25
25synchrotron_1_e :: Double -> (Double,Double) 26synchrotron_1_e :: Double -> (Double,Double)
26synchrotron_1_e x = createSFR "synchrotron_1_e" $ gsl_sf_synchrotron_1_e x 27synchrotron_1_e x = createSFR "synchrotron_1_e" $ gsl_sf_synchrotron_1_e x
27foreign import ccall "gsl_sf_synchrotron_1_e" gsl_sf_synchrotron_1_e :: Double -> Ptr () -> IO CInt 28foreign import ccall "gsl_sf_synchrotron_1_e" gsl_sf_synchrotron_1_e :: Double -> Ptr () -> IO CInt
29
28synchrotron_1 :: Double -> Double 30synchrotron_1 :: Double -> Double
29synchrotron_1 = gsl_sf_synchrotron_1 31synchrotron_1 = gsl_sf_synchrotron_1
30foreign import ccall "gsl_sf_synchrotron_1" gsl_sf_synchrotron_1 :: Double -> Double 32foreign import ccall "gsl_sf_synchrotron_1" gsl_sf_synchrotron_1 :: Double -> Double
33
31synchrotron_2_e :: Double -> (Double,Double) 34synchrotron_2_e :: Double -> (Double,Double)
32synchrotron_2_e x = createSFR "synchrotron_2_e" $ gsl_sf_synchrotron_2_e x 35synchrotron_2_e x = createSFR "synchrotron_2_e" $ gsl_sf_synchrotron_2_e x
33foreign import ccall "gsl_sf_synchrotron_2_e" gsl_sf_synchrotron_2_e :: Double -> Ptr () -> IO CInt 36foreign import ccall "gsl_sf_synchrotron_2_e" gsl_sf_synchrotron_2_e :: Double -> Ptr () -> IO CInt
37
34synchrotron_2 :: Double -> Double 38synchrotron_2 :: Double -> Double
35synchrotron_2 = gsl_sf_synchrotron_2 39synchrotron_2 = gsl_sf_synchrotron_2
36foreign import ccall "gsl_sf_synchrotron_2" gsl_sf_synchrotron_2 :: Double -> Double 40foreign import ccall "gsl_sf_synchrotron_2" gsl_sf_synchrotron_2 :: Double -> Double