angfp.m

来自「此程序给出了不同情况的雷达距离测量仿真平台」· M 代码 · 共 33 行

% Maximum RCS of Flat Plate as Function
% of Angle from Perpendicular
% -------------------------------------

clear;clc;clf;

% Input Plate Width

wx=[.0375 .075 .15];			% Plate Width - m

% Input Angle

phi=0:.1:90;
phir=phi*pi/180+1e-12;

% Find Maximum RCS with Angle

for i=1:3;
   w=wx(i);
   Rcs=w.^2./(pi*(tan(phir)).^2);
   Rcsx(:,i)=Rcs';
end;


% Plot RCS vs Angle

semilogy(phi,Rcsx);grid;
axis([0 90 1e-4 1e4]);
xlabel('Angle - deg');
ylabel('RCS - m^2');
title('Maximum RCS of Flat Plate');