initial commit / add all books

12 files changed, 195 insertions, 0 deletions

diff --git a/2267/CH10/EX2.1/Ex10_1.sce b/2267/CH10/EX2.1/Ex10_1.sce
new file mode 100755
index 000000000..fcd6b63ed
--- /dev/null
+++ b/2267/CH10/EX2.1/Ex10_1.sce
@@ -0,0 +1,17 @@
+//Part B Chapter 2 Example 1

+clc;

+clear;

+close;

+format('v',6);

+d=50;//mm(dimeter of bar)

+F=120;//kN(Tensile force)

+sigma_t=15;//MN/m^2(Tensile)

+A=%pi*d^2/4;//mm^2

+sigma_x=F/A*1000;//MN/m^2(tensile)

+sigma_t_max=sigma_x/2;//MN/m^2

+disp(sigma_t_max,"Maximum  shear stress in MN/m^2 : ");

+two_theta=asind(sigma_t/(sigma_x/2));///degree

+theta=[two_theta/2 (180-two_theta)/2];//degree

+disp(theta,"Directions of plane in degree are : ");

+sigma_n=sigma_x*cosd(theta)^2;//MN/m^2(Tensile)

+disp(sigma_n,"Shear stress(tensile) in MN/m^2 for above angles are : ");

diff --git a/2267/CH10/EX2.10/Ex10_10.sce b/2267/CH10/EX2.10/Ex10_10.sce
new file mode 100755
index 000000000..fd012f5c0
--- /dev/null
+++ b/2267/CH10/EX2.10/Ex10_10.sce
@@ -0,0 +1,17 @@
+//Part B Chapter 2 Example 10

+clc;

+clear;

+close;

+format('v',6);

+sigma_x=60;//N/mm^2

+sigma_y=30;//N/mm^2

+tau=25;//N/mm^2

+theta=45;//degree(Oblique plane angle)

+sigma_n=(sigma_x+sigma_y)/2+(sigma_x-sigma_y)/2*cosd(2*theta)+tau*sind(2*theta);//N/mm^2

+disp(sigma_n,"Value of sigma_n in N/mm^2 : ");

+sigma_t=(sigma_x-sigma_y)/2*sind(2*theta)-tau*cosd(2*theta);//N/mm^2

+disp(sigma_t,"Value of sigma_t in N/mm^2 : ");

+sigmaR=sqrt(sigma_n^2+sigma_t^2);//N/mm^2(Resultant stress)

+disp(sigmaR,"Value of sigma_R in N/mm^2 : ");

+fi=atand(sigma_t/sigma_n);//degree(Angle of obliquity)

+disp(fi,"Angle of obliquity in degree : ");

diff --git a/2267/CH10/EX2.11/Ex10_11.sce b/2267/CH10/EX2.11/Ex10_11.sce
new file mode 100755
index 000000000..ff121b172
--- /dev/null
+++ b/2267/CH10/EX2.11/Ex10_11.sce
@@ -0,0 +1,17 @@
+//Part B Chapter 2 Example 11

+clc;

+clear;

+close;

+format('v',6);

+sigma1=125;//N/mm^2(Tenslie)

+sigma2=65;//N/mm^2(Tensile)

+tau=0;//N/mm^2

+theta=30;//degree

+sigma_n=(sigma1+sigma2)/2+(sigma1-sigma2)/2*cosd(2*theta)+tau*sind(2*theta);//N/mm^2

+disp(sigma_n,"Value of sigma_n in N/mm^2 : ");

+sigma_t=(sigma1-sigma2)/2*sind(2*theta)-tau*cosd(2*theta);//N/mm^2

+disp(sigma_t,"Value of sigma_t in N/mm^2 : ");

+sigmaR=sqrt(sigma_n^2+sigma_t^2);//N/mm^2

+disp(sigmaR,"Value of sigma_R in N/mm^2 : ");

+fi=atand(sigma_t/sigma_n);//degree

+disp(fi,"Angle, fi in degree : ");

diff --git a/2267/CH10/EX2.12/Ex10_12.sce b/2267/CH10/EX2.12/Ex10_12.sce
new file mode 100755
index 000000000..7f6b61ead
--- /dev/null
+++ b/2267/CH10/EX2.12/Ex10_12.sce
@@ -0,0 +1,20 @@
+//Part B Chapter 2 Example 12

+clc;

+clear;

+close;

+format('v',6);

+sigma_y=0;//N/m^2

+theta=30;//degree

+A=450*10^-6;//m^2

+F=-100;//kN

+sigma_x=F/A/1000;//MN/m^2

+sigma_n=(sigma_x+sigma_y)/2+(sigma_x-sigma_y)/2*cosd(2*theta);//MN/m^2

+disp(sigma_n,"Value of sigma_n(compressive) in MN/m^2 : ");

+sigma_t=(-sigma_x-sigma_y)/2*sind(2*theta);//MN/m^2

+disp(sigma_t,"Value of sigma_t in MN/m^2 : ");

+sigmaR=sqrt(sigma_n^2+sigma_t^2);//N/mm^2

