Radar Cross Section (RCS) - MATLAB Simulations for Radar Systems Design - page 574

view(45,60);
shading interp;
xlabel('x');
ylabel('y');
zlabel('E_z');
colorbar; colormap(copper); % colormap(jet);
title('Near Field (Ez) [Plane wave excitation]');
figure(7);
surf(x,y,377*abs(HrhoPW));
axis ('equal');
view(45,60);
shading interp;
xlabel('x');
ylabel('y');
zlabel('\eta_o H\rho');
title('\eta_o H\rho [Plane wave excitation]');
colorbar; colormap(copper); % colormap(jet);
figure(8);
surf(x,y,377*abs(HphiPW));
axis ('equal');
view(45,60);
shading interp;
xlabel('x');
ylabel('y');
zlabel('\eta_o H\phi');
title('\eta_o H\phi [Plane wave excitation]');
colorbar; colormap(copper); % colormap(jet);
Listing 11.13. MATLAB Function
"DielCappedWedgeTMFields_Ls.m"
function [Ezt,Hphit,Hrhot] =
DielCappedWedgeTMFields_Ls(v,m,rhoij,phiij,rhop,phip,ar,k,k1,alpha,beta,a,
b,c,d);
% Function to calculate the near field components of a capped wedge
% with a line source excitation at one near field point
% This function is to be called by the Main program:
Diel_Capped_WedgeTM.m
% By: Dr. Atef Elsherbeni -- [e-mail]
% Last modified July 23, 2003
Ezt = 0; Hrhot = 0; Hphit = 0; % Initialization
if phiij > alpha & phiij < 2*pi-beta % outside the wedge region
krho = k*rhoij;
k1rho = k1*rhoij;