lasdmg.m

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

% High Energy Laser Anti-IR Missile System
% -----------------------------------------

clear;clc;clf;

% Input Range

R=500:5000;		% Range - m

% Input Seeker Parameters

Id=1e7;			% Seeker Damage Threshold - w/cm^2
Ac=10;			% Optics Aperture - cm^2
Ad=1e-4;			% Detector Area - cm^2
FOV=1e-8;		% Seeker Field-of View - steradians
ao=.7;			% Optics Transmission Factor

% Input Atmosphere Attenuation Factors

alt=[200 2000 5000 10000];	% Altitude - m
attn=[ .88 .37 .16 .05];	% Attenuation dB/km

% Laser Power Collected by Detector

Pdet=Ad*Id;		% Detector Power - w

% Find Laser Power to Damage Detector

for i=1:4;
   att=10.^(-attn(i)*R/1e4);
   Pl=(Pdet*FOV*(R*1e2).^2)./(ao*att*Ac);
   Px(:,i)=Pl';
end;

% Plot Required Laser Power

plot(R,Px/1000,'k');grid;
xlabel('Range - m');
ylabel('Laser Power - kw');
title('Laser Power to Damage Seeker IR Detector');