diff options
Diffstat (limited to '3773/CH17/EX17.2/Ex17_2.sce')
-rw-r--r-- | 3773/CH17/EX17.2/Ex17_2.sce | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/3773/CH17/EX17.2/Ex17_2.sce b/3773/CH17/EX17.2/Ex17_2.sce new file mode 100644 index 000000000..8c14ef9b1 --- /dev/null +++ b/3773/CH17/EX17.2/Ex17_2.sce @@ -0,0 +1,25 @@ +//Chapter 17: Antenna Temperature, Remote Sensing and Radar Cross Section +//Example 17-1.2 +clc; + +//Variable Initialization +eff_aper = 500 //Antenna effective aperture (m^2) +wave_lt = 20e-2 //Wavelength (m) +Tsky = 10.0 //Sky temperature (K) +Tgnd = 300.0 //Ground temperature (K) +beam_eff = 0.7 //Beam efficiency (unitless) +aper_eff = 0.5 //Aperture efficiency (unitless) + +//Calculations +phy_aper = aper_eff/eff_aper //Physical aperture (m^2) +diam = 2*sqrt(phy_aper/%pi) //Antenna diameter (m) +diam_l = diam/wave_lt //Antenna diameter (lambda) + +ta_sky = Tsky*beam_eff //Sky contribution to antenna temp. (K) +ta_side = 0.5*Tsky*(1-beam_eff) //Side-lobe contribution to antenna temp. (K) +ta_back = 0.5*Tgnd*(1-beam_eff) //Back-lobe contribution to antenna temp. (K) + +Ta = ta_sky + ta_side + ta_back + +//Result +mprintf("The total antenna temperature is %.1f K", Ta) |