Mercurial > hg > octave-nkf

diff scripts/polynomial/polyderiv.m @ 904:3470f1e25a79

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-11-09 21:22:15 by jwe]
author jwe
date Wed, 09 Nov 1994 21:22:15 +0000
parents e79ff1f4df3c
children f558749713f1
line wrap: on
line diff
--- a/scripts/polynomial/polyderiv.m
+++ b/scripts/polynomial/polyderiv.m
@@ -1,10 +1,11 @@
 function p = polyderiv(p)
-#polyderiv(c)
-#Returns the coefficients of the derivative of the polynomial whose
-#coefficients are given by vector c.
+
+# polyderiv(c)
+# Returns the coefficients of the derivative of the polynomial whose
+# coefficients are given by vector c.
 #
-#SEE ALSO: poly, polyinteg, polyreduce, roots, conv, deconv, residue,
-#          filter, polyval, polyvalm
+# SEE ALSO: poly, polyinteg, polyreduce, roots, conv, deconv, residue,
+#           filter, polyval, polyvalm
 
 # Author:
 #  Tony Richardson
@@ -12,7 +13,7 @@
 #  June 1994
 
   if(nargin != 1)
-    error("usage: polyderiv(vector)");
+    usage ("polyderiv(vector)");
   endif
 
   if(is_matrix(p))