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 /698/CH7/EX7.7/P7_stiffness_of_fan.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 '698/CH7/EX7.7/P7_stiffness_of_fan.sce')
| -rw-r--r-- | 698/CH7/EX7.7/P7_stiffness_of_fan.sce | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/698/CH7/EX7.7/P7_stiffness_of_fan.sce b/698/CH7/EX7.7/P7_stiffness_of_fan.sce new file mode 100644 index 000000000..b30cd0d41 --- /dev/null +++ b/698/CH7/EX7.7/P7_stiffness_of_fan.sce @@ -0,0 +1,37 @@ +clc
+//Example 7.7
+//Stiffness of fan
+
+//------------------------------------------------------------------------------
+
+//Given data
+
+//mass of fan
+m=40 //kg
+//operating speed
+N=520 // rpm
+w=(2*%pi*N)/60 //rad/s
+
+//Transmissibility ratio
+TR=0.1
+
+res7=mopen(TMPDIR+'7_stiffness_of_fan.txt','wt')
+mfprintf(res7,'Transmissibility ratio = 1/(1 - r^2)\n\twhere r is the frequency ratio w/wn\n')
+
+//Natural frequency
+wn=sqrt((w^2)/((1+(1/TR)))) // we take absolute value of denominator since it
+ // may be negative, and thus the expression rendered null
+
+mfprintf(res7,'\nNatural Frequency wn=%0.3f rad/s\n',wn)
+
+//Finding the stiffness
+
+mfprintf(res7,'\n\twn=sqrt(k/m)\nwhere k is the stiffness and m is the mass\n')
+k=(wn^2)*m
+mfprintf(res7,'Collective stiffness of the springs=%0.3f N/m\n',k)
+mfprintf(res7,'Stiffness of each spring=%0.3f N/m',k/3)
+
+mclose(res7)
+editor(TMPDIR+'7_stiffness_of_fan.txt')
+//------------------------------------------------------------------------------
+//-----------------------------End of program-----------------------------------
\ No newline at end of file |