Mercurial > hg > octave-nkf

diff scripts/sparse/pcr.m @ 6498:2c85044aa63f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-04-05 17:59:47 by jwe]
author jwe
date Thu, 05 Apr 2007 17:59:47 +0000
parents 376e02b2ce70
children 8b0cfeb06365
line wrap: on
line diff
--- a/scripts/sparse/pcr.m
+++ b/scripts/sparse/pcr.m
@@ -279,20 +279,20 @@
   if (iter >= maxit-2)
     flag = 1;
     if (nargout < 2)
-      warning ("PCR: maximum number of iterations (%d) reached\n", iter);
-      warning ("The initial residual norm was reduced %g times.\n", 1.0/relres);
+      warning ("pcr: maximum number of iterations (%d) reached\n", iter);
+      warning ("the initial residual norm was reduced %g times.\n", 1.0/relres);
     endif
   elseif (nargout < 2 && ! breakdown)
-    fprintf (stderr, "PCR: converged in %d iterations. \n", iter);
-    fprintf (stderr, "The initial residual norm was reduced %g times.\n",
+    fprintf (stderr, "pcr: converged in %d iterations. \n", iter);
+    fprintf (stderr, "the initial residual norm was reduced %g times.\n",
 	     1.0/relres);
   endif
 
   if (breakdown)
     flag = 3;
     if (nargout < 2)
-      warning ("PCR: breakdown occured.\n");
-      warning ("System matrix singular or preconditioner indefinite?\n");
+      warning ("pcr: breakdown occured:\n");
+      warning ("system matrix singular or preconditioner indefinite?\n");
     endif
   endif