diff options
Diffstat (limited to 'packages/sundials/src/Main.hs')
-rw-r--r-- | packages/sundials/src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/sundials/src/Main.hs b/packages/sundials/src/Main.hs index 14b1f8a..e96522f 100644 --- a/packages/sundials/src/Main.hs +++ b/packages/sundials/src/Main.hs | |||
@@ -144,7 +144,7 @@ main = do | |||
144 | (D.dims2D 500.0 500.0) | 144 | (D.dims2D 500.0 500.0) |
145 | (renderAxis $ kSaxis $ zip [0.0, 0.1 .. 10.0] (concat $ toLists res2)) | 145 | (renderAxis $ kSaxis $ zip [0.0, 0.1 .. 10.0] (concat $ toLists res2)) |
146 | 146 | ||
147 | let res2a = odeSolveV (SDIRK_5_3_4 stiffJac) 0.1 1e-3 1e-6 stiffishV (fromList [0.0]) (fromList [0.0, 0.1 .. 10.0]) | 147 | let res2a = odeSolveV (SDIRK_5_3_4 stiffJac) Nothing 1e-3 1e-6 stiffishV (fromList [0.0]) (fromList [0.0, 0.1 .. 10.0]) |
148 | putStrLn "Lower tolerances" | 148 | putStrLn "Lower tolerances" |
149 | putStrLn $ show res2a | 149 | putStrLn $ show res2a |
150 | 150 | ||