t=linspace(-3,3,60);
z=complex(t,t.^2);
a=linspace(0,2*pi);
hold on; axis equal;
for k=1:60 plot(z(k)+2*exp(i*a));end;
tr=[sqrt(15)/2,-sqrt(15)/2,1.84922777771,-1.84922777771,0.627838362823,-0.627838362823];
zr=complex(tr,tr.^2);
for k=1:6 plot(zr(k)+2*exp(i*a),'r');end;
print "famiglia2.pdf";
quit;
