From abb1d8f7cdfdd69f7539860d73d2c9bae5a21467 Mon Sep 17 00:00:00 2001 From: stevenj Date: Mon, 3 Sep 2007 15:22:07 -0400 Subject: [PATCH] bug fix in grosenbrock gradient (no wonder StoGO etc. were so bad for this functioon) darcs-hash:20070903192207-c8de0-cef32242ac0bc7308b24d07ae31e2e9e1c6c463a.gz --- test/testfuncs.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/testfuncs.c b/test/testfuncs.c index cff3097..3865e20 100644 --- a/test/testfuncs.c +++ b/test/testfuncs.c @@ -125,7 +125,7 @@ static double grosenbrock_f(int n, const double *x, double *grad, void *data) double a = x[i+1] - x[i] * x[i], b = 1 - x[i]; if (grad) { grad[i] += -400 * a * x[i] - 2*b; - grad[i+1] = -200 * a; + grad[i+1] = 200 * a; } f += 100 * sqr(a) + sqr(b); } -- 2.30.2