--- a/scripts/polynomial/polyval.m	Wed Nov 09 20:02:47 1994 +0000
+++ b/scripts/polynomial/polyval.m	Wed Nov 09 21:22:15 1994 +0000
@@ -1,19 +1,20 @@
 function y = polyval(c,x)
-#Evaluate a polynomial.
-#
-#In octave, a polynomial is represented by it's coefficients (arranged
-#in descending order). For example a vector c of length n+1 corresponds
-#to the following nth order polynomial
-#
-#  p(x) = c(1) x^n + ... + c(n) x + c(n+1).
-#
-#polyval(c,x) will evaluate the polynomial at the specified value of x.
-#
-#If x is a vector or matrix, the polynomial is evaluated at each of the
-#elements of x.
-#
-#SEE ALSO: polyvalm, poly, roots, conv, deconv, residue, filter,
-#          polyderiv, polyinteg
+
+# Evaluate a polynomial.
+# 
+# In octave, a polynomial is represented by it's coefficients (arranged
+# in descending order). For example a vector c of length n+1 corresponds
+# to the following nth order polynomial
+# 
+#   p(x) = c(1) x^n + ... + c(n) x + c(n+1).
+# 
+# polyval(c,x) will evaluate the polynomial at the specified value of x.
+# 
+# If x is a vector or matrix, the polynomial is evaluated at each of the
+# elements of x.
+# 
+# SEE ALSO: polyvalm, poly, roots, conv, deconv, residue, filter,
+#           polyderiv, polyinteg
 
 # Author:
 #  Tony Richardson
@@ -21,7 +22,7 @@
 #  June 1994
 
   if(nargin != 2)
-    error("usage: polyval(c,x)");
+    usage ("polyval(c,x)");
   endif
 
   if(is_matrix(c))