summaryrefslogtreecommitdiff
path: root/packages/sundials/src/helpers.h
diff options
context:
space:
mode:
authorDominic Steinitz <dominic@steinitz.org>2018-03-19 16:22:20 +0000
committerDominic Steinitz <dominic@steinitz.org>2018-03-19 16:22:20 +0000
commit15a2c146d677dea7c4e0d7a39cbd6c8e9edb658f (patch)
tree791db6e42312a7ec8c40a1a5e00b0dccfa6b206c /packages/sundials/src/helpers.h
parent5a51a987e014066d019473a68c1ceca9e30a348f (diff)
More removal of the Fortran way
Diffstat (limited to 'packages/sundials/src/helpers.h')
-rw-r--r--packages/sundials/src/helpers.h9
1 files changed, 0 insertions, 9 deletions
diff --git a/packages/sundials/src/helpers.h b/packages/sundials/src/helpers.h
index 7f4ba02..69a3dfe 100644
--- a/packages/sundials/src/helpers.h
+++ b/packages/sundials/src/helpers.h
@@ -21,14 +21,5 @@ typedef struct _N_VectorContent_Serial BazType;
21*/ 21*/
22int check_flag(void *flagvalue, const char *funcname, int opt); 22int check_flag(void *flagvalue, const char *funcname, int opt);
23 23
24/* f routine to compute the ODE RHS function f(t,y). */
25int f(realtype t, N_Vector y, N_Vector ydot, void *user_data);
26
27int FARKfi(realtype t, N_Vector y, N_Vector ydot, void *user_data);
28
29/* Jacobian routine to compute J(t,y) = df/dy. */
30int Jac(realtype t, N_Vector y, N_Vector fy, SUNMatrix J,
31 void *user_data, N_Vector tmp1, N_Vector tmp2, N_Vector tmp3);
32
33/* check the computed solution */ 24/* check the computed solution */
34int check_ans(N_Vector y, realtype t, realtype rtol, realtype atol); 25int check_ans(N_Vector y, realtype t, realtype rtol, realtype atol);