diff options
author | Alberto Ruiz <aruiz@um.es> | 2009-06-19 07:37:05 +0000 |
---|---|---|
committer | Alberto Ruiz <aruiz@um.es> | 2009-06-19 07:37:05 +0000 |
commit | a9722cf16fe322985c998ab290cf03213b539e49 (patch) | |
tree | fc06b55ff719a7908eae23748bacfe140ce5374f /lib/Numeric/GSL/Special/Debye.hs | |
parent | f589b9e673c3aef62834b3e2e88d96226bb7c24f (diff) |
minor changes
Diffstat (limited to 'lib/Numeric/GSL/Special/Debye.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Debye.hs | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/Numeric/GSL/Special/Debye.hs b/lib/Numeric/GSL/Special/Debye.hs index c989a82..8a3e655 100644 --- a/lib/Numeric/GSL/Special/Debye.hs +++ b/lib/Numeric/GSL/Special/Debye.hs | |||
@@ -30,39 +30,51 @@ module Numeric.GSL.Special.Debye( | |||
30 | import Foreign(Ptr) | 30 | import Foreign(Ptr) |
31 | import Foreign.C.Types(CInt) | 31 | import Foreign.C.Types(CInt) |
32 | import Numeric.GSL.Special.Internal | 32 | import Numeric.GSL.Special.Internal |
33 | |||
33 | debye_1_e :: Double -> (Double,Double) | 34 | debye_1_e :: Double -> (Double,Double) |
34 | debye_1_e x = createSFR "debye_1_e" $ gsl_sf_debye_1_e x | 35 | debye_1_e x = createSFR "debye_1_e" $ gsl_sf_debye_1_e x |
35 | foreign import ccall "gsl_sf_debye_1_e" gsl_sf_debye_1_e :: Double -> Ptr () -> IO CInt | 36 | foreign import ccall "gsl_sf_debye_1_e" gsl_sf_debye_1_e :: Double -> Ptr () -> IO CInt |
37 | |||
36 | debye_1 :: Double -> Double | 38 | debye_1 :: Double -> Double |
37 | debye_1 = gsl_sf_debye_1 | 39 | debye_1 = gsl_sf_debye_1 |
38 | foreign import ccall "gsl_sf_debye_1" gsl_sf_debye_1 :: Double -> Double | 40 | foreign import ccall "gsl_sf_debye_1" gsl_sf_debye_1 :: Double -> Double |
41 | |||
39 | debye_2_e :: Double -> (Double,Double) | 42 | debye_2_e :: Double -> (Double,Double) |
40 | debye_2_e x = createSFR "debye_2_e" $ gsl_sf_debye_2_e x | 43 | debye_2_e x = createSFR "debye_2_e" $ gsl_sf_debye_2_e x |
41 | foreign import ccall "gsl_sf_debye_2_e" gsl_sf_debye_2_e :: Double -> Ptr () -> IO CInt | 44 | foreign import ccall "gsl_sf_debye_2_e" gsl_sf_debye_2_e :: Double -> Ptr () -> IO CInt |
45 | |||
42 | debye_2 :: Double -> Double | 46 | debye_2 :: Double -> Double |
43 | debye_2 = gsl_sf_debye_2 | 47 | debye_2 = gsl_sf_debye_2 |
44 | foreign import ccall "gsl_sf_debye_2" gsl_sf_debye_2 :: Double -> Double | 48 | foreign import ccall "gsl_sf_debye_2" gsl_sf_debye_2 :: Double -> Double |
49 | |||
45 | debye_3_e :: Double -> (Double,Double) | 50 | debye_3_e :: Double -> (Double,Double) |
46 | debye_3_e x = createSFR "debye_3_e" $ gsl_sf_debye_3_e x | 51 | debye_3_e x = createSFR "debye_3_e" $ gsl_sf_debye_3_e x |
47 | foreign import ccall "gsl_sf_debye_3_e" gsl_sf_debye_3_e :: Double -> Ptr () -> IO CInt | 52 | foreign import ccall "gsl_sf_debye_3_e" gsl_sf_debye_3_e :: Double -> Ptr () -> IO CInt |
53 | |||
48 | debye_3 :: Double -> Double | 54 | debye_3 :: Double -> Double |
49 | debye_3 = gsl_sf_debye_3 | 55 | debye_3 = gsl_sf_debye_3 |
50 | foreign import ccall "gsl_sf_debye_3" gsl_sf_debye_3 :: Double -> Double | 56 | foreign import ccall "gsl_sf_debye_3" gsl_sf_debye_3 :: Double -> Double |
57 | |||
51 | debye_4_e :: Double -> (Double,Double) | 58 | debye_4_e :: Double -> (Double,Double) |
52 | debye_4_e x = createSFR "debye_4_e" $ gsl_sf_debye_4_e x | 59 | debye_4_e x = createSFR "debye_4_e" $ gsl_sf_debye_4_e x |
53 | foreign import ccall "gsl_sf_debye_4_e" gsl_sf_debye_4_e :: Double -> Ptr () -> IO CInt | 60 | foreign import ccall "gsl_sf_debye_4_e" gsl_sf_debye_4_e :: Double -> Ptr () -> IO CInt |
61 | |||
54 | debye_4 :: Double -> Double | 62 | debye_4 :: Double -> Double |
55 | debye_4 = gsl_sf_debye_4 | 63 | debye_4 = gsl_sf_debye_4 |
56 | foreign import ccall "gsl_sf_debye_4" gsl_sf_debye_4 :: Double -> Double | 64 | foreign import ccall "gsl_sf_debye_4" gsl_sf_debye_4 :: Double -> Double |
65 | |||
57 | debye_5_e :: Double -> (Double,Double) | 66 | debye_5_e :: Double -> (Double,Double) |
58 | debye_5_e x = createSFR "debye_5_e" $ gsl_sf_debye_5_e x | 67 | debye_5_e x = createSFR "debye_5_e" $ gsl_sf_debye_5_e x |
59 | foreign import ccall "gsl_sf_debye_5_e" gsl_sf_debye_5_e :: Double -> Ptr () -> IO CInt | 68 | foreign import ccall "gsl_sf_debye_5_e" gsl_sf_debye_5_e :: Double -> Ptr () -> IO CInt |
69 | |||
60 | debye_5 :: Double -> Double | 70 | debye_5 :: Double -> Double |
61 | debye_5 = gsl_sf_debye_5 | 71 | debye_5 = gsl_sf_debye_5 |
62 | foreign import ccall "gsl_sf_debye_5" gsl_sf_debye_5 :: Double -> Double | 72 | foreign import ccall "gsl_sf_debye_5" gsl_sf_debye_5 :: Double -> Double |
73 | |||
63 | debye_6_e :: Double -> (Double,Double) | 74 | debye_6_e :: Double -> (Double,Double) |
64 | debye_6_e x = createSFR "debye_6_e" $ gsl_sf_debye_6_e x | 75 | debye_6_e x = createSFR "debye_6_e" $ gsl_sf_debye_6_e x |
65 | foreign import ccall "gsl_sf_debye_6_e" gsl_sf_debye_6_e :: Double -> Ptr () -> IO CInt | 76 | foreign import ccall "gsl_sf_debye_6_e" gsl_sf_debye_6_e :: Double -> Ptr () -> IO CInt |
77 | |||
66 | debye_6 :: Double -> Double | 78 | debye_6 :: Double -> Double |
67 | debye_6 = gsl_sf_debye_6 | 79 | debye_6 = gsl_sf_debye_6 |
68 | foreign import ccall "gsl_sf_debye_6" gsl_sf_debye_6 :: Double -> Double | 80 | foreign import ccall "gsl_sf_debye_6" gsl_sf_debye_6 :: Double -> Double |