initial commit / add all books

8 files changed, 42 insertions, 0 deletions

diff --git a/1586/CH14/EX14.1/EXP14_1.jpg b/1586/CH14/EX14.1/EXP14_1.jpg
new file mode 100644
index 000000000..b7b5d7b5b
--- /dev/null
+++ b/1586/CH14/EX14.1/EXP14_1.jpg
diff --git a/1586/CH14/EX14.1/EXP14_1.sce b/1586/CH14/EX14.1/EXP14_1.sce
new file mode 100644
index 000000000..da9fc5f0f
--- /dev/null
+++ b/1586/CH14/EX14.1/EXP14_1.sce
@@ -0,0 +1,16 @@
+clc;funcprot(0);//EXAMPLE 14.1

+// Initialisation of Variables

+d1=0.5;..........//Diameter of a steel Cable in in.

+rhoy=70000;........//Yield Strength of Steel Cable in psi

+rhoa1=36000;........//Yield Strength of Aluminum in psi

+rhos=0.284;..........//Density of Steel in lb/in^3

+rhoa2=0.097;.........//Density of Aluminum in lb/in^3

+//CALCULATIONS

+F=rhoy*((%pi/4)*(d1^2));........//Load applied on Aluminum in lb

+d2=sqrt((F/rhoa1)*(4/(%pi)));.......//Diameter of Aluminum in in.

+Ws=(%pi/4)*(d1^2)*12*rhos;..........//Weight of Steel  in lb/ft

+Wa=(%pi/4)*(d2^2)*12*rhoa2;..........//Weight of        Aluminum in lb/ft

+disp(F,"a. Load applied on Aluminum in lb:")

+disp(d2,"b. Diameter of Aluminum in in.: ")

+disp(Ws,"c.  Weight of Steel  in lb/ft:")

+disp(Wa,"Weight of Aluminum in lb/ft:")

diff --git a/1586/CH14/EX14.4/EXP14_4.jpg b/1586/CH14/EX14.4/EXP14_4.jpg
new file mode 100644
index 000000000..09e38d208
--- /dev/null
+++ b/1586/CH14/EX14.4/EXP14_4.jpg
diff --git a/1586/CH14/EX14.4/EXP14_4.sce b/1586/CH14/EX14.4/EXP14_4.sce
new file mode 100644
index 000000000..43230b92e
--- /dev/null
+++ b/1586/CH14/EX14.4/EXP14_4.sce
@@ -0,0 +1,8 @@
+clc;funcprot(0);//EXAMPLE 14.4

+// Initialisation of Variables

+K=567.53*10^6;..........//Slope of the Equationof Mg- alloy in Pa-nu/m^2

+d=10;...........//Grain size in nu-m

+Y=52.54*10^6;...........//Intercept of Mg- alloy in Pa

+//CALCULATIONS

+Yp=Y+(K*d^(-1/2));.......//Predicted yield strength of an Mg- alloy in MPa

+disp(Yp,"Predicted yield strength of an Mg- alloy in MPa:")

diff --git a/1586/CH14/EX14.6/EXP14_6.jpg b/1586/CH14/EX14.6/EXP14_6.jpg
new file mode 100644
index 000000000..4feca80f5
--- /dev/null
+++ b/1586/CH14/EX14.6/EXP14_6.jpg
diff --git a/1586/CH14/EX14.6/EXP14_6.sce b/1586/CH14/EX14.6/EXP14_6.sce
new file mode 100644
index 000000000..ced8c6a47
--- /dev/null
+++ b/1586/CH14/EX14.6/EXP14_6.sce
@@ -0,0 +1,8 @@
+clc;funcprot(0);//EXAMPLE 14.6

+// Initialisation of Variables

+%A=10;.......//Percentage of Alloy in Cu-Al alloy

+%M=9.4;.......//Percentage of Martensite present in  Cu-Al alloy 

+%Fe=15.6;......//Percentage of Ferrite present in  Cu-Al alloy 

+//CALCULATIONS

+%a=((%A-%M)/(%Fe-%M))*100;....//Percentage of Austenite forms at 400 degree celsius in  Cu-Al alloy

+disp(%a,"Percentage of Austenite forms at 400 degree celsius in  Cu-Al alloy")

diff --git a/1586/CH14/EX14.8/EXP14_8.jpg b/1586/CH14/EX14.8/EXP14_8.jpg
new file mode 100644
index 000000000..0d9ebaf5c
--- /dev/null
+++ b/1586/CH14/EX14.8/EXP14_8.jpg
diff --git a/1586/CH14/EX14.8/EXP14_8.sce b/1586/CH14/EX14.8/EXP14_8.sce
new file mode 100644
index 000000000..ea2e2420d
--- /dev/null
+++ b/1586/CH14/EX14.8/EXP14_8.sce
@@ -0,0 +1,10 @@
+clc;funcprot(0);//EXAMPLE 14.8

+// Initialisation of Variables

+Ktc=60;.........//The plane-strain Fracture toughness in MPa-m^-1/2

+Ktc2=80;......//The fracture toughness of L sample in MPa-m^-1/2 

+f=1.12;........//A geometry factor for the specimen and flaw

+sigma=200;......//A titanium-alloy 6246 plate is exposed to a  tensile stress

+a=((Ktc/(f*sigma))^2)/%pi;......//The critical flaw length of Crank in cm

+a2=((Ktc2/(f*sigma))^2)/%pi;......//The critical flaw length of Crank of L sample in cm

+disp(a*10^2,"  The critical flaw length of Crank in cm: ")

+disp(a2*10^2,"The critical flaw length of Crank of L sample in cm:")