source: ETALON/simulations/FarZoneCriterium/pw_farZoneCrit.m @ 244

function result=pw_farZoneCrit(d,N,Name)
y=@(x)N^2*d*(1+cos(x));
theta=0:180;
theta=theta*pi/180;

fig = figure('visible', 'off');
plot(y(theta).*cos(theta),y(theta).*sin(theta), 'LineWidth', 2);
xlabel('Z , mm');
ylabel('Y , mm');
title({'Far zone criterium in ZY plane';['d =' num2str(d) 'mm N = ' num2str(N)]});
print( fig , '-dpng', [Name '_ZY.png']);
close(fig);

fig = figure('visible', 'off');
plot(theta*180/pi,y(theta), 'LineWidth', 2);
xlabel('\theta , deg');
ylabel('Criterium , mm');
grid on;
%grid minor;
title({'Far zone criterium related to theta';['d =' num2str(d) 'mm N = ' num2str(N)]});
print( fig , '-dpng', [Name '_theta.png']);
close(fig);

end