diff options
Diffstat (limited to 'packages/sundials/src/Main.hs')
-rw-r--r-- | packages/sundials/src/Main.hs | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/packages/sundials/src/Main.hs b/packages/sundials/src/Main.hs index ac19e7f..d22fafa 100644 --- a/packages/sundials/src/Main.hs +++ b/packages/sundials/src/Main.hs | |||
@@ -121,17 +121,17 @@ main = do | |||
121 | -- \end{array} | 121 | -- \end{array} |
122 | -- $$ | 122 | -- $$ |
123 | 123 | ||
124 | -- let res = btGet (SDIRK_2_1_2 undefined) | 124 | let res = btGet (SDIRK_2_1_2 undefined) |
125 | -- putStrLn $ show res | 125 | putStrLn $ show res |
126 | -- putStrLn $ butcherTableauTex res | 126 | putStrLn $ butcherTableauTex $ fst res |
127 | 127 | ||
128 | -- let res = btGet (KVAERNO_4_2_3 undefined) | 128 | let res = btGet (KVAERNO_4_2_3 undefined) |
129 | -- putStrLn $ show res | 129 | putStrLn $ show res |
130 | -- putStrLn $ butcherTableauTex res | 130 | putStrLn $ butcherTableauTex $ fst res |
131 | 131 | ||
132 | -- let res = btGet (SDIRK_5_3_4 undefined) | 132 | let res = btGet (SDIRK_5_3_4 undefined) |
133 | -- putStrLn $ show res | 133 | putStrLn $ show res |
134 | -- putStrLn $ butcherTableauTex res | 134 | putStrLn $ butcherTableauTex $ fst res |
135 | 135 | ||
136 | let res1 = odeSolve brusselator [1.2, 3.1, 3.0] (fromList [0.0, 0.1 .. 10.0]) | 136 | let res1 = odeSolve brusselator [1.2, 3.1, 3.0] (fromList [0.0, 0.1 .. 10.0]) |
137 | renderRasterific "diagrams/brusselator.png" | 137 | renderRasterific "diagrams/brusselator.png" |