diff options
Diffstat (limited to 'lib/Numeric/GSL/Special/Debye.hs')
-rw-r--r-- | lib/Numeric/GSL/Special/Debye.hs | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/lib/Numeric/GSL/Special/Debye.hs b/lib/Numeric/GSL/Special/Debye.hs index c059cf1..cb86f03 100644 --- a/lib/Numeric/GSL/Special/Debye.hs +++ b/lib/Numeric/GSL/Special/Debye.hs | |||
@@ -23,10 +23,10 @@ module Numeric.GSL.Special.Debye( | |||
23 | , debye_3 | 23 | , debye_3 |
24 | , debye_4_e | 24 | , debye_4_e |
25 | , debye_4 | 25 | , debye_4 |
26 | , debye_5_e | 26 | --, debye_5_e |
27 | , debye_5 | 27 | --, debye_5 |
28 | , debye_6_e | 28 | --, debye_6_e |
29 | , debye_6 | 29 | --, debye_6 |
30 | ) where | 30 | ) where |
31 | 31 | ||
32 | import Foreign(Ptr) | 32 | import Foreign(Ptr) |
@@ -92,27 +92,27 @@ foreign import ccall "debye.h gsl_sf_debye_4" gsl_sf_debye_4 :: Double -> Double | |||
92 | -- | wrapper for int gsl_sf_debye_5_e(double x,gsl_sf_result* result); | 92 | -- | wrapper for int gsl_sf_debye_5_e(double x,gsl_sf_result* result); |
93 | -- | 93 | -- |
94 | -- <http://www.google.com/search?q=gsl_sf_debye_5_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 94 | -- <http://www.google.com/search?q=gsl_sf_debye_5_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
95 | debye_5_e :: Double -> (Double,Double) | 95 | --debye_5_e :: Double -> (Double,Double) |
96 | debye_5_e x = createSFR "debye_5_e" $ gsl_sf_debye_5_e x | 96 | --debye_5_e x = createSFR "debye_5_e" $ gsl_sf_debye_5_e x |
97 | foreign import ccall "debye.h gsl_sf_debye_5_e" gsl_sf_debye_5_e :: Double -> Ptr () -> IO CInt | 97 | --foreign import ccall "debye.h gsl_sf_debye_5_e" gsl_sf_debye_5_e :: Double -> Ptr () -> IO CInt |
98 | 98 | ||
99 | -- | wrapper for double gsl_sf_debye_5(double x); | 99 | -- | wrapper for double gsl_sf_debye_5(double x); |
100 | -- | 100 | -- |
101 | -- <http://www.google.com/search?q=gsl_sf_debye_5&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 101 | -- <http://www.google.com/search?q=gsl_sf_debye_5&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
102 | debye_5 :: Double -> Double | 102 | --debye_5 :: Double -> Double |
103 | debye_5 = gsl_sf_debye_5 | 103 | --debye_5 = gsl_sf_debye_5 |
104 | foreign import ccall "debye.h gsl_sf_debye_5" gsl_sf_debye_5 :: Double -> Double | 104 | --foreign import ccall "debye.h gsl_sf_debye_5" gsl_sf_debye_5 :: Double -> Double |
105 | 105 | ||
106 | -- | wrapper for int gsl_sf_debye_6_e(double x,gsl_sf_result* result); | 106 | -- | wrapper for int gsl_sf_debye_6_e(double x,gsl_sf_result* result); |
107 | -- | 107 | -- |
108 | -- <http://www.google.com/search?q=gsl_sf_debye_6_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 108 | -- <http://www.google.com/search?q=gsl_sf_debye_6_e&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
109 | debye_6_e :: Double -> (Double,Double) | 109 | --debye_6_e :: Double -> (Double,Double) |
110 | debye_6_e x = createSFR "debye_6_e" $ gsl_sf_debye_6_e x | 110 | --debye_6_e x = createSFR "debye_6_e" $ gsl_sf_debye_6_e x |
111 | foreign import ccall "debye.h gsl_sf_debye_6_e" gsl_sf_debye_6_e :: Double -> Ptr () -> IO CInt | 111 | --foreign import ccall "debye.h gsl_sf_debye_6_e" gsl_sf_debye_6_e :: Double -> Ptr () -> IO CInt |
112 | 112 | ||
113 | -- | wrapper for double gsl_sf_debye_6(double x); | 113 | -- | wrapper for double gsl_sf_debye_6(double x); |
114 | -- | 114 | -- |
115 | -- <http://www.google.com/search?q=gsl_sf_debye_6&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> | 115 | -- <http://www.google.com/search?q=gsl_sf_debye_6&as_sitesearch=www.gnu.org/software/gsl/manual&btnI=Lucky> |
116 | debye_6 :: Double -> Double | 116 | --debye_6 :: Double -> Double |
117 | debye_6 = gsl_sf_debye_6 | 117 | --debye_6 = gsl_sf_debye_6 |
118 | foreign import ccall "debye.h gsl_sf_debye_6" gsl_sf_debye_6 :: Double -> Double | 118 | --foreign import ccall "debye.h gsl_sf_debye_6" gsl_sf_debye_6 :: Double -> Double |