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

[project @ 1994-11-09 21:22:15 by jwe]
author jwe
date Wed, 09 Nov 1994 21:22:15 +0000
parents c5d35bb139b6
children f558749713f1
line wrap: on
line diff
--- a/scripts/polynomial/conv.m
+++ b/scripts/polynomial/conv.m
@@ -1,21 +1,20 @@
 function y = conv (a, b)
   
-  # Convolve two vectors.
-  # y = conv (a, b) returns a vector of length equal to length (a) +
-  # length (b) -1.
-  # If a and b are polynomial coefficient vectors, conv returns the
-  # coefficients of the product polynomial.
-  #
-  # SEE ALSO: deconv, poly, roots, residue, polyval, polyderiv,
-  # polyinteg 
+# Convolve two vectors.
+# y = conv (a, b) returns a vector of length equal to length (a) +
+# length (b) -1.
+# If a and b are polynomial coefficient vectors, conv returns the
+# coefficients of the product polynomial.
+#
+# SEE ALSO: deconv, poly, roots, residue, polyval, polyderiv, polyinteg 
 
-  # Author:
-  #  Tony Richardson
-  #  amr@mpl.ucsd.edu
-  #  June 1994
+# Author:
+#  Tony Richardson
+#  amr@mpl.ucsd.edu
+#  June 1994
 
   if (nargin != 2)
-    error ("usage:  conv(a,b)");
+    usage (" conv(a,b)");
   endif
 
   if (is_matrix(a) || is_matrix(b))