1 files changed, 15 insertions, 0 deletions
diff --git a/1997/CH9/EX9.25/example25.sce b/1997/CH9/EX9.25/example25.sce
new file mode 100755
index 000000000..d0560a020
--- /dev/null
+++ b/1997/CH9/EX9.25/example25.sce
@@ -0,0 +1,15 @@
+//Chapter-9 example 25
+//=============================================================================
+clc;
+clear;
+//input data
+F     = 200*10^6;//radar operating frequency in hz
+Vo    = 3*10^8;//velocity of EM wave in m/s
+D     = 1.5;//Directivity of the Hertzian dipole
+//Calculations
+lamda = Vo/F;//wavelength
+Ae    = (lamda^2*D)/(4*%pi);//effective area of antenna
+//Output
+mprintf('Effective Area of the antenna is %3.4f m^2',Ae);
+
+//=============end of the program==============================================