summaryrefslogtreecommitdiff
path: root/3773/CH17/EX17.1/Ex17_1.sce
blob: bbc10b1ae11b861252d1ffefc3e62f216888d018 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//Chapter 17: Antenna Temperature, Remote Sensing and Radar Cross Section
//Example 17-1.1
clc;

//Variable Initialization
Ta = 0.24   //Antenna temperature (K)
ang = 0.005     //Subtended angle (degrees)
hpbw = 0.116    //Antenna half power beamwidth (degrees)

//Calculations
Ts = Ta*(hpbw**2)/(%pi*(ang**2/4))

//Result
mprintf("The average temperature of the surface is %d K", Ts)