summaryrefslogtreecommitdiff
path: root/packages/hmatrix/src/Numeric/GSL/Integration.hs
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2014-05-08 13:43:07 +0200
committerAlberto Ruiz <aruiz@um.es>2014-05-08 13:43:07 +0200
commit551cf7498c33bc0948bb4cb8444ae6f8af7278ea (patch)
treeec86ff73151746f5e13b83549ea5c60ed442764d /packages/hmatrix/src/Numeric/GSL/Integration.hs
parent561a6c0e21bb77c21114ccbbd86d3af5ddb5a3f1 (diff)
separation ok
Diffstat (limited to 'packages/hmatrix/src/Numeric/GSL/Integration.hs')
-rw-r--r--packages/hmatrix/src/Numeric/GSL/Integration.hs12
1 files changed, 4 insertions, 8 deletions
diff --git a/packages/hmatrix/src/Numeric/GSL/Integration.hs b/packages/hmatrix/src/Numeric/GSL/Integration.hs
index 5f0a415..9c1d43a 100644
--- a/packages/hmatrix/src/Numeric/GSL/Integration.hs
+++ b/packages/hmatrix/src/Numeric/GSL/Integration.hs
@@ -1,19 +1,15 @@
1{-# OPTIONS #-}
2-----------------------------------------------------------------------------
3{- | 1{- |
4Module : Numeric.GSL.Integration 2Module : Numeric.GSL.Integration
5Copyright : (c) Alberto Ruiz 2006 3Copyright : (c) Alberto Ruiz 2006
6License : GPL-style 4License : GPL
7 5Maintainer : Alberto Ruiz
8Maintainer : Alberto Ruiz (aruiz at um dot es)
9Stability : provisional 6Stability : provisional
10Portability : uses ffi
11 7
12Numerical integration routines. 8Numerical integration routines.
13 9
14<http://www.gnu.org/software/gsl/manual/html_node/Numerical-Integration.html#Numerical-Integration> 10<http://www.gnu.org/software/gsl/manual/html_node/Numerical-Integration.html#Numerical-Integration>
15-} 11-}
16----------------------------------------------------------------------------- 12
17 13
18module Numeric.GSL.Integration ( 14module Numeric.GSL.Integration (
19 integrateQNG, 15 integrateQNG,
@@ -28,7 +24,7 @@ import Foreign.C.Types
28import Foreign.Marshal.Alloc(malloc, free) 24import Foreign.Marshal.Alloc(malloc, free)
29import Foreign.Ptr(Ptr, FunPtr, freeHaskellFunPtr) 25import Foreign.Ptr(Ptr, FunPtr, freeHaskellFunPtr)
30import Foreign.Storable(peek) 26import Foreign.Storable(peek)
31import Data.Packed.Internal(check,(//)) 27import Numeric.GSL.Internal
32import System.IO.Unsafe(unsafePerformIO) 28import System.IO.Unsafe(unsafePerformIO)
33 29
34eps = 1e-12 30eps = 1e-12