21#define N_DIFFEQ_RETURNS 8
26} diffeq_return[N_DIFFEQ_RETURNS] = {
27 {-4,
"exit condition failure"},
28 {-3,
"zero stepsize"},
29 {-2,
"can't take initial step"},
30 {-1,
"solution stepped outside of integration interval"},
31 {0,
"initial independent variable value greater than desired final value"},
32 {1,
"differential equations solved already"},
33 {2,
"zero of exit-function found"},
34 {3,
"end of integration interval reached"}};
35static char *unknown =
"unknown error";
49 for (i = 0; i < N_DIFFEQ_RETURNS; i++) {
50 if (result_code == diffeq_return[i].code)
51 return (diffeq_return[i].description);
char * diffeq_result_description(long result_code)
Return a descriptive string for a given differential equation result code.