diff options
Diffstat (limited to 'packages/sundials/src/Main.hs')
-rw-r--r-- | packages/sundials/src/Main.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/packages/sundials/src/Main.hs b/packages/sundials/src/Main.hs index 895e610..c81d1a3 100644 --- a/packages/sundials/src/Main.hs +++ b/packages/sundials/src/Main.hs | |||
@@ -76,7 +76,7 @@ main = do | |||
76 | let res = btGet | 76 | let res = btGet |
77 | putStrLn $ show res | 77 | putStrLn $ show res |
78 | putStrLn $ butcherTableauTex res | 78 | putStrLn $ butcherTableauTex res |
79 | 79 | ||
80 | let res = odeSolve brusselator [1.2, 3.1, 3.0] (fromList [0.0, 0.1 .. 10.0]) | 80 | let res = odeSolve brusselator [1.2, 3.1, 3.0] (fromList [0.0, 0.1 .. 10.0]) |
81 | putStrLn $ show res | 81 | putStrLn $ show res |
82 | renderRasterific "diagrams/brusselator.png" | 82 | renderRasterific "diagrams/brusselator.png" |
@@ -88,4 +88,3 @@ main = do | |||
88 | renderRasterific "diagrams/stiffish.png" | 88 | renderRasterific "diagrams/stiffish.png" |
89 | (D.dims2D 500.0 500.0) | 89 | (D.dims2D 500.0 500.0) |
90 | (renderAxis $ kSaxis $ zip [0.0, 0.1 .. 10.0] (concat $ toLists res)) | 90 | (renderAxis $ kSaxis $ zip [0.0, 0.1 .. 10.0] (concat $ toLists res)) |
91 | |||