summaryrefslogtreecommitdiff
path: root/3773/CH17/EX17.6/Ex17_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '3773/CH17/EX17.6/Ex17_6.sce')
-rw-r--r--3773/CH17/EX17.6/Ex17_6.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3773/CH17/EX17.6/Ex17_6.sce b/3773/CH17/EX17.6/Ex17_6.sce
new file mode 100644
index 000000000..0aa1c0bc9
--- /dev/null
+++ b/3773/CH17/EX17.6/Ex17_6.sce
@@ -0,0 +1,14 @@
+//Chapter 17: Antenna Temperature, Remote Sensing and Radar Cross Section
+//Example 17-4.1
+clc;
+
+//Variable Initialization
+tf = 0.693 //Absorption co-efficient (unitless)
+Te = 305 //Earth temperature (K)
+Ta = 300 //Satellite antenna temperature (K)
+
+//Calculations
+Tf = (Ta - Te*exp(-tf))/(1-exp(-tf))
+
+//Result
+mprintf("The forest temperature is %.0f K", Tf)