}
static inline double sinc(double x) {
- return gsl_sf_sinc(x / M_PI);
+ return gsl_sf_sinc(x / M_PI);
}
static int cb_f(const gsl_vector *x, void *params, gsl_vector *f) {
r = gsl_multiroot_fdfsolver_iterate(solver);
if (r) break;
+ printf("[");
+ for (i=0; i<6; i++) printf(" %.18g,", gsl_vector_get(solver->x, i));
+ for (i=0; i<6; i++) printf(" %.18g,", gsl_vector_get(solver->f, i));
+ printf(" ]\n");
+
r = gsl_multiroot_test_residual(solver->f, epsilon);
if (r != GSL_CONTINUE) break;
}
fprintf(stderr,"ERROR %s\n",gsl_strerror(r));
exit(-1);
}
+
+ printf("None\n");
}
}