initial commit / add all books

6 files changed, 94 insertions, 0 deletions

diff --git a/2744/CH2/EX2.1/Ex2_1.sce b/2744/CH2/EX2.1/Ex2_1.sce
new file mode 100755
index 000000000..d4ff0fe93
--- /dev/null
+++ b/2744/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,16 @@
+clear;

+clc;

+p_1 = 5;//principal stress in tons/in^2

+p_2 = 5/2;//principal stress in tons/in^2

+theta = 50*%pi/180;//angle in degrees

+p_n = p_1*cos(theta)^2+p_2*sin(theta)^2;//normal stress intensity

+p_t = (p_1-p_2)*sin(theta)*cos(theta);//tangential stress intensity

+p = sqrt((p_1*cos(theta))^2+(p_2*sin(theta))^2);//resultant intensity of stress

+alpha = atan((p_2*sin(theta))/(p_1*cos(theta)));//in radians

+alpha = alpha*180/%pi;//in degrees

+printf('Normal stress intensity p_n = %.2f tons/in^2',p_n);

+printf('\n Tangential stress intensity p_t = %.2f tons/in^2',p_t);

+printf('\n Resultant stress intensity p = %.2f tons/in^2',p);

+printf('\n angle alpha p_n = %.2f degrees',alpha);

+

+//there is an error in the answer given in text book

diff --git a/2744/CH2/EX2.3/Ex2_3.sce b/2744/CH2/EX2.3/Ex2_3.sce
new file mode 100755
index 000000000..6def81919
--- /dev/null
+++ b/2744/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,23 @@
+clear;

+clc;

+d = 3/4 ;//inches

+P = 2;//tons

+Q = 0.5;//tons

+m = 4;

+A = 0.25*%pi*d^2;//in^2

+p = P/A ;//tons/in^2

+q = Q/A;//tons/in^2

+theta = 0.5*atan(2*q/p);//radians

+theta1 = theta*180/%pi;//degrees

+theta2 = theta1+90;//degrees

+printf('The inclination of principal planes to the axis of the bolt will be %.2f degress and %.2f degrees respectively',theta1,180-theta2);

+printf('\n The inclination of maximum shear planes to the axis of the bolt will be %.2f degress and %.2f degrees respectively',theta1+45,180-theta2-45);

+p_1 = 0.5*p+sqrt(0.25*p^2+q^2);//tons/in^2

+p_2 = 0.5*p-sqrt(0.25*p^2+q^2);//tons/in^2

+p_max = 0.5*(p_1-p_2);//tons/in^2

+p_s = p_1-(p_2/m);//tons/in^2 

+printf('\n The principal stresse are given by p_1 = %.2f tons/in^2.,tensile\n  p_2 = %.2f tons/in^2\n  p_2 = %.2f tons/in^2 .,compressive',p_1,p_2,-p_2);

+printf('\n Maximum shear stress is p_max = %.2f tons/in^2',p_max);

+printf('\n The stress which acting alone will produce the same maximum strain is given by, %.2f tons/in^2',p_s);

+

+//there is an error in the answer given in text book

diff --git a/2744/CH2/EX2.4/Ex2_4.sce b/2744/CH2/EX2.4/Ex2_4.sce
new file mode 100755
index 000000000..1f8c506bb
--- /dev/null
+++ b/2744/CH2/EX2.4/Ex2_4.sce
@@ -0,0 +1,14 @@
+clear;

+clc;

+q = 2;//tons/in^2

+p = 5;//tons/in^2

+p_dash = 2;//tons/in^2

+theta = 0.5*atan(2*q/(p-p_dash));//radians

+theta1 = theta*180/%pi;//degrees

+theta2 = theta1+90;//degrees

+p_1 = 0.5*(p+p_dash)+sqrt(q^2 + 0.25*(p-p_dash)^2);//tons/in^2

+p_2 = 0.5*(p+p_dash)-sqrt(q^2 + 0.25*(p-p_dash)^2);//tons/in^2

+q_max = 0.5*(p_1-p_2);//tons/in^2

+printf('The principal stresses are p_1 = %d tons/in^2 .,tensile\n  p_2 = %d tons/in^2., tensile',p_1,p_2);

+printf('\n The maximum shear stress is %.1f tons/in^2., the planes offering it being inclined at %.2f degrees and %.2f degrees \n to the plane having the normal stress intensity of %d tons/in^2.',q_max,theta1+45,theta2+45,p);

+//there is an error in the answer given in text book

diff --git a/2744/CH2/EX2.5/Ex2_5.sce b/2744/CH2/EX2.5/Ex2_5.sce
new file mode 100755
index 000000000..337e6956f
--- /dev/null
+++ b/2744/CH2/EX2.5/Ex2_5.sce
@@ -0,0 +1,18 @@
+clear;

+clc;

+p_res = 6;//tons/in^2

+p_dash = 4;//tons/in^2

+theta = 30*%pi/180;//degrees

+p_n = 4;//tons/in^2

+p = p_res*cos(theta);//tons/in^2

+q = p_res*sin(theta);//tons/in^2

+L = 2*q/(p-p_dash);

+theta = 0.5*atan(2*q/(p-p_dash));

+theta1 = theta*180/%pi;//degrees

+theta2 = theta1+90;//degrees

+p_1 = 0.5*(p+p_dash)+sqrt(q^2 + 0.25*(p-p_dash)^2);//tons/in^2

+p_2 = 0.5*(p+p_dash)-sqrt(q^2 + 0.25*(p-p_dash)^2);//tons/in^2

+p_max = 0.5*(p_1-p_2);//tons/in^2

+printf('Theta1 = %.2f degrees and Theta2 = %.2f degrees',theta1,theta2);

+printf('\n p_1 = %.2f tons/in^2.,tensile\n p_2 = %.2f tons/in^2.,tensile',p_1,p_2);

+printf('\n The maximum shear intensity will be %.2f tons/in^2 across the planes of maximum shear.',p_max);

diff --git a/2744/CH2/EX2.6/Ex2_6.sce b/2744/CH2/EX2.6/Ex2_6.sce
new file mode 100755
index 000000000..969209fb8
--- /dev/null
+++ b/2744/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,11 @@
+clear;

+clc;

+p_1 = 7;//tons/in^2

+p_2 = 4;//tons/in^2

+p_3 = 3;//tons/in^2

+m = 4;

+E = 13000;//tons/in^2

+e_1 = (p_1/E)+(p_2/(m*E))-(p_3/(m*E));

+e_2 = (p_2/E)+(p_1/(m*E))+(p_3/(m*E));

+e_3 = (p_3/E)-(p_1/(m*E))+(p_2/(m*E));

+printf('e_1 = %.6f,  tensile\n e_2 = %.4f, compressive\n e_3 = %.6f, tensile',e_1,e_2,e_3);

diff --git a/2744/CH2/EX2.7/Ex2_7.sce b/2744/CH2/EX2.7/Ex2_7.sce
new file mode 100755
index 000000000..9579b1620
--- /dev/null
+++ b/2744/CH2/EX2.7/Ex2_7.sce
@@ -0,0 +1,12 @@
+clear;

+clc;

+a = 2;//inches

+l = 6;//inches

+E = 13000;//tons/In^2

+m = 1/0.3;

+P = 20;//tons

+p_1 = P/a^2;//tons/in^2

+p_2 = p_1/(2*(m-1));//tons/in^2

+e_1 = (5-0.6*p_2)/E;//tons/in^2

+del_l = e_1*l;//inches

+printf('The contraction in the length del_l = %.5f inches',del_l);