summaryrefslogtreecommitdiff
path: root/3739/CH5/EX5.4/EX5_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3739/CH5/EX5.4/EX5_4.sce')
-rw-r--r--3739/CH5/EX5.4/EX5_4.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/3739/CH5/EX5.4/EX5_4.sce b/3739/CH5/EX5.4/EX5_4.sce
new file mode 100644
index 000000000..81b32519b
--- /dev/null
+++ b/3739/CH5/EX5.4/EX5_4.sce
@@ -0,0 +1,27 @@
+//Chapter 5, Example 5.4, page 192
+clc
+//Initialisation
+f=0.5 //frequency in MHz
+Pa=100 //transmitter power
+Po=1000
+e120=68 //from figure 5.10
+e220=85 //from figure 5.9
+e230=80
+e330=60 //from figure 5.10
+e380=48
+e350=50 //from figure 5.10
+e250=75 //from figure 5.9
+e260=73
+e160=60 //from figure 5.10
+e180=48
+
+//Calculation
+ETR=e120-e220+e230-e330+e380
+ERT=e350-e250+e260-e160+e180 //The answer provided in the textbook is wrong
+ER=(ETR+ERT)/2 //The answer provided in the textbook is wrong
+Ea=ER+(10*log10(Pa*Po**-1))
+lb=137.2+(20*log10(f))-ER
+
+//Results
+printf("(1) Electric field = %.1f dB",Ea) //The answer provided in the textbook is wrong
+printf("\n(2) Basic loss path = %.1f dB",lb) //The answer provided in the textbook is wrong