summaryrefslogtreecommitdiff
path: root/698/CH2/EX2.14
diff options
context:
space:
mode:
Diffstat (limited to '698/CH2/EX2.14')
-rw-r--r--698/CH2/EX2.14/14_stress_in_eccentric_loading.txt8
-rw-r--r--698/CH2/EX2.14/P14_stress_in_eccentric_loading.sce50
2 files changed, 58 insertions, 0 deletions
diff --git a/698/CH2/EX2.14/14_stress_in_eccentric_loading.txt b/698/CH2/EX2.14/14_stress_in_eccentric_loading.txt
new file mode 100644
index 000000000..c97ee0f80
--- /dev/null
+++ b/698/CH2/EX2.14/14_stress_in_eccentric_loading.txt
@@ -0,0 +1,8 @@
+The member is subjected to direct stress and
+also bending stresses due to eccentricity of the load
+ Total stress
+ S=Sd + Sb --- This will be compressive, since Sd is compressive, and Sb is acting in the direction of Sd
+ S=Sd - Sb --- This will be compressive, since Sb is opposing Sd
+
+Stresses induced are -20.833 MPa compressive and 4.167 MPa tensile
+Maximum Tensile Stress is 4.167 MPa \ No newline at end of file
diff --git a/698/CH2/EX2.14/P14_stress_in_eccentric_loading.sce b/698/CH2/EX2.14/P14_stress_in_eccentric_loading.sce
new file mode 100644
index 000000000..98d449179
--- /dev/null
+++ b/698/CH2/EX2.14/P14_stress_in_eccentric_loading.sce
@@ -0,0 +1,50 @@
+clc
+//Example 2.14
+//Stress in Eccentric Loading
+//------------------------------------------------------------------------------
+
+//Given dta:
+//Load
+P=500000 // N
+
+//Dimensions
+//Eccentricity
+e=0.05 // m
+
+//Cross section
+b=0.3 // m
+d=0.2 // m
+A = b*d
+I=(b*(d^3))/12
+c = d/2
+
+//Bending moment
+M=P*e
+
+//------------------------------------------------------------------------------
+//Printing the result file to .txt
+res14=mopen(TMPDIR+'14_stress_in_eccentric_loading.txt','wt')
+
+mfprintf(res14,'The member is subjected to direct stress and \nalso bending stresses due to eccentricity of the load')
+
+mfprintf(res14,'\n Total stress \n\tS=Sd + Sb --- This will be compressive, since Sd is compressive, and Sb is acting in the direction of Sd')
+mfprintf(res14,'\n\tS=Sd - Sb --- This will be compressive, since Sb is opposing Sd')
+
+Sd=(P/A)
+
+Sb=(M*c)/I
+
+S1=-(Sd+Sb) // This will be compressive
+
+S2=-(Sd-Sb) // This will be tensile
+
+mfprintf(res14,'\n\nStresses induced are %0.3f MPa',S1* (10^-6))
+nature(S1)
+mfprintf(res14,' and %0.3f MPa',S2* (10^-6))
+nature(S2)
+mfprintf(res14,'\nMaximum Tensile Stress is %0.3f MPa',S2* (10^-6))
+
+mclose(res14)
+editor(TMPDIR+'14_stress_in_eccentric_loading.txt')
+//------------------------------------------------------------------------------
+//-----------------------------End of program----------------------------------- \ No newline at end of file