summaryrefslogtreecommitdiff
path: root/3532/CH4/EX4.4.3/Ex4_7.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3532/CH4/EX4.4.3/Ex4_7.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/CH4/EX4.4.3/Ex4_7.sce')
-rw-r--r--3532/CH4/EX4.4.3/Ex4_7.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3532/CH4/EX4.4.3/Ex4_7.sce b/3532/CH4/EX4.4.3/Ex4_7.sce
new file mode 100644
index 000000000..975af1a15
--- /dev/null
+++ b/3532/CH4/EX4.4.3/Ex4_7.sce
@@ -0,0 +1,19 @@
+clc
+clear
+mprintf('Mechanical vibrations by G.K.Grover\n Example 4.4.3\n')
+//given data
+delst=0.1//steady state defln in m
+g=9.81//acceleration due to gravity
+Y=0.08//amp of vibration of automobile in m
+lambda=14//wavelenght of profile in m
+//calculations
+Wn=sqrt(g/delst)
+fn=Wn/(2*%pi)//frequency of vibration of automobile in Hz
+Vc=(3600/1000)*lambda*fn//critical speed in km/hr
+V=60 //speed in km/hr
+W=V*(1000/3600)*(2*%pi/lambda)
+bet=(W/Wn)
+zeta=0
+X=Y*(sqrt(1+(2*zeta*bet)^2)/sqrt((1-bet^2)^2+(2*zeta*bet)^2))//Eqn (4.4.6)
+//output
+mprintf(' The critical speed of automobile %4.4f km/hr\n The amplitude of vibration at 60 Km/Hr is %4.4f m',Vc,X)