diff options
Diffstat (limited to '1586/CH3')
| -rw-r--r-- | 1586/CH3/EX3.1/EXP3_1.jpg | bin | 0 -> 182497 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.1/EXP3_1.sce | 12 | ||||
| -rw-r--r-- | 1586/CH3/EX3.11/EXP3_11.jpg | bin | 0 -> 168105 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.11/EXP3_11.sce | 6 | ||||
| -rw-r--r-- | 1586/CH3/EX3.12/EXP3_12.jpg | bin | 0 -> 165850 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.12/EXP3_12.sce | 12 | ||||
| -rw-r--r-- | 1586/CH3/EX3.13/EXP3_13.jpg | bin | 0 -> 162947 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.13/EXP3_13.sce | 9 | ||||
| -rw-r--r-- | 1586/CH3/EX3.14/EXP3_14.jpg | bin | 0 -> 171038 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.14/EXP3_14.sce | 12 | ||||
| -rw-r--r-- | 1586/CH3/EX3.3/EXP3_3.jpg | bin | 0 -> 142193 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.3/EXP3_3.sce | 7 | ||||
| -rw-r--r-- | 1586/CH3/EX3.4/EXP3_4.jpg | bin | 0 -> 160895 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.4/EXP3_4.sce | 11 | ||||
| -rw-r--r-- | 1586/CH3/EX3.5/EXP3_5.jpg | bin | 0 -> 172727 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.5/EXP3_5.sce | 15 | ||||
| -rw-r--r-- | 1586/CH3/EX3.8/EXP3_8.jpg | bin | 0 -> 166748 bytes | |||
| -rw-r--r-- | 1586/CH3/EX3.8/EXP3_8.sce | 11 |
18 files changed, 95 insertions, 0 deletions
diff --git a/1586/CH3/EX3.1/EXP3_1.jpg b/1586/CH3/EX3.1/EXP3_1.jpg Binary files differnew file mode 100644 index 000000000..7b7f9b3a7 --- /dev/null +++ b/1586/CH3/EX3.1/EXP3_1.jpg diff --git a/1586/CH3/EX3.1/EXP3_1.sce b/1586/CH3/EX3.1/EXP3_1.sce new file mode 100644 index 000000000..998f6e739 --- /dev/null +++ b/1586/CH3/EX3.1/EXP3_1.sce @@ -0,0 +1,12 @@ +clc;funcprot(0);//EXAMPLE 3.1
+// Initialisation of Variables
+Cn=8;......//No. of Corners of the Cubic Crystal Systems
+c=1;......//No. of centers of the Cubic Crystal Systems in BCC unit cell
+F=6;.......//No. of Faces of the Cubic Crystal Systems in FCC unit cell
+//CALCULATIONS
+N1=Cn/8;.....//No. of latice points per unit cell in SC unit cell
+N2=(Cn/8)+c*1;....//No. of latice points per unit cell in BCC unit cells
+N3=(Cn/8)+F*(1/2);....//No. of latice points per unit cell in FCC unit cells
+disp(N1,"No. of latice points per unit cell in SC unit cell:")
+disp(N2,"No. of latice points per unit cell in BCC unit cells:")
+disp(N3,"No. of latice points per unit cell in FCC unit cells:")
diff --git a/1586/CH3/EX3.11/EXP3_11.jpg b/1586/CH3/EX3.11/EXP3_11.jpg Binary files differnew file mode 100644 index 000000000..3bee2ebec --- /dev/null +++ b/1586/CH3/EX3.11/EXP3_11.jpg diff --git a/1586/CH3/EX3.11/EXP3_11.sce b/1586/CH3/EX3.11/EXP3_11.sce new file mode 100644 index 000000000..30249ab13 --- /dev/null +++ b/1586/CH3/EX3.11/EXP3_11.sce @@ -0,0 +1,6 @@ +clc;funcprot(0);//EXAMPLE 3.11
+// Initialisation of Variables
+E=12;......//No. of Edges in the octahedral sites of the unit cell
+S=1/4;.......//so only 1/4 of each site belongs uniquelyto each unit cell
+N=E*S+1;.....//No.of site belongs uniquely to each unit cell
+disp(N,"No.of octahedral site belongs uniquely to each unit cell:")
diff --git a/1586/CH3/EX3.12/EXP3_12.jpg b/1586/CH3/EX3.12/EXP3_12.jpg Binary files differnew file mode 100644 index 000000000..d44e7a896 --- /dev/null +++ b/1586/CH3/EX3.12/EXP3_12.jpg diff --git a/1586/CH3/EX3.12/EXP3_12.sce b/1586/CH3/EX3.12/EXP3_12.sce new file mode 100644 index 000000000..300eac3ed --- /dev/null +++ b/1586/CH3/EX3.12/EXP3_12.sce @@ -0,0 +1,12 @@ +clc;funcprot(0);//EXAMPLE 3.12
+// Initialisation of Variables
+r1=0.066;.......//Radius of Mg+2 from Appendix B in nm
+r2=0.132;.......//Radius of O-2 from Appendix B in nm
+Am1=24.312;.......//Atomic masses of Mg+2 in g/mol
+Am2=16;.......//Atomic masses of O-2 in g/mol
+Na=6.02*10^23;......//Avogadro’s number
+//CALCULATIONS
+a0=2*r1+2*r2;...........//Lattice constant for MgO in nm
+rho=((4*Am1)+(4*16))/((a0*10^-8)*Na);.....//Density of MgO in g/cm^3
+disp(a0*10^-8,"Lattice constant for MgO in cm:")
+disp(rho,"Density of MgO in g/cm^3:")
diff --git a/1586/CH3/EX3.13/EXP3_13.jpg b/1586/CH3/EX3.13/EXP3_13.jpg Binary files differnew file mode 100644 index 000000000..a742df041 --- /dev/null +++ b/1586/CH3/EX3.13/EXP3_13.jpg diff --git a/1586/CH3/EX3.13/EXP3_13.sce b/1586/CH3/EX3.13/EXP3_13.sce new file mode 100644 index 000000000..a2aadc519 --- /dev/null +++ b/1586/CH3/EX3.13/EXP3_13.sce @@ -0,0 +1,9 @@ +clc;funcprot(0);//EXAMPLE 3.13
+// Initialisation of Variables
+r=1;............//Radius of each atom in units
+n=8;.........//No. of atoms present in Diamond cubic Silicon per cell
+//CALCULATIONS
+v=(4/3)*%pi*r^3;..........// Volume of each atom in Diamond cubic Silicon
+a0=(8*r)/sqrt(3);..........//Volume of unit cell in Diamond cubic Silicon
+Pf=(n*v)/a0^3;............//Packing factor of Diamond cubic Silicon
+disp(Pf,"Packing factor of Diamond cubic Silicon:")
diff --git a/1586/CH3/EX3.14/EXP3_14.jpg b/1586/CH3/EX3.14/EXP3_14.jpg Binary files differnew file mode 100644 index 000000000..39571d0a5 --- /dev/null +++ b/1586/CH3/EX3.14/EXP3_14.jpg diff --git a/1586/CH3/EX3.14/EXP3_14.sce b/1586/CH3/EX3.14/EXP3_14.sce new file mode 100644 index 000000000..c3a652dd6 --- /dev/null +++ b/1586/CH3/EX3.14/EXP3_14.sce @@ -0,0 +1,12 @@ +clc;funcprot(0);//EXAMPLE 3.14
+// Initialisation of Variables
+wL=1.54;........//Wave length of Copper K-alpha in Angstorms
+t1=19.5;......//Half the angle between the difracted beam and the original beam direction
+t2=39;......// The angle between the difracted beam and the original beam direction
+//CALCULATIONS
+D1=wL/(sin(t1*%pi/180));......//Interplanar spacing between the planes in Angstroms
+D2=wL/(sin(t2*%pi/180));......//Interplanar spacing between the planes in Angstroms
+a0=D2*(sqrt(3));.......//Lattice constant for cubic form of BaTiO3
+disp(D1,"Interplanar spacing between the planes in Angstroms:")
+disp(a0,"Lattice constant for cubic form of BaTiO3:")
+
diff --git a/1586/CH3/EX3.3/EXP3_3.jpg b/1586/CH3/EX3.3/EXP3_3.jpg Binary files differnew file mode 100644 index 000000000..42154a1ba --- /dev/null +++ b/1586/CH3/EX3.3/EXP3_3.jpg diff --git a/1586/CH3/EX3.3/EXP3_3.sce b/1586/CH3/EX3.3/EXP3_3.sce new file mode 100644 index 000000000..c7ec6aff2 --- /dev/null +++ b/1586/CH3/EX3.3/EXP3_3.sce @@ -0,0 +1,7 @@ +clc;funcprot(0);//EXAMPLE 3.14
+// Initialisation of Variables
+r=1;.........// one unit of radius of each atom of FCC cell
+a0=(4*r)/sqrt(2);..........//Lattice constant for FCC cell
+v=(4*%pi*r^3)/3;.........//volume of one atom in FCC cell
+Pf=(4*v)/(a0)^3;........//Packing factor in FCC cell
+disp(Pf,"Packing factor in FCC cell")
diff --git a/1586/CH3/EX3.4/EXP3_4.jpg b/1586/CH3/EX3.4/EXP3_4.jpg Binary files differnew file mode 100644 index 000000000..91853946d --- /dev/null +++ b/1586/CH3/EX3.4/EXP3_4.jpg diff --git a/1586/CH3/EX3.4/EXP3_4.sce b/1586/CH3/EX3.4/EXP3_4.sce new file mode 100644 index 000000000..347667d73 --- /dev/null +++ b/1586/CH3/EX3.4/EXP3_4.sce @@ -0,0 +1,11 @@ +clc;funcprot(0);//EXAMPLE 3.4
+// Initialisation of Variables
+a0=2.866*10^-8;..........//Lattice constant for BCC iron cells in cm
+m=55.847;..........//Atomic mass of iron in g/mol
+Na=6.02*10^23;......//Avogadro’s number in atoms/mol
+n=2;.........//number of atoms per cell in BCC iron
+//CALCULATIONS
+v=a0^3;........//Volume of unit cell for BCC iron in cm^3/cell
+rho=(n*m)/(v*Na);.......//Density of BCC iron
+disp(v,"Volume of unit cell for BCC iron in cm^3/cell:")
+disp(rho,"Density of BCC iron in g/cm^3:")
diff --git a/1586/CH3/EX3.5/EXP3_5.jpg b/1586/CH3/EX3.5/EXP3_5.jpg Binary files differnew file mode 100644 index 000000000..cd5687981 --- /dev/null +++ b/1586/CH3/EX3.5/EXP3_5.jpg diff --git a/1586/CH3/EX3.5/EXP3_5.sce b/1586/CH3/EX3.5/EXP3_5.sce new file mode 100644 index 000000000..710b10104 --- /dev/null +++ b/1586/CH3/EX3.5/EXP3_5.sce @@ -0,0 +1,15 @@ +clc;funcprot(0);//EXAMPLE 3.5
+// Initialisation of Variables
+a=5.156;........//The lattice constants for the monoclinic unit cells in Angstroms
+b=5.191;........//The lattice constants for the monoclinic unit cells in Angstroms
+c=5.304;........//The lattice constants for the monoclinic unit cells in Angstroms
+beeta=98.9;.......//The angle fro the monoclinic unit cell
+a2=5.094;........//The lattice constants for the tetragonal unit cells in Angstroms
+c2=5.304;........//The lattice constants for the tetragonal unit cells in Angstroms
+//CALCULATIONS
+v2=(a2^2)*c2;........//volume of a tetragonal unit cell
+v1=a*b*c*sin(beeta*%pi/180);........//volume of a monoclinic unit cell
+Pv=(v1-v2)/(v1)*100;........//The percent change in volume in percent
+disp(v2,"volume of a tetragonal unit cell:")
+disp(v1,"volume of a monoclinic unit cell:")
+disp(Pv,"The percent change in volume in percent:")
diff --git a/1586/CH3/EX3.8/EXP3_8.jpg b/1586/CH3/EX3.8/EXP3_8.jpg Binary files differnew file mode 100644 index 000000000..b54d9a396 --- /dev/null +++ b/1586/CH3/EX3.8/EXP3_8.jpg diff --git a/1586/CH3/EX3.8/EXP3_8.sce b/1586/CH3/EX3.8/EXP3_8.sce new file mode 100644 index 000000000..50e4c88a7 --- /dev/null +++ b/1586/CH3/EX3.8/EXP3_8.sce @@ -0,0 +1,11 @@ +clc;funcprot(0);//EXAMPLE 3.8
+// Initialisation of Variables
+r=1;.......//Radius of each atom in units
+l=0.334;.......//Lattice parameter of (010) in nm
+//CALCULATIONS
+a1=2*r;........//Area of face for (010)
+a2=l^2;...........//Area of face of (010) in cm^2
+pd=1/a2;........//Planar density of (010) in atoms/nm^2
+pf=%pi*r^2/(a1)^2;......//Packing fraction of (010)
+disp(pd*10^14,"Planar density of (010) in atoms/cm^2:")
+disp(pf,"Packing fraction of (010):")
|
