From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 2267/CH10/EX2.1/Ex10_1.sce | 17 +++++++++++++++++ 2267/CH10/EX2.10/Ex10_10.sce | 17 +++++++++++++++++ 2267/CH10/EX2.11/Ex10_11.sce | 17 +++++++++++++++++ 2267/CH10/EX2.12/Ex10_12.sce | 20 ++++++++++++++++++++ 2267/CH10/EX2.13/Ex10_13.sce | 16 ++++++++++++++++ 2267/CH10/EX2.2/Ex10_2.sce | 16 ++++++++++++++++ 2267/CH10/EX2.3/Ex10_3.sce | 17 +++++++++++++++++ 2267/CH10/EX2.4/Ex10_4.sce | 10 ++++++++++ 2267/CH10/EX2.5/Ex10_5.sce | 19 +++++++++++++++++++ 2267/CH10/EX2.7/Ex10_7.sce | 12 ++++++++++++ 2267/CH10/EX2.8/Ex10_8.sce | 17 +++++++++++++++++ 2267/CH10/EX2.9/Ex10_9.sce | 17 +++++++++++++++++ 12 files changed, 195 insertions(+) create mode 100755 2267/CH10/EX2.1/Ex10_1.sce create mode 100755 2267/CH10/EX2.10/Ex10_10.sce create mode 100755 2267/CH10/EX2.11/Ex10_11.sce create mode 100755 2267/CH10/EX2.12/Ex10_12.sce create mode 100755 2267/CH10/EX2.13/Ex10_13.sce create mode 100755 2267/CH10/EX2.2/Ex10_2.sce create mode 100755 2267/CH10/EX2.3/Ex10_3.sce create mode 100755 2267/CH10/EX2.4/Ex10_4.sce create mode 100755 2267/CH10/EX2.5/Ex10_5.sce create mode 100755 2267/CH10/EX2.7/Ex10_7.sce create mode 100755 2267/CH10/EX2.8/Ex10_8.sce create mode 100755 2267/CH10/EX2.9/Ex10_9.sce (limited to '2267/CH10') 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 : "); -- cgit