Mercurial > hg > octave-lyh

diff scripts/optimization/fzero.m @ 8468:866492035ecf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fsolve.m, fzero.m: undo part of previous change
author John W. Eaton <jwe@octave.org>
date Mon, 12 Jan 2009 13:32:12 -0500
parents 77b8d4aa2743
children cadc73247d65
line wrap: on
line diff
--- a/scripts/optimization/fzero.m
+++ b/scripts/optimization/fzero.m
@@ -124,7 +124,7 @@
   endif
 
   if (! (sign (fa) * sign (fb) <= 0))
-    error ("fzero: not a valid initial bracketing");
+    error ("fzero:bracket", "fzero: not a valid initial bracketing");
   endif
 
   itype = 1;
@@ -242,7 +242,7 @@
       break;
     else
       ## this should never happen.
-      error ("fzero: zero point is not bracketed");
+      error ("fzero:bracket", "fzero: zero point is not bracketed");
     endif
 
     ## if there's an output function, use it now
@@ -288,9 +288,9 @@
   fx = fun (x);
   fx = fx(1);
   if (! isreal (fx))
-    error ("fzero: non-real value encountered"); 
+    error ("fzero:notreal", "fzero: non-real value encountered"); 
   elseif (isnan (fx))
-    error ("fzero: NaN value encountered"); 
+    error ("fzero:isnan", "fzero: NaN value encountered"); 
   endif
 endfunction