summaryrefslogtreecommitdiff
path: root/1325/CH13/EX13.4
diff options
context:
space:
mode:
Diffstat (limited to '1325/CH13/EX13.4')
-rw-r--r--1325/CH13/EX13.4/13_4.PNGbin0 -> 86560 bytes
-rw-r--r--1325/CH13/EX13.4/13_4.sce17
2 files changed, 17 insertions, 0 deletions
diff --git a/1325/CH13/EX13.4/13_4.PNG b/1325/CH13/EX13.4/13_4.PNG
new file mode 100644
index 000000000..e2fa74f9a
--- /dev/null
+++ b/1325/CH13/EX13.4/13_4.PNG
Binary files differ
diff --git a/1325/CH13/EX13.4/13_4.sce b/1325/CH13/EX13.4/13_4.sce
new file mode 100644
index 000000000..f56373e6c
--- /dev/null
+++ b/1325/CH13/EX13.4/13_4.sce
@@ -0,0 +1,17 @@
+//to find the equivalent stiffness of the auxiliary spring referred to the sleeve
+clc
+//given
+w=5//lb
+g=32.2
+N2=240//rpm
+w2=(N2*%pi/30)
+r2=5/12//ft
+N1=1.05*N2
+r1=7/12//ft
+a=6//in
+b=4//in
+pb=3/2
+F2=w*w2^2*r2/g
+F1=F2*N1^2*r1/(N2^2*r2)
+p=2*(a/b)^2*((F1-F2)/(r1*12-r2*12)-4*pb)
+printf("Equivalent stiffness; p = %.f lb/in",p)