summaryrefslogtreecommitdiff
path: root/3788/CH10/EX10.6.1/Ex10_6_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3788/CH10/EX10.6.1/Ex10_6_1.sce')
-rw-r--r--3788/CH10/EX10.6.1/Ex10_6_1.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3788/CH10/EX10.6.1/Ex10_6_1.sce b/3788/CH10/EX10.6.1/Ex10_6_1.sce
new file mode 100644
index 000000000..ec1e5f619
--- /dev/null
+++ b/3788/CH10/EX10.6.1/Ex10_6_1.sce
@@ -0,0 +1,21 @@
+//Example 10.6.1
+//Length and gain of Satellite
+clc
+clear
+height=750
+theta=10
+SEC=theta + 90
+re=6378
+rs=re + 750
+del = asind(re*(sind(SEC)/rs))
+Y=180-100-del
+Yradian=Y*(%pi/180)
+
+ArcEZ=re*Yradian
+Diameter=2*ArcEZ
+printf("Length of coverage region is %f km \n",Diameter)
+
+Beamwidth=2*del
+Gain=33000/Beamwidth^2
+G=10*log10(Gain)
+printf("Gain of Satellite Antenna is %f dB",G)