Mercurial > octave-nkf
changeset 9075:7b35d3b21c1c
fix test in fsolve
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Thu, 02 Apr 2009 11:35:56 +0200 |
| parents | 46a0e6e9e446 |
| children | d5a4aa53f03a |
| files | scripts/ChangeLog scripts/optimization/fsolve.m |
| diffstat | 2 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog Wed Apr 01 13:49:15 2009 +0200 +++ b/scripts/ChangeLog Thu Apr 02 11:35:56 2009 +0200 @@ -1,3 +1,7 @@ +2009-04-02 Jaroslav Hajek <highegg@gmail.com> + + * optimization/fsolve.m: Fix test. + 2009-03-30 Ben Abbott <bpabbott@mac.com> * plot/__go_draw_axes__.m: New subfunction create_fontspec(). Allow
--- a/scripts/optimization/fsolve.m Wed Apr 01 13:49:15 2009 +0200 +++ b/scripts/optimization/fsolve.m Thu Apr 02 11:35:56 2009 +0200 @@ -356,7 +356,7 @@ if (fn <= tolf*n*xn) info = 1; ## The following tests done only after successful step. - elseif (actred > 0) + elseif (ratio >= 1e-4) ## This one is classic. Note that we use scaled variables again, ## but compare to scaled step, so nothing bad. if (sn <= tolx*xn)