summaryrefslogtreecommitdiff
path: root/3532/CH1/EX1.4/Ex1_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3532/CH1/EX1.4/Ex1_4.sce')
-rw-r--r--3532/CH1/EX1.4/Ex1_4.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3532/CH1/EX1.4/Ex1_4.sce b/3532/CH1/EX1.4/Ex1_4.sce
new file mode 100644
index 000000000..a9383af80
--- /dev/null
+++ b/3532/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,17 @@
+clc
+clear
+mprintf('Mechanical vibrations by G.K.Grover\n Example 1.5.1\n')
+//given data
+//x1=a*sin(W1*t)
+//x2=b*sin(W2*t)
+//calculations
+a=1.90//amplitude of first wave in cm
+b=2.00//amplitude of second wave in cm
+W1=9.5//frequency of first wave in rad/sec
+W2=10.0//frequency of second wave in rad/sec
+xmax=b+a//maximum amplitude of motion in cms
+xmin=abs(a-b)//minimum amplitude of motion in cms
+f=abs(W1-W2)/(2*%pi)//beat frequency in Hz
+t=1/f//time period of beat in sec
+//output
+mprintf('The maximum amplitude of motion is %4.4f cms\nThe minimum amplitude of motion is %4.4f cms\n The beat frequency is %4.4f Hz\n the time period is %4.4f sec',xmax,xmin,f,t)