disp(' Prüfung SS 1999 Aufgabe 2 ');
% 27.06.2001
%
g1=[j,j,1];
g2=[j,j,2];
g=conv(g1,g1);   % conv(a,b)->PolynomMultiplikation
w=0:0.02:2;
poly=polyval(g,w);
poly1_=1./polyval(g,w);
%
% Variante 1
Re=abs(poly).*cos(angle(poly));
Im=abs(poly).*sin(angle(poly));
Re1_=abs(poly1_).*cos(angle(poly1_));
Im1_=abs(poly1_).*sin(angle(poly1_));
%
plot(Re,Im,'r',Re1_,Im1_,'g')
grid
zoom on
%
% Variante 2
%figure(2)            % öffnet eine zweite Grafik
%plot(poly,'r')
%grid
%zoom on
%hold on
%plot(poly1_,'g')