function y = polyval2(p,x)
%
y = p(1)*ones(size(x));
% if (length(p) == 1), return, end

for i = 2:length(p)
  y = y.*x + p(i);
end
end