+disp(sigmaR,"Value of sigma_R(compressive) in N/mm^2 : ");

+fi=atand(sigma_t/-sigma_n);//degree

+disp(fi,"Angle, fi in degree : ");

+tau_max=(-sigma_x-sigma_y)/2;//MN/m^2

+disp(tau_max,"Maximum shear stress in MN/m^2 : ");

diff --git a/2267/CH10/EX2.13/Ex10_13.sce b/2267/CH10/EX2.13/Ex10_13.sce
new file mode 100755
index 000000000..7b4a50808
--- /dev/null
+++ b/2267/CH10/EX2.13/Ex10_13.sce
@@ -0,0 +1,16 @@
+//Part B Chapter 2 Example 13

+clc;

+clear;

+close;

+format('v',6);

+sigma1=70;//MN/m^2

+sigma2=30;//MN/m^2

+theta=20;//degree

+sigma_n=(sigma1+sigma2)/2+(sigma1-sigma2)/2*cosd(2*theta);//MN/m^2

+disp(sigma_n,"Value of sigma_n(tensile) in MN/m^2 : ");

+sigma_t=(sigma1-sigma2)/2*sind(2*theta);//MN/m^2

+disp(sigma_t,"Value of sigma_t(shear) in MN/m^2 : ");

+sigmaR=sqrt(sigma_n^2+sigma_t^2);//MN/m^2

+disp(sigmaR,"Value of sigma_R in MN/m^2 : ");

+fi=atand(sigma_t/sigma_n);//degree

+disp(fi,"Angle, fi in degree : ");

diff --git a/2267/CH10/EX2.2/Ex10_2.sce b/2267/CH10/EX2.2/Ex10_2.sce
new file mode 100755
index 000000000..92fa3b00b
--- /dev/null
+++ b/2267/CH10/EX2.2/Ex10_2.sce
@@ -0,0 +1,16 @@
+//Part B Chapter 2 Example 2

+clc;

+clear;

+close;

+format('v',6);

+theta=25;//degree(angle with plane AB)

+sigma_x=60;//N/mm^2

+sigma_y=-90;//MN/m^2 or N/mm^2

+sigma_n=(sigma_x+sigma_y)/2+(sigma_x-sigma_y)/2*cosd(2*theta);//N/mm^2

+sigma_t=(sigma_x-sigma_y)/2*sind(2*theta);//N/mm^2

+sigma=sqrt(sigma_n^2+sigma_t^2);//N/mm^2(Resultant stress)

+fi=atand(sigma_n/sigma_t);//degree

+disp(sigma_n,"Normal stress in N/mm^2 : ");

+disp(sigma_t,"Tangential stress in N/mm^2 : ");

+disp(fi,"Angle fi in degree : ");

+disp(theta+fi,"Angle of resultant stress with plane AB will be theta+fi=");

diff --git a/2267/CH10/EX2.3/Ex10_3.sce b/2267/CH10/EX2.3/Ex10_3.sce
new file mode 100755
index 000000000..1487f580b
--- /dev/null
+++ b/2267/CH10/EX2.3/Ex10_3.sce
@@ -0,0 +1,17 @@
+//Part B Chapter 2 Example 3

+clc;

+clear;

+close;

+format('v',6);

+sigma_x=150;//N/m^2

+sigma_y=100;//N/m^2

+tau=80;//N/m^2

+two_theta=atand(2*tau/(sigma_x-sigma_y));//degree

+theta=[two_theta/2 (two_theta+180)/2];//degree

+disp(theta,"Direction of principle stresses in degree are : ");

+sigma1=(sigma_x+sigma_y)/2+sqrt((sigma_x-sigma_y)^2/4+tau^2);//N/mm^2

+sigma2=(sigma_x+sigma_y)/2-sqrt((sigma_x-sigma_y)^2/4+tau^2);//N/mm^2

+disp(sigma2,sigma1,"Two principle stresses(tensile) in N/mm^2 are : ");

+tau_max=sqrt((sigma_x-sigma_y)^2/4+tau^2);//N/mm^2

+disp(tau_max,"Magnitude of maximum stresses(tensile) in N/mm^2 : ");

+disp("Direction of maximum stress : 45 degree to principle plane");

diff --git a/2267/CH10/EX2.4/Ex10_4.sce b/2267/CH10/EX2.4/Ex10_4.sce
new file mode 100755
index 000000000..fb04e83f7
--- /dev/null
+++ b/2267/CH10/EX2.4/Ex10_4.sce
@@ -0,0 +1,10 @@
+//Part B Chapter 2 Example 4

+clc;

+clear;

+close;

+format('v',6);

+sigma_x=120;//N/mm^2(Tensile)

+sigma_y=-90;//N/mm^2(Compressive)

+sigma1=150;//N/mm^2(Principle stress: major)

+tau=sqrt((sigma1-(sigma_x+sigma_y)/2)^2-(sigma_x-sigma_y)^2/4);//N/mm^2(Shear stress)

+disp(tau,"Value of shear stress in N/mm^2 : ");

diff --git a/2267/CH10/EX2.5/Ex10_5.sce b/2267/CH10/EX2.5/Ex10_5.sce
new file mode 100755
index 000000000..5501b69d5
--- /dev/null
+++ b/2267/CH10/EX2.5/Ex10_5.sce
@@ -0,0 +1,19 @@
+//Part B Chapter 2 Example 5

+clc;

+clear;

+close;

+format('v',6);

+sigma1=100;//N/m^2

+sigma2=-50;//N/m^2

+tau=0;//N/mm^2

+theta=60;//degree

+sigma_n=(sigma1+sigma2)/2+(sigma1-sigma2)/2*cosd(2*theta);//N/mm^2

+sigma_t=(sigma1-sigma2)/2*sind(2*theta);//N/mm^2

+sigma=sqrt(sigma_n^2+sigma_t^2);//N/mm^2

+disp(sigma_n,"Value of sigma_n(compressive) in N/mm^2 : ");

+disp(sigma_t,"Value of sigma_t in N/mm^2 : ");

+disp(sigma,"Value of resultant stress in N/mm^2 : ");

+alfa=1/2*asind(-(sigma1+sigma2)/2/sqrt((sigma1-sigma2)^2/4))-45;//degree

+disp("Plane of whole shear is "+string(alfa)+" degree with plane AD");

+sigma_t_alfa=(sigma1-sigma2)/2*sind(2*alfa)-tau*cosd(2*alfa);//N/mm^2

+disp(sigma_t_alfa,"Value of shear stresses at this plane in N/mm^2 : ");

diff --git a/2267/CH10/EX2.7/Ex10_7.sce b/2267/CH10/EX2.7/Ex10_7.sce
new file mode 100755
index 000000000..359fc6455
--- /dev/null
+++ b/2267/CH10/EX2.7/Ex10_7.sce
@@ -0,0 +1,12 @@
+//Part B Chapter 2 Example 7

+clc;

+clear;

+close;

+format('v',6);

+sigma1=600;//N/m^2(major)

+sigma_x=450;//N/m^2

+sigma_y=0;//N/m^2

+tau=sqrt((sigma1-(sigma_x+sigma_y)/2)^2-(sigma_x-sigma_y)^2/4);//N/mm^2

+disp(tau,"Maximum value of tau in N/mm^2 : ");

+sigma2=(sigma_x+sigma_y)/2-sqrt((sigma_x-sigma_y)^2/4+tau^2);//N/mm^2

+disp(sigma2,"Minimum principle stress(compressive) in N/mm^2 : ");

diff --git a/2267/CH10/EX2.8/Ex10_8.sce b/2267/CH10/EX2.8/Ex10_8.sce
new file mode 100755
index 000000000..e05acef7c
--- /dev/null
+++ b/2267/CH10/EX2.8/Ex10_8.sce
@@ -0,0 +1,17 @@
+//Part B Chapter 2 Example 8

+clc;

+clear;

+close;

+format('v',6);

+sigma_x=-150;//N/m^2

+sigma_y=-100;//N/m^2

+tau=-60;//N/mm^2

+sigma1=(sigma_x+sigma_y)/2+sqrt((sigma_x-sigma_y)^2/4+tau^2);//N/mm^2

+sigma2=(sigma_x+sigma_y)/2-sqrt((sigma_x-sigma_y)^2/4+tau^2);//N/mm^2

+disp(sigma2,sigma1,"Two principle stresses(compressive) in N/mm^2 are : ");

+tau_max=sqrt((sigma_x-sigma_y)^2/4+tau^2);//N/mm^2

+disp(tau_max,"Maximum shear stress in N/mm^2 : ");

+two_theta=atand(2*tau/(sigma_x-sigma_y));//degree

+theta=[two_theta/2 (two_theta+180)/2];//degree

+disp(theta,"Direction of principle stresses in degree is : ");

+disp("Direction of maximum stress : 45 degree to principle plane. ");

diff --git a/2267/CH10/EX2.9/Ex10_9.sce b/2267/CH10/EX2.9/Ex10_9.sce
new file mode 100755
index 000000000..487dd36fb
--- /dev/null
+++ b/2267/CH10/EX2.9/Ex10_9.sce
@@ -0,0 +1,17 @@
+//Part B Chapter 2 Example 9

+clc;

+clear;

+close;

+format('v',6);

+sigma1=200;//N/m^2

+sigma2=-80;//N/m^2

+theta_dash=60;//degree

+theta=90-theta_dash;//degree

+sigma_n=(sigma1+sigma2)/2+(sigma1-sigma2)/2*cosd(2*theta);//N/mm^2

+sigma_t=(sigma1-sigma2)/2*sind(2*theta);//N/mm^2

+sigmaR=sqrt(sigma_n^2+sigma_t^2);//N/mm^2

+disp(sigmaR,"Resultant stress in N/mm^2 : ");

+fi=atand(sigma_t/sigma_n);//degree

+disp(fi,"Direction of resultant stress in degree : ");

+tau_max=(sigma1-sigma2)/2;//N/mm^2

+disp(tau_max,"Maximum shear stress in N/mm^2 : ");