summaryrefslogtreecommitdiff
path: root/3773/CH21/EX21.7
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3773/CH21/EX21.7
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3773/CH21/EX21.7')
-rw-r--r--3773/CH21/EX21.7/Ex21_7.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3773/CH21/EX21.7/Ex21_7.sce b/3773/CH21/EX21.7/Ex21_7.sce
new file mode 100644
index 000000000..1c1a93ca0
--- /dev/null
+++ b/3773/CH21/EX21.7/Ex21_7.sce
@@ -0,0 +1,22 @@
+//Chapter 21: Antenna Measurements
+//Example 21-5.2
+clc;
+
+//Variable Initialization
+f = 1.4e9 //Frequency (Hz)
+Tant = 687 //Increase in antenna temperature (K)
+phy_ap = 2210 //Physical aperture (m^2)
+S = 1590 //Flux density of Cygnus A (Jy)
+k = 1.38e-23 //Boltzmann's constant (J/k)
+c = 3e8 //Speed of light (m/s)
+
+//Calculations
+wave_lt = c/f //Wavelength (m)
+gain = (8*%pi*k*Tant)/(S*(10**-26)*wave_lt**2) //Gain(unitless)
+gain_db = 10*log10(gain) //Gain (dBi)
+Ae = gain*wave_lt**2/(4*%pi) //Effective area (m^2)
+eff_ap = Ae/phy_ap //Aperture efficiency (unitless)
+
+//Result
+mprintf("The gain of the antenna is %d dBi", gain_db)
+mprintf("\nThe aperture efficiency is %.2f or %.1f percent",eff_ap,eff_ap*100)