Graphics Programs Reference
In-Depth Information
% transform data to Cartesian coordinates.
xx = rhodb.*cos(theta);
yy = rhodb.*sin(theta);
% plot data on top of grid
if strcmp(line_style,'auto')
q = plot(xx,yy);
else
q = plot(xx,yy,line_style,'linewidth',1.5);
end
if nargout > 0
hpol = q;
end
if ~hold_state
set(gca,'dataaspectratio',[1 1 1]), axis off; set(cax,'NextPlot',next);
end
set(get(gca,'xlabel'),'visible','on')
set(get(gca,'ylabel'),'visible','on')
Listing 11.16. MATLAB Function "dbesselj.m"
function [ res ] = dbesselj( nu,z )
res=besselj(nu-1,z)-besselj(nu,z)*nu/z;
Listing 11.17. MATLAB Function "dbessely.m"
function [ res ] = dbessely( nu,z )
res=bessely(nu-1,z)-bessely(nu,z)*nu/z;
Listing 11.18. MATLAB Function "dbesselh.m"
function [ res ] = dbesselh(nu,kind,z)
res=besselh(nu-1,kind,z)-besselh(nu,kind,z)*nu/z;
Listing 11.19. MATLAB Program Ðrcs_cylinder_complex.mÑ
% This program computes the backscattered RCS for a cylinder
% with flat plates.
clear all
index = 0;
eps =0.00001;
a1 =.125;
h = 1.;
lambda = 3.0e+8 /9.5e+9;
lambda = 0.00861;
index = 0;
Search WWH ::




Custom Search