Mercurial > hg > octave-lyh

diff scripts/polynomial/polyinteg.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 4e826edfbc56
children f558749713f1
line wrap: on
line diff
--- a/scripts/polynomial/polyinteg.m
+++ b/scripts/polynomial/polyinteg.m
@@ -1,12 +1,13 @@
 function p = polyinteg(p)
-#polyinteg(c)
-#Returns the coefficients of the integral the polynomial whose coefficients
-#are represented by the vector c.
+
+# polyinteg(c)
+# Returns the coefficients of the integral the polynomial whose coefficients
+# are represented by the vector c.
 #
-#The constant of integration is zero.
+# The constant of integration is zero.
 #
-#SEE ALSO: poly, polyderiv, polyreduce, roots, conv, deconv, residue,
-#          filter, polyval, polyvalm
+# SEE ALSO: poly, polyderiv, polyreduce, roots, conv, deconv, residue,
+#           filter, polyval, polyvalm
 
 # Author:
 #  Tony Richardson
@@ -14,7 +15,7 @@
 #  June 1994
 
   if(nargin != 1)
-    error("usage: polyinteg(vector)");
+    usage ("polyinteg(vector)");
   endif
 
   if(is_matrix(p))