Now calling a part of the Haskell ODE

1 files changed, 2 insertions, 0 deletions

diff --git a/packages/sundials/src/helpers.h b/packages/sundials/src/helpers.h
index 87b0c81..3b50163 100644
--- a/packages/sundials/src/helpers.h
+++ b/packages/sundials/src/helpers.h
@@ -21,6 +21,8 @@ int check_flag(void *flagvalue, const char *funcname, int opt);
 /* f routine to compute the ODE RHS function f(t,y). */
 int f(realtype t, N_Vector y, N_Vector ydot, void *user_data);
 
+int FARKfi(realtype t, N_Vector y, N_Vector ydot, void *user_data);
+
 /* Jacobian routine to compute J(t,y) = df/dy. */
 int Jac(realtype t, N_Vector y, N_Vector fy, SUNMatrix J,
         void *user_data, N_Vector tmp1, N_Vector tmp2, N_Vector tmp3);