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