1 files changed, 14 insertions, 0 deletions
diff --git a/2219/CH7/EX7.5/Ex7_5.sce b/2219/CH7/EX7.5/Ex7_5.sce
new file mode 100755
index 000000000..8c042dcdd
--- /dev/null
+++ b/2219/CH7/EX7.5/Ex7_5.sce
@@ -0,0 +1,14 @@
+// chapter 7 example 5
+//-----------------------------------------------------------------------------
+clc;
+clear;
+// given data
+Ptot        = 100;      // certain antenna radiating power
+Ptot_iso    = 10*10^3;  // isotropic antenna radiating power
+
+// Calculations
+D           = 10*log10(Ptot_iso/Ptot);  // Directivity of antenna
+
+// Output
+mprintf('Directivity of antenna = %d dB',D);
+//------------------------------------------------------------------------------