Mercurial > hg > octave-nkf
comparison scripts/polynomial/polyderiv.m @ 904:3470f1e25a79
[project @ 1994-11-09 21:22:15 by jwe]
author | jwe |
---|---|
date | Wed, 09 Nov 1994 21:22:15 +0000 |
parents | e79ff1f4df3c |
children | f558749713f1 |
comparison
equal
deleted
inserted
replaced
903:b3692d63cca3 | 904:3470f1e25a79 |
---|---|
1 function p = polyderiv(p) | 1 function p = polyderiv(p) |
2 #polyderiv(c) | 2 |
3 #Returns the coefficients of the derivative of the polynomial whose | 3 # polyderiv(c) |
4 #coefficients are given by vector c. | 4 # Returns the coefficients of the derivative of the polynomial whose |
5 # coefficients are given by vector c. | |
5 # | 6 # |
6 #SEE ALSO: poly, polyinteg, polyreduce, roots, conv, deconv, residue, | 7 # SEE ALSO: poly, polyinteg, polyreduce, roots, conv, deconv, residue, |
7 # filter, polyval, polyvalm | 8 # filter, polyval, polyvalm |
8 | 9 |
9 # Author: | 10 # Author: |
10 # Tony Richardson | 11 # Tony Richardson |
11 # amr@mpl.ucsd.edu | 12 # amr@mpl.ucsd.edu |
12 # June 1994 | 13 # June 1994 |
13 | 14 |
14 if(nargin != 1) | 15 if(nargin != 1) |
15 error("usage: polyderiv(vector)"); | 16 usage ("polyderiv(vector)"); |
16 endif | 17 endif |
17 | 18 |
18 if(is_matrix(p)) | 19 if(is_matrix(p)) |
19 error("argument must be a vector"); | 20 error("argument must be a vector"); |
20 endif | 21 endif |