diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1367/CH5 | |
download | Scilab-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-x | 1367/CH5/EX5.1/5_1.sce | 17 | ||||
-rwxr-xr-x | 1367/CH5/EX5.1/5_1_r.txt | 12 | ||||
-rwxr-xr-x | 1367/CH5/EX5.10/5_10.sce | 13 | ||||
-rwxr-xr-x | 1367/CH5/EX5.10/5_10r.txt | 4 | ||||
-rwxr-xr-x | 1367/CH5/EX5.3/5_3.sce | 15 | ||||
-rwxr-xr-x | 1367/CH5/EX5.3/5_3_r.txt | 8 | ||||
-rwxr-xr-x | 1367/CH5/EX5.5/5_5.sce | 25 | ||||
-rwxr-xr-x | 1367/CH5/EX5.5/5_5_r.txt | 11 | ||||
-rwxr-xr-x | 1367/CH5/EX5.6/5_6.sce | 12 | ||||
-rwxr-xr-x | 1367/CH5/EX5.6/5_6r.txt | 7 | ||||
-rwxr-xr-x | 1367/CH5/EX5.7/5_7.sce | 17 | ||||
-rwxr-xr-x | 1367/CH5/EX5.7/5_7r.txt | 13 | ||||
-rwxr-xr-x | 1367/CH5/EX5.8/5_8.sce | 13 | ||||
-rwxr-xr-x | 1367/CH5/EX5.8/5_8r.txt | 8 | ||||
-rwxr-xr-x | 1367/CH5/EX5.9/5_9.sce | 13 | ||||
-rwxr-xr-x | 1367/CH5/EX5.9/5_9r.txt | 9 |
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 |