From a39181c317b3b5d6accc3248b0d39c794f06a1f8 Mon Sep 17 00:00:00 2001 From: stevenj Date: Tue, 19 Aug 2008 19:07:31 -0400 Subject: [PATCH] fix evil bug in MMA dual function that was leading to incorrect gradient and lots of weird behavior darcs-hash:20080819230731-c8de0-7391e5affc386c4aeb217382cf4c872eebb4c095.gz --- mma/mma.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mma/mma.c b/mma/mma.c index 7dae61b..4658cf5 100644 --- a/mma/mma.c +++ b/mma/mma.c @@ -99,7 +99,7 @@ static double dual_func(int m, const double *y, double *grad, void *d_) d->wval += 0.5 * dx2 * denominv; for (i = 0; i < m; ++i) gcval[i] += (dfcdx[i*n+j] * c + (fabs(dfcdx[i*n+j])*sigma[j] - + 0.5*rhoc[j]) * dx2) + + 0.5*rhoc[i]) * dx2) * denominv; } -- 2.30.2