diff options
Diffstat (limited to '1325/CH13/EX13.3/13_3.sce')
| -rw-r--r-- | 1325/CH13/EX13.3/13_3.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/1325/CH13/EX13.3/13_3.sce b/1325/CH13/EX13.3/13_3.sce new file mode 100644 index 000000000..e69add3ec --- /dev/null +++ b/1325/CH13/EX13.3/13_3.sce @@ -0,0 +1,20 @@ +//to find the rate of stiffness of the spring and the equilibrium speed
+clc
+//given
+w=3//lb
+g=32.2
+N2=300
+w2=(N2*%pi/30)
+r2=3/12//ft
+N1=1.06*N2
+r1=4.5/12//ft
+a=4//in
+b=2//in
+ro=3.5/12//ft
+F2=w*w2^2*r2/g
+F1=F2*N1^2*r1/(N2^2*r2)
+p=2*a^2*(F1-F2)/(b^2*(r1-r2))
+Fc=F2+(F1-F2)*(.5/1.5)
+N=(Fc*g/(ro*w))^(1/2)*30/%pi
+Ns=ceil(N)
+printf("N = %.f rpm",Ns)
|