removed 1e6 in expression forcing a non-singular Jacobian

2014-09-30 08:13:31 +02:00 · 2014-09-30 08:13:31 +02:00 · 6bbfa2fa6d
parent 8f47c731dc
commit 6bbfa2fa6d
1 changed files with 1 additions and 1 deletions
--- a/matlab/solve1.m
+++ b/matlab/solve1.m
@ -101,7 +101,7 @@ for its = 1:maxit
    end
    if rcond_fjac < sqrt(eps)
        fjac2=fjac'*fjac;
-        p=-(fjac2+1e6*sqrt(nn*eps)*max(sum(abs(fjac2)))*eye(nn))\(fjac'*fvec);
+        p=-(fjac2+sqrt(nn*eps)*max(sum(abs(fjac2)))*eye(nn))\(fjac'*fvec);
    else
        p = -fjac\fvec ;
    end