1 files changed, 16 insertions, 0 deletions
diff --git a/1991/CH4/EX4.6/6.sce b/1991/CH4/EX4.6/6.sce
new file mode 100755
index 000000000..7a09946e6
--- /dev/null
+++ b/1991/CH4/EX4.6/6.sce
@@ -0,0 +1,16 @@
+clc
+clear
+//INPUT DATA
+f=150 //frequency 
+v=320 //speed of sound
+ul=11 //speed with which listener approaches
+us=7 //speed of source
+//calculation
+fa=f*v/(v-us)//doppler effect
+fa1=(v+ul)*f/(v)//doppler effect
+fa2=(v+ul)*f/(v-us)//doppler effect
+//output
+printf("frequency when source moves at 7ms^-1 %3.3f Hz",fa)
+
+printf("\n frequency when listener moves at 11ms^-1 %3.3f Hz",fa1)
+printf("\n frequency when source moves at 7ms^-1 and listener at 11ms^-1 %3.3f Hz",fa2)