summaryrefslogtreecommitdiff
path: root/3532/CH5/EX5.9/Ex5_9.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3532/CH5/EX5.9/Ex5_9.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3532/CH5/EX5.9/Ex5_9.sce')
-rw-r--r--3532/CH5/EX5.9/Ex5_9.sce46
1 files changed, 46 insertions, 0 deletions
diff --git a/3532/CH5/EX5.9/Ex5_9.sce b/3532/CH5/EX5.9/Ex5_9.sce
new file mode 100644
index 000000000..3c7585937
--- /dev/null
+++ b/3532/CH5/EX5.9/Ex5_9.sce
@@ -0,0 +1,46 @@
+clc
+clear
+mprintf('Mechanical vibrations by G.K.Grover\n Example 5.7.2\n')
+//given data
+W1=220*2*%pi/60//vibrating frequency at 220 RPM (in rad/sec)
+W2=W1//frequency to which the spring mass system is tuned to.
+M2=1//mass in spring mass system in kgs
+N1=188//first resonant freq of spring mass system in cpm
+N2=258//second resonant freq of spring mass system in cpm
+//u=ratio of absorber mass to main mass i.e M2/M1
+//calculations
+K2=M2*W2^2
+Wn1=N1*2*%pi/60//first resonant freq of spring mass system in rad/sec
+Wn2=N2*2*%pi/60//second resonant freq of spring mass system in rad/sec
+//case 1
+W=Wn1
+x1=(W/W2)
+u1=[x1^2-1]^2/x1^2//from Eqn 5.7.9,Sec 5.7.1.
+//case 2
+W=Wn2
+x2=(W/W2)
+u2=[x2^2-1]^2/x2^2//from Eqn 5.7.9,Sec 5.7.1.
+//therefore
+u=(u1+u2)/2//which is equal to M2/M1
+M1=M2/u// mass of main system in kgs
+K1=K2/u//stiffness of main system in N/m
+//now
+Wn21=150*2*%pi/60//new first resonant frequency in rad/sec
+Wn22=310*2*%pi/60//new second resonant frequency in rad/sec
+W=Wn21
+x1=(W/W2)
+u1=[x1^2-1]^2/x1^2//from Eqn 5.7.9,Sec 5.7.1.
+//case 2
+W=Wn22
+x2=(W/W2)
+u2=[x2^2-1]^2/x2^2//from Eqn 5.7.9,Sec 5.7.1.
+//choosing the higher value
+if u1>u2 then
+ u=u1
+else
+ u=u2
+end
+M3=M1*u// mass of main system in kgs
+K3=K1*u//stiffness of main system in N/m
+//output
+mprintf(' The mass of main system required is %4.4f kgs\n stiffness of main system reqired is %5.5f N/m\n If the resonant frequencies lie outside the range of 150 to 310 rpm then\n mass of main system is %4.4f kgs\n stiffness of main system is %5.5f N/m',M1,K1,M3,K3)