diff options
| author | Dominic Steinitz <dominic@steinitz.org> | 2018-03-28 18:50:54 +0100 |
|---|---|---|
| committer | Dominic Steinitz <dominic@steinitz.org> | 2018-03-28 18:50:54 +0100 |
| commit | 6148374bbf11e443ed3c64eb4add3f20d612f362 (patch) | |
| tree | c8e14a7f8a0ea85fda3c151d3beb77a0ee534b56 /packages/sundials/src/Main.hs | |
| parent | 8612df2834fa652e6f9ab9b6e18617b6eac267a6 (diff) | |
Make more methods available
Diffstat (limited to 'packages/sundials/src/Main.hs')
| -rw-r--r-- | packages/sundials/src/Main.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/packages/sundials/src/Main.hs b/packages/sundials/src/Main.hs index c81d1a3..71bcbac 100644 --- a/packages/sundials/src/Main.hs +++ b/packages/sundials/src/Main.hs | |||
| @@ -73,17 +73,17 @@ main = do | |||
| 73 | -- \end{array} | 73 | -- \end{array} |
| 74 | -- $$ | 74 | -- $$ |
| 75 | 75 | ||
| 76 | let res = btGet | 76 | let res = btGet SDIRK_2_1_2 |
| 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 KVAERNO_4_2_3 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" |
| 83 | (D.dims2D 500.0 500.0) | 83 | (D.dims2D 500.0 500.0) |
| 84 | (renderAxis $ lSaxis $ [0.0, 0.1 .. 10.0]:(toLists $ tr res)) | 84 | (renderAxis $ lSaxis $ [0.0, 0.1 .. 10.0]:(toLists $ tr res)) |
| 85 | 85 | ||
| 86 | let res = odeSolve stiffish [0.0] (fromList [0.0, 0.1 .. 10.0]) | 86 | let res = odeSolve KVAERNO_4_2_3 stiffish [0.0] (fromList [0.0, 0.1 .. 10.0]) |
| 87 | putStrLn $ show res | 87 | putStrLn $ show res |
| 88 | renderRasterific "diagrams/stiffish.png" | 88 | renderRasterific "diagrams/stiffish.png" |
| 89 | (D.dims2D 500.0 500.0) | 89 | (D.dims2D 500.0 500.0) |