initial commit / add all books

8 files changed, 82 insertions, 0 deletions

diff --git a/1367/CH6/EX6.1/6_1.sce b/1367/CH6/EX6.1/6_1.sce
new file mode 100755
index 000000000..ee12dfcf2
--- /dev/null
+++ b/1367/CH6/EX6.1/6_1.sce
@@ -0,0 +1,15 @@
+//Find No. of Frenkel defect

+//Ex:6.1

+clc;

+clear;

+close;

+na=6.023*10^23;//Avagadro's no.

+p=3170;//density in kg/m^3

+mw=7.9*10^-2;//molecular weight of CaF2

+nl=na*p/mw;//calcium ions/cubic m

+ni=2*nl;// /cubic m

+t=1300;//in K

+ef=2.7*1.6*10^-19;//energy of formation of one frenkel defect

+k=1.38*10^-23;//boltzmann constant

+nf=sqrt(nl*ni)*exp(-ef/(2*k*t));//in /cubic m

+disp(nf,"No. of Frenkel defect per unit volume of Calcium Fluoride (in /m^3) = ");
\ No newline at end of file
diff --git a/1367/CH6/EX6.1/6_1r.txt b/1367/CH6/EX6.1/6_1r.txt
new file mode 100755
index 000000000..204c5def5
--- /dev/null
+++ b/1367/CH6/EX6.1/6_1r.txt
@@ -0,0 +1,4 @@
+  

+ No. of Frenkel defect per unit volume of Calcium Fluoride (in /m^3) =    

+ 

+    2.017D+23 
\ No newline at end of file
diff --git a/1367/CH6/EX6.2/6_2.sce b/1367/CH6/EX6.2/6_2.sce
new file mode 100755
index 000000000..94a49c572
--- /dev/null
+++ b/1367/CH6/EX6.2/6_2.sce
@@ -0,0 +1,13 @@
+//Calculate Ratio of no. of vacancies

+//Ex:6.2

+clc;

+clear;

+close;

+r=8.314;// J/mol K

+t1=300;//in K

+ent=168*10^3;//enthalpy of formation of vacancy in J/mol

+x1=exp(-ent/(r*t1));//x1=n/Na

+t2=1000;//in K

+x2=exp(-ent/(r*t2));//x2=n/Na

+rt=x1/x2;//ratio 

+disp(rt,"Ratio of no. of vacancies = ");
\ No newline at end of file
diff --git a/1367/CH6/EX6.2/6_2r.txt b/1367/CH6/EX6.2/6_2r.txt
new file mode 100755
index 000000000..0cbdf40ad
--- /dev/null
+++ b/1367/CH6/EX6.2/6_2r.txt
@@ -0,0 +1,4 @@
+Ratio of no. of vacancies =    

+ 

+    3.336D-21  

+ 
\ No newline at end of file
diff --git a/1367/CH6/EX6.4/6_4.sce b/1367/CH6/EX6.4/6_4.sce
new file mode 100755
index 000000000..31328632c
--- /dev/null
+++ b/1367/CH6/EX6.4/6_4.sce
@@ -0,0 +1,17 @@
+//Find Elastic Strain Energy

+//Ex:6.4

+clc;

+clear;

+close;

+v=0.31;//poisson's ratio

+bv=.25*10^-9;//burger's vector in m

+ri=1.1*10^-9;//in m

+r0=10^5*bv;//in m

+sm=45*10^9;//shear modulous in n/sqm

+gb_2=sm*bv^2;

+u_ed=(gb_2/(4*3.14*(1-v)))*log(r0/ri);

+disp(u_ed,"Elastic Strain Energy of Edge dislocation (in J/m) = ");

+u_sd=(gb_2/(4*3.14))*log(r0/ri);

+disp(u_sd,"Elastic Strain Energy of Screw dislocation (in J/m) = ");

+r=u_ed/u_sd;//ratio

+disp(r,"Ratio of energies of edge dislocation over screw dislocation = ");
\ No newline at end of file
diff --git a/1367/CH6/EX6.4/6_4r.txt b/1367/CH6/EX6.4/6_4r.txt
new file mode 100755
index 000000000..782650478
--- /dev/null
+++ b/1367/CH6/EX6.4/6_4r.txt
@@ -0,0 +1,12 @@
+  

+ Elastic Strain Energy of Edge dislocation (in J/m) =    

+ 

+    3.255D-09  

+ 

+ Elastic Strain Energy of Screw dislocation (in J/m) =    

+ 

+    2.246D-09  

+ 

+ Ratio of energies of edge dislocation over screw dislocation =    

+ 

+    1.4492754 
\ No newline at end of file
diff --git a/1367/CH6/EX6.5/6_5.sce b/1367/CH6/EX6.5/6_5.sce
new file mode 100755
index 000000000..2575e93a6
--- /dev/null
+++ b/1367/CH6/EX6.5/6_5.sce
@@ -0,0 +1,13 @@
+//Calulate Total no. of created vacancies

+//Ex:6.5

+clc;

+clear;

+close;

+r=1.7*10^-10;//atomic radius in m

+n1=10^-3;//1mm=10^-3m

+a=2*r;//in m

+n=n1/a;

+ed=2*10^-6;//edge dislocation in m

+ns=ed/a;

+nv=n*ns;

+disp(nv,"Total no. of created vacancies = ");
\ No newline at end of file
diff --git a/1367/CH6/EX6.5/6_5r.txt b/1367/CH6/EX6.5/6_5r.txt
new file mode 100755
index 000000000..e8df26723
--- /dev/null
+++ b/1367/CH6/EX6.5/6_5r.txt
@@ -0,0 +1,4 @@
+Total no. of created vacancies =    

+ 

+    1.730D+10  

+ 
\ No newline at end of file