Mercurial > hg > octave-lyh
comparison scripts/polynomial/polyderiv.m @ 4030:22bd65326ec1
[project @ 2002-08-09 18:58:13 by jwe]
author | jwe |
---|---|
date | Fri, 09 Aug 2002 19:00:16 +0000 |
parents | e031284eea27 |
children | c08cb1098afc |
comparison
equal
deleted
inserted
replaced
4029:2cc57b6169cf | 4030:22bd65326ec1 |
---|---|
33 | 33 |
34 if (nargin != 1) | 34 if (nargin != 1) |
35 usage ("polyderiv (vector)"); | 35 usage ("polyderiv (vector)"); |
36 endif | 36 endif |
37 | 37 |
38 if (! is_vector (p)) | 38 if (! isvector (p)) |
39 error ("polyderiv: argument must be a vector"); | 39 error ("polyderiv: argument must be a vector"); |
40 endif | 40 endif |
41 | 41 |
42 lp = length (p); | 42 lp = length (p); |
43 if (lp == 1) | 43 if (lp == 1) |