static void util_matrix(integer *n, realtype *a, realtype *r, realtype *c)
void findp_bisection_(integer *numc, realtype *cc, realtype *derivative, realtype *dt, realtype *accuracy, realtype *pi)
static void util_findp_bisection(integer *numc, realtype *cc, realtype *derivative, realtype *dt, realtype *accuracy, realtype *pi)
void matrix_(integer *n, realtype *a, realtype *r, realtype *c)