10 files changed, 88 insertions, 0 deletions
diff --git a/1367/CH20/EX20.1/20_1.sce b/1367/CH20/EX20.1/20_1.sce
new file mode 100755
index 000000000..a06908ba3
--- /dev/null
+++ b/1367/CH20/EX20.1/20_1.sce
@@ -0,0 +1,13 @@
+//Find fracture strength and ratio
+//Ex:20.1
+clc;
+clear;
+close;
+l=1.5*10^-6;//crack length in m
+e=70*10^9;//Young's modulous in N/m^2
+y_e=1.05;//specific surface energy in j/m^2
+a_f=sqrt((2*y_e*e)/(3.14*l));
+a_f1=a_f*10^-6;//in MPa
+disp(a_f1,"Fracture strength (in MPa) = ");
+r=a_f/e;//ratio
+disp(r,"Ratio of fracture strength to Youngs modulous = " );
+\ No newline at end of file
diff --git a/1367/CH20/EX20.1/ex_20_1_r.txt b/1367/CH20/EX20.1/ex_20_1_r.txt
new file mode 100755
index 000000000..2d18bcce0
--- /dev/null
+++ b/1367/CH20/EX20.1/ex_20_1_r.txt
@@ -0,0 +1,7 @@
+ Fracture strength (in MPa) =    
+ 
+    176.66406  
+ 
+ Ratio of fracture strength to Youngs modulous =    
+ 
+    0.0025238  
+\ No newline at end of file
diff --git a/1367/CH20/EX20.2/20_2.sce b/1367/CH20/EX20.2/20_2.sce
new file mode 100755
index 000000000..c285e1fc8
--- /dev/null
+++ b/1367/CH20/EX20.2/20_2.sce
@@ -0,0 +1,14 @@
+//Investigate an oxidation film will form over Nickel or not
+//Ex:20.2
+clc;
+clear;
+close;
+m_m=58.71;//molecular weight of ni
+m_c=74.71;//molecular weight of nio
+p_m=8900;//density of ni in kg/m^3
+p_c=7080;//desity of nio in kg/m^3
+x=m_m/p_m;//molar volume of ni in m^3/mol
+disp(x,"Mc/Pc (in m^3/mol)");
+y=m_c/p_c;//molar volume of nio in m^3/mol
+disp(y,"Mm/Pm (in m^3/mol)");
+printf("           Mc/Pc > Mm/Pm Hence protective layer of NiO will form over Ni        ");
+\ No newline at end of file
diff --git a/1367/CH20/EX20.2/ex_20_2_r.txt b/1367/CH20/EX20.2/ex_20_2_r.txt
new file mode 100755
index 000000000..426c7c713
--- /dev/null
+++ b/1367/CH20/EX20.2/ex_20_2_r.txt
@@ -0,0 +1,8 @@
+Mc/Pc (in m^3/mol)   
+ 
+    0.0065966  
+ 
+ Mm/Pm (in m^3/mol)   
+ 
+    0.0105523  
+           Mc/Pc > Mm/Pm Hence protective layer of NiO will form over Ni   
+\ No newline at end of file
diff --git a/1367/CH20/EX20.3/20_3.sce b/1367/CH20/EX20.3/20_3.sce
new file mode 100755
index 000000000..b6fba60d5
--- /dev/null
+++ b/1367/CH20/EX20.3/20_3.sce
@@ -0,0 +1,10 @@
+//Find how much loss will occur in 300 hours
+//Ex:20.3
+clc;
+clear;
+close;
+x1=0.1;//in mm
+t1=25;//in hours
+t2=300;//in hours
+x2=x1*sqrt(t2/t1);//in mm
+disp(x2,"Oxidation loss in 300 hours (in mm) = ");
+\ No newline at end of file
diff --git a/1367/CH20/EX20.3/ex_20_3_r.txt b/1367/CH20/EX20.3/ex_20_3_r.txt
new file mode 100755
index 000000000..aa37900f7
--- /dev/null
+++ b/1367/CH20/EX20.3/ex_20_3_r.txt
@@ -0,0 +1,4 @@
+
+ Oxidation loss in 300 hours (in mm) =    
+ 
+    0.3464102 
+\ No newline at end of file
diff --git a/1367/CH20/EX20.4/20_4.sce b/1367/CH20/EX20.4/20_4.sce
new file mode 100755
index 000000000..3a1c5349a
--- /dev/null
+++ b/1367/CH20/EX20.4/20_4.sce
@@ -0,0 +1,12 @@
+//Determine PBR ratio
+//Ex:20.4
+clc;
+clear;
+close;
+p_mg=1.74;//density of magnesium in gm/cm^3
+p_mgo=3.65;//density of magnesium oxide in gm/cm^3
+m_mg=24;//mol wt ogf mg
+m_mgo=40.3;//mol wt of mgo
+PBR=(m_mgo/p_mgo)/(m_mg/p_mg);
+disp(PBR,"PBR = ");
+printf("Since PBR < 1. So porous film will form which will be non protective");
+\ No newline at end of file
diff --git a/1367/CH20/EX20.4/ex_20_4_r.txt b/1367/CH20/EX20.4/ex_20_4_r.txt
new file mode 100755
index 000000000..cd73a6be7
--- /dev/null
+++ b/1367/CH20/EX20.4/ex_20_4_r.txt
@@ -0,0 +1,5 @@
+
+ PBR =    
+ 
+    0.8004795  
+Since PBR < 1. So porous film will form which will be non protective
+\ No newline at end of file
diff --git a/1367/CH20/EX20.5/20_5.sce b/1367/CH20/EX20.5/20_5.sce
new file mode 100755
index 000000000..87237e290
--- /dev/null
+++ b/1367/CH20/EX20.5/20_5.sce
@@ -0,0 +1,12 @@
+//Find quantity of magnesium needed
+//Ex:20.5
+clc;
+clear;
+close;
+m=0.0243;//one mole of magnesium in kg
+c=2*96490;//in C
+j=20*10^-3;//in A/m^2
+t=15*365*24*3600;//in sec
+x=j*t;//in A s
+w_mg=m*x/c;//in kg/sqm
+disp(w_mg,"Amount of Magnesium needed (in Kg/m^2) = ");
+\ No newline at end of file
diff --git a/1367/CH20/EX20.5/ex_20_5_r.txt b/1367/CH20/EX20.5/ex_20_5_r.txt
new file mode 100755
index 000000000..2dae97e17
--- /dev/null
+++ b/1367/CH20/EX20.5/ex_20_5_r.txt
@@ -0,0 +1,3 @@
+Amount of Magnesium needed (in Kg/m^2) =    
+ 
+    1.1913019  
+\ No newline at end of file