Mercurial > hg > octave-lyh

diff scripts/polynomial/poly.m @ 6046:34f96dd5441b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-10 16:10:25 by jwe]
author jwe
date Tue, 10 Oct 2006 16:10:31 +0000
parents 2a16423e4aa0
children 9398f6a81bdf
line wrap: on
line diff
--- a/scripts/polynomial/poly.m
+++ b/scripts/polynomial/poly.m
@@ -33,7 +33,7 @@
 function y = poly (x)
 
   if (nargin != 1)
-    usage ("poly (x)");
+    print_usage ();
   endif
 
   m = min (size (x));
@@ -46,7 +46,7 @@
   elseif (m == n)
     v = eig (x);
   else
-    usage ("poly (x), where x is a vector or a square matrix");
+    print_usage ();
   endif
 
   y = zeros (1, n+1);