diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3594/CH15/EX15.9/Ex15_9.sce | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip |
initial commit / add all books
Diffstat (limited to '3594/CH15/EX15.9/Ex15_9.sce')
-rw-r--r-- | 3594/CH15/EX15.9/Ex15_9.sce | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/3594/CH15/EX15.9/Ex15_9.sce b/3594/CH15/EX15.9/Ex15_9.sce new file mode 100644 index 000000000..84df93a92 --- /dev/null +++ b/3594/CH15/EX15.9/Ex15_9.sce @@ -0,0 +1,25 @@ +//To find the frequencies of the free torsional vibrations of the system
+clc
+//given
+Ia=2.5//ton ft^2
+Ib=7.5//ton ft^2
+Ic=3//ton ft^2
+g=32.2//ft/s^2
+AB=9.5//ft
+BC=25//ft
+d=8.5//in
+C=11.8*10^6//lb/in^2
+k=Ic/Ia//la/lc=k
+lc1=(25.6+(25.6^2-4*114.1)^(1/2))/2//from 1 and 2 , reducing using quadratic formula
+lc2=(25.6-(25.6^2-4*114.1)^(1/2))/2//from 1 and 2 , reducing using quadratic formula
+la1=lc1*k
+la2=lc2*k
+J=%pi*d^4/32
+q=C*J/(lc1*12)//torsional stiffness
+IC=Ic*2240*12^2/(g*12)//moment of inertia
+nc=(1/(2*%pi))*(q/IC)^(1/2)//fundamental frequency of vibration
+a1=nc*60
+a=floor(a1)
+n=16*(lc1/lc2)^(1/2)
+b=n*60
+printf("\nFundamental frequency of vibration = %.f per min\nTwo node frequency = %.f per min\n",a,b)
|