function plot(p)
% POLYNOM/PLOT  PLOT(p) plots the polynom p.
r = max(abs(roots(p)));
x = (-1.1:.01:1.1)*r;
y = polyval(p,x);
plot(x,y);
title(char(p))
grid on