1 files changed, 18 insertions, 0 deletions
diff --git a/1997/CH1/EX1.5/example5.sce b/1997/CH1/EX1.5/example5.sce
new file mode 100755
index 000000000..0c64cc840
--- /dev/null
+++ b/1997/CH1/EX1.5/example5.sce
@@ -0,0 +1,18 @@
+//Chapter-1, Example 1.5, Page 36
+//=============================================================================
+clc;
+clear;
+
+//INPUT DATA
+F= 6*10^9;  //frequency in Hz
+Vo = 3*10^8;//velocity in m/s;
+Vr = 200;//Radial velocity in kmph
+
+//Calculations
+
+lamda = Vo/F;//wavelength = vel/freq;
+Fd    = (2*Vr/lamda)*(5/18);//doppler frequency in Hz;
+//5/18 is multiplied to convert kmph to m/s
+
+//Output
+mprintf('Doppler Frequency is %3.2f KHz',Fd/1000);