diff options
author | Dominic Steinitz <dominic@steinitz.org> | 2018-03-30 14:15:26 +0100 |
---|---|---|
committer | Dominic Steinitz <dominic@steinitz.org> | 2018-03-30 14:15:26 +0100 |
commit | 5bcc77b1e115a8c8eb94a1aa1a441618bfeb0b54 (patch) | |
tree | 1471fa78eaa57e1807019fe4f10b20d2e2c27a4f /packages/sundials/src/Numeric | |
parent | 94d26eb8ef7cf236127e9e51bb3c46348c4c6cfc (diff) |
Improve naming
Diffstat (limited to 'packages/sundials/src/Numeric')
-rw-r--r-- | packages/sundials/src/Numeric/Sundials/ARKode/ODE.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/packages/sundials/src/Numeric/Sundials/ARKode/ODE.hs b/packages/sundials/src/Numeric/Sundials/ARKode/ODE.hs index a5083e3..30ff4c8 100644 --- a/packages/sundials/src/Numeric/Sundials/ARKode/ODE.hs +++ b/packages/sundials/src/Numeric/Sundials/ARKode/ODE.hs | |||
@@ -58,8 +58,8 @@ import Numeric.LinearAlgebra.Devel (createVector) | |||
58 | import Numeric.LinearAlgebra.HMatrix (Vector, Matrix, toList, (><), subMatrix) | 58 | import Numeric.LinearAlgebra.HMatrix (Vector, Matrix, toList, (><), subMatrix) |
59 | 59 | ||
60 | import qualified Types as T | 60 | import qualified Types as T |
61 | import Bar (sDIRK_2_1_2, kVAERNO_4_2_3) | 61 | import Arkode (sDIRK_2_1_2, kVAERNO_4_2_3) |
62 | import qualified Bar as B | 62 | import qualified Arkode as B |
63 | 63 | ||
64 | 64 | ||
65 | C.context (C.baseCtx <> C.vecCtx <> C.funCtx <> T.sunCtx) | 65 | C.context (C.baseCtx <> C.vecCtx <> C.funCtx <> T.sunCtx) |
@@ -75,7 +75,7 @@ C.include "<arkode/arkode_direct.h>" -- access to ARKDls interface | |||
75 | C.include "<sundials/sundials_types.h>" -- definition of type realtype | 75 | C.include "<sundials/sundials_types.h>" -- definition of type realtype |
76 | C.include "<sundials/sundials_math.h>" | 76 | C.include "<sundials/sundials_math.h>" |
77 | C.include "../../../helpers.h" | 77 | C.include "../../../helpers.h" |
78 | C.include "Bar_hsc.h" | 78 | C.include "Arkode_hsc.h" |
79 | 79 | ||
80 | 80 | ||
81 | getDataFromContents :: Storable b => Int -> Ptr a -> IO (V.Vector b) | 81 | getDataFromContents :: Storable b => Int -> Ptr a -> IO (V.Vector b) |