From 5bcc77b1e115a8c8eb94a1aa1a441618bfeb0b54 Mon Sep 17 00:00:00 2001 From: Dominic Steinitz Date: Fri, 30 Mar 2018 14:15:26 +0100 Subject: Improve naming --- packages/sundials/src/Numeric/Sundials/ARKode/ODE.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'packages/sundials/src/Numeric/Sundials/ARKode/ODE.hs') 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) import Numeric.LinearAlgebra.HMatrix (Vector, Matrix, toList, (><), subMatrix) import qualified Types as T -import Bar (sDIRK_2_1_2, kVAERNO_4_2_3) -import qualified Bar as B +import Arkode (sDIRK_2_1_2, kVAERNO_4_2_3) +import qualified Arkode as B C.context (C.baseCtx <> C.vecCtx <> C.funCtx <> T.sunCtx) @@ -75,7 +75,7 @@ C.include "" -- access to ARKDls interface C.include "" -- definition of type realtype C.include "" C.include "../../../helpers.h" -C.include "Bar_hsc.h" +C.include "Arkode_hsc.h" getDataFromContents :: Storable b => Int -> Ptr a -> IO (V.Vector b) -- cgit v1.2.3