summaryrefslogtreecommitdiff
path: root/3774/CH4/EX4.18/Ex4_18.sce
diff options
context:
space:
mode:
Diffstat (limited to '3774/CH4/EX4.18/Ex4_18.sce')
-rw-r--r--3774/CH4/EX4.18/Ex4_18.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/3774/CH4/EX4.18/Ex4_18.sce b/3774/CH4/EX4.18/Ex4_18.sce
new file mode 100644
index 000000000..1c87c3fc5
--- /dev/null
+++ b/3774/CH4/EX4.18/Ex4_18.sce
@@ -0,0 +1,25 @@
+// exa 4.18 Pg 123
+clc;clear;close;
+
+// Given Data
+Pmin=-300;// kN
+Pmax=700;// kN
+Se_dash=280;// MPa
+Sy=350;// MPa
+Kf=1.8;//fatigue strength factor
+n=2;// factor of safety
+
+Pm=(Pmax+Pmin)/2;// kN
+Pa=(Pmax-Pmin)/2;// kN
+// sigma_m=4*Pm/%pi/d**2
+sigma_m_into_d_sq = 4*Pm*1000/%pi;
+sigma_a_into_d_sq = 4*Pa*1000/%pi;
+kf=1/Kf ;// fatigue strength reduction factor
+kb=0.85;// size factor
+ke=0.9;//load factor
+ka=0.93;// surface finish factor
+Se=ka*kb*ke*kf*Se_dash;// MPa
+//Goodman failure equation - sigma_m/Sy+sigma_a/Se=1/n
+d=sqrt((sigma_m_into_d_sq/Sy+sigma_a_into_d_sq/Se)*2.25)
+printf('\n Suitable diameter of rod, d = %.f mm',d)
+// Note - Ans in the textbook is wrong.