From a062f03626d39feae041077d15c1df7f96cb621a Mon Sep 17 00:00:00 2001 From: stevenj Date: Wed, 7 Dec 2011 21:00:30 -0500 Subject: [PATCH] bug fix to convergence test (only relevant to sbplx); thanks to Douglas Bates Ignore-this: d163aaae150e0a9c8ae268109abdf48 darcs-hash:20111208020030-c8de0-0b3b621b4fbefb980ec7188f0a5be99a5b1d9adc.gz --- neldermead/nldrmd.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/neldermead/nldrmd.c b/neldermead/nldrmd.c index e89785f..685d3d3 100644 --- a/neldermead/nldrmd.c +++ b/neldermead/nldrmd.c @@ -175,7 +175,7 @@ nlopt_result nldrmd_minimize_(int n, nlopt_func f, void *f_data, *fdiff = fh - fl; if (init_diam == 0) /* initialize diam. for psi convergence test */ - for (i = 0; i < n; ++i) init_diam = fabs(xl[i] - xh[i]); + for (i = 0; i < n; ++i) init_diam += fabs(xl[i] - xh[i]); if (psi <= 0 && nlopt_stop_ftol(stop, fl, fh)) { ret = NLOPT_FTOL_REACHED; -- 2.30.2