summaryrefslogtreecommitdiff
path: root/1367/CH5
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1367/CH5
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1367/CH5')
-rwxr-xr-x1367/CH5/EX5.1/5_1.sce17
-rwxr-xr-x1367/CH5/EX5.1/5_1_r.txt12
-rwxr-xr-x1367/CH5/EX5.10/5_10.sce13
-rwxr-xr-x1367/CH5/EX5.10/5_10r.txt4
-rwxr-xr-x1367/CH5/EX5.3/5_3.sce15
-rwxr-xr-x1367/CH5/EX5.3/5_3_r.txt8
-rwxr-xr-x1367/CH5/EX5.5/5_5.sce25
-rwxr-xr-x1367/CH5/EX5.5/5_5_r.txt11
-rwxr-xr-x1367/CH5/EX5.6/5_6.sce12
-rwxr-xr-x1367/CH5/EX5.6/5_6r.txt7
-rwxr-xr-x1367/CH5/EX5.7/5_7.sce17
-rwxr-xr-x1367/CH5/EX5.7/5_7r.txt13
-rwxr-xr-x1367/CH5/EX5.8/5_8.sce13
-rwxr-xr-x1367/CH5/EX5.8/5_8r.txt8
-rwxr-xr-x1367/CH5/EX5.9/5_9.sce13
-rwxr-xr-x1367/CH5/EX5.9/5_9r.txt9
16 files changed, 197 insertions, 0 deletions
diff --git a/1367/CH5/EX5.1/5_1.sce b/1367/CH5/EX5.1/5_1.sce
new file mode 100755
index 000000000..c19ee0f42
--- /dev/null
+++ b/1367/CH5/EX5.1/5_1.sce
@@ -0,0 +1,17 @@
+//Find MILLER INDICES OF THE PLANE
+//Ex:5.1
+clc;
+clear;
+close;
+p=1;
+q=1/2;
+r=3;
+h=1/p;
+k=1/q;
+l=1/r;
+h1=3*h;
+k1=3*k;
+l1=3*l;
+disp(h1,"MILLER INDICES OF THE PLANE are h =");
+disp(k1,"k = ");
+disp(l1,"l = "); \ No newline at end of file
diff --git a/1367/CH5/EX5.1/5_1_r.txt b/1367/CH5/EX5.1/5_1_r.txt
new file mode 100755
index 000000000..51e510201
--- /dev/null
+++ b/1367/CH5/EX5.1/5_1_r.txt
@@ -0,0 +1,12 @@
+
+ MILLER INDICES OF THE PLANE are h =
+
+ 3.
+
+ k =
+
+ 6.
+
+ l =
+
+ 1. \ No newline at end of file
diff --git a/1367/CH5/EX5.10/5_10.sce b/1367/CH5/EX5.10/5_10.sce
new file mode 100755
index 000000000..311720bfb
--- /dev/null
+++ b/1367/CH5/EX5.10/5_10.sce
@@ -0,0 +1,13 @@
+//Find Dimension of unit cell
+//Ex:5.10
+clc;
+clear;
+close;
+w=0.0708;//wavelength in nm
+h=1;
+k=0;
+l=0;
+s=0.0132;//a common divisor i.e.sin^2(theta)=0.0132
+a=sqrt((w^2*(h^2+k^2+l^2))/(4*s));//in nm
+a1=10^3*a;//in pm
+disp(a1,"Dimension of unit cell (in Picometer) = "); \ No newline at end of file
diff --git a/1367/CH5/EX5.10/5_10r.txt b/1367/CH5/EX5.10/5_10r.txt
new file mode 100755
index 000000000..07c306cbe
--- /dev/null
+++ b/1367/CH5/EX5.10/5_10r.txt
@@ -0,0 +1,4 @@
+Dimension of unit cell (in Picometer) =
+
+ 308.11745
+ \ No newline at end of file
diff --git a/1367/CH5/EX5.3/5_3.sce b/1367/CH5/EX5.3/5_3.sce
new file mode 100755
index 000000000..f70e1a796
--- /dev/null
+++ b/1367/CH5/EX5.3/5_3.sce
@@ -0,0 +1,15 @@
+//Find MILLER INDICES OF THE PLANE
+//Ex:5.3
+clc;
+clear;
+close;
+p=2/4;//intercepts
+q=3/3;
+r=4/2;
+h=1/p;
+k=1/q;
+l=1/r;
+h1=2*h;
+k1=2*k;
+l1=2*l;
+disp(l1,k1,h1,"MILLER INDICES ARE "); \ No newline at end of file
diff --git a/1367/CH5/EX5.3/5_3_r.txt b/1367/CH5/EX5.3/5_3_r.txt
new file mode 100755
index 000000000..93f482dcb
--- /dev/null
+++ b/1367/CH5/EX5.3/5_3_r.txt
@@ -0,0 +1,8 @@
+
+ MILLER INDICES ARE
+
+ 4.
+
+ 2.
+
+ 1. \ No newline at end of file
diff --git a/1367/CH5/EX5.5/5_5.sce b/1367/CH5/EX5.5/5_5.sce
new file mode 100755
index 000000000..f7f2747eb
--- /dev/null
+++ b/1367/CH5/EX5.5/5_5.sce
@@ -0,0 +1,25 @@
+//Find Interplanar Spacing
+//Ex:5.5
+clc;
+clear;
+close;
+r=1.246;//radius in angstorm
+h=2;
+k=0;
+l=0;
+x=sqrt(h^2+k^2+l^2);
+a=2*sqrt(2)*r;//in angstorm
+d_200=a/x;//interplanar spacing in angstorm
+disp(d_200,"Interplanar Spacing (200) (in Angstorm) = ");
+h1=2;
+k1=2;
+l1=0;
+x1=sqrt(h1^2+k1^2+l1^2);
+d_220=a/x1;//interplanar spacing in angstorm
+disp(d_220,"Interplanar Spacing (220) (in Angstorm) = ");
+h2=1;
+k2=1;
+l2=1;
+x2=sqrt(h2^2+k2^2+l2^2);
+d_111=a/x2;//interplanar spacing in angstorm
+disp(d_111,"Interplanar Spacing (111) (in Angstorm) = "); \ No newline at end of file
diff --git a/1367/CH5/EX5.5/5_5_r.txt b/1367/CH5/EX5.5/5_5_r.txt
new file mode 100755
index 000000000..72dcef3a6
--- /dev/null
+++ b/1367/CH5/EX5.5/5_5_r.txt
@@ -0,0 +1,11 @@
+ Interplanar Spacing (200) (in Angstorm) =
+
+ 1.7621101
+
+ Interplanar Spacing (220) (in Angstorm) =
+
+ 1.246
+
+ Interplanar Spacing (111) (in Angstorm) =
+
+ 2.0347095 \ No newline at end of file
diff --git a/1367/CH5/EX5.6/5_6.sce b/1367/CH5/EX5.6/5_6.sce
new file mode 100755
index 000000000..08e557ea2
--- /dev/null
+++ b/1367/CH5/EX5.6/5_6.sce
@@ -0,0 +1,12 @@
+//Find Linear Density per unit length
+//Ex:5.6
+clc;
+clear;
+close;
+a=3.61*10^-10;//unit cell in m
+r_110=2/(sqrt(2)*a);//in atoms/m
+r_a=r_110/10^3;//in atoms/mm
+disp(r_a,"Linear Density per unit length along direction [110] (in atoms/mm) =");
+r_111=1/(sqrt(3)*a);//in atoms/m
+r_b=r_111/10^3;//in atoms/mm
+disp(r_b,"Linear Density per unit length along direction [111] (in atoms/mm) =");
diff --git a/1367/CH5/EX5.6/5_6r.txt b/1367/CH5/EX5.6/5_6r.txt
new file mode 100755
index 000000000..197a3606d
--- /dev/null
+++ b/1367/CH5/EX5.6/5_6r.txt
@@ -0,0 +1,7 @@
+Linear Density per unit length along direction [110] (in atoms/mm) =
+
+ 3917489.1
+
+ Linear Density per unit length along direction [111] (in atoms/mm) =
+
+ 1599308.2 \ No newline at end of file
diff --git a/1367/CH5/EX5.7/5_7.sce b/1367/CH5/EX5.7/5_7.sce
new file mode 100755
index 000000000..75c7ed104
--- /dev/null
+++ b/1367/CH5/EX5.7/5_7.sce
@@ -0,0 +1,17 @@
+//Find Planar Density
+//Ex:5.7
+clc;
+clear;
+close;
+r_po=1.7*10^-10;//radius of polonium in m
+r_rh=1.34*10^-10;//radius of rhodium in m
+r_cr=1.25*10^-10;//radius of chromium in m
+a_po=2*r_po;//in m
+a_rh=2*sqrt(2)*r_rh;//in m
+a_cr=4*r_cr/sqrt(3);
+p_po=1/a_po^2;// /sqm
+disp(p_po,"Planar Density on [100] in Polonium (per sqm) = ");
+p_rh=1.414/a_rh^2;// /sqm
+disp(p_rh,"Planar Density on [110] in Rhodium (per sqm) = ");
+p_cr=1.732/a_cr^2;// /sqm
+disp(p_cr,"Planar Density on [111] in Chromium (per sqm) = "); \ No newline at end of file
diff --git a/1367/CH5/EX5.7/5_7r.txt b/1367/CH5/EX5.7/5_7r.txt
new file mode 100755
index 000000000..8b0bd9558
--- /dev/null
+++ b/1367/CH5/EX5.7/5_7r.txt
@@ -0,0 +1,13 @@
+
+ Planar Density on [100] in Polonium (per sqm) =
+
+ 8.651D+18
+
+ Planar Density on [110] in Rhodium (per sqm) =
+
+ 9.844D+18
+
+ Planar Density on [111] in Chromium (per sqm) =
+
+ 2.078D+19
+ \ No newline at end of file
diff --git a/1367/CH5/EX5.8/5_8.sce b/1367/CH5/EX5.8/5_8.sce
new file mode 100755
index 000000000..9678cf716
--- /dev/null
+++ b/1367/CH5/EX5.8/5_8.sce
@@ -0,0 +1,13 @@
+//Find Glancing angle and Interplanar spacing of the crystal
+//Ex:5.8
+clc;
+clear;
+close;
+w=0.824;//wavelength in angstorm
+a1=8.58;//angle at n=1 in degrees
+n1=1;
+n3=3;
+a3=asind((n3/n1)*sind(a1));//angle at n=3 in degrees
+disp(a3,"Glancing angle for third order diffraction = ");
+d=w/(2*sind(a1));//in angstorm
+disp(d,"Interplanar spacing of the crystal (in Angstorm) = "); \ No newline at end of file
diff --git a/1367/CH5/EX5.8/5_8r.txt b/1367/CH5/EX5.8/5_8r.txt
new file mode 100755
index 000000000..64c91757f
--- /dev/null
+++ b/1367/CH5/EX5.8/5_8r.txt
@@ -0,0 +1,8 @@
+
+ Glancing angle for third order diffraction =
+
+ 26.587921
+
+ Interplanar spacing of the crystal (in Angstorm) =
+
+ 2.7615756 \ No newline at end of file
diff --git a/1367/CH5/EX5.9/5_9.sce b/1367/CH5/EX5.9/5_9.sce
new file mode 100755
index 000000000..c4f47f154
--- /dev/null
+++ b/1367/CH5/EX5.9/5_9.sce
@@ -0,0 +1,13 @@
+//Find Glancing angle and lattice parameter
+//Ex:5.9
+clc;
+clear;
+close;
+a=17.03;//in degrees
+w=0.71;//in angstorm
+n=1;
+d=n*w/(2*sind(a));//interplanar spacing in angstorm
+disp(d,"Interplanar Spacing (in angstorm) = ");
+// given that h^2+k^2+l^2=8
+a=sqrt(8)*d;//in angstorm
+disp(a,"Lattice parameter of the crystal (in Angstorm) = "); \ No newline at end of file
diff --git a/1367/CH5/EX5.9/5_9r.txt b/1367/CH5/EX5.9/5_9r.txt
new file mode 100755
index 000000000..924002d23
--- /dev/null
+++ b/1367/CH5/EX5.9/5_9r.txt
@@ -0,0 +1,9 @@
+
+ Interplanar Spacing (in angstorm) =
+
+ 1.212132
+
+ Lattice parameter of the crystal (in Angstorm) =
+
+ 3.4284271
+ \ No newline at end of file