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