void FCVf(realtype t, N_Vector y, N_Vector ydot, void *f_data) { realtype *ydata, *dydata; ydata = N_VGetArrayPointer(y); dydata = N_VGetArrayPointer(ydot); FCV_FUN(&t, ydata, dydata); }
int FCVf(realtype t, N_Vector y, N_Vector ydot, void *user_data) { int ier; realtype *ydata, *dydata; FCVUserData CV_userdata; ydata = N_VGetArrayPointer(y); dydata = N_VGetArrayPointer(ydot); CV_userdata = (FCVUserData) user_data; FCV_FUN(&t, ydata, dydata, CV_userdata->ipar, CV_userdata->rpar, &ier); return(ier); }