diff options
Diffstat (limited to 'packages/special/lib/Numeric/GSL/Special/Elljac.hs')
-rw-r--r-- | packages/special/lib/Numeric/GSL/Special/Elljac.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/packages/special/lib/Numeric/GSL/Special/Elljac.hs b/packages/special/lib/Numeric/GSL/Special/Elljac.hs index 5b32cfe..553350c 100644 --- a/packages/special/lib/Numeric/GSL/Special/Elljac.hs +++ b/packages/special/lib/Numeric/GSL/Special/Elljac.hs | |||
@@ -16,8 +16,11 @@ module Numeric.GSL.Special.Elljac( | |||
16 | elljac_e | 16 | elljac_e |
17 | ) where | 17 | ) where |
18 | 18 | ||
19 | import Foreign | 19 | import System.IO.Unsafe |
20 | import Foreign.C.Types(CInt) | 20 | import Foreign.Ptr |
21 | import Foreign.Storable | ||
22 | import Foreign.Marshal | ||
23 | import Foreign.C.Types | ||
21 | 24 | ||
22 | elljac_e :: Double -> Double -> (Double,Double,Double) | 25 | elljac_e :: Double -> Double -> (Double,Double,Double) |
23 | elljac_e u m = unsafePerformIO $ do | 26 | elljac_e u m = unsafePerformIO $ do |