summaryrefslogtreecommitdiff
path: root/3669/CH3
diff options
context:
space:
mode:
Diffstat (limited to '3669/CH3')
-rw-r--r--3669/CH3/EX3.1/1.sce17
-rw-r--r--3669/CH3/EX3.10/10.sce16
-rw-r--r--3669/CH3/EX3.11/11.sce16
-rw-r--r--3669/CH3/EX3.12/12.sce17
-rw-r--r--3669/CH3/EX3.13/13.sce18
-rw-r--r--3669/CH3/EX3.14/14.sce17
-rw-r--r--3669/CH3/EX3.2/2.sce15
-rw-r--r--3669/CH3/EX3.3/3.sce13
-rw-r--r--3669/CH3/EX3.4/4.sce19
-rw-r--r--3669/CH3/EX3.5/5.sce15
-rw-r--r--3669/CH3/EX3.6/6.sce11
-rw-r--r--3669/CH3/EX3.7/7.sce15
-rw-r--r--3669/CH3/EX3.8/8.sce11
-rw-r--r--3669/CH3/EX3.9/9.sce22
14 files changed, 222 insertions, 0 deletions
diff --git a/3669/CH3/EX3.1/1.sce b/3669/CH3/EX3.1/1.sce
new file mode 100644
index 000000000..3c31733fd
--- /dev/null
+++ b/3669/CH3/EX3.1/1.sce
@@ -0,0 +1,17 @@
+
+//Variable declaration
+lamda=0.071*10**-9; //wavelength(m)
+a=0.28*10**-9; //lattice constant(m)
+h=1;
+k=1;
+l=0;
+n=2; //order of diffraction
+
+//Calculation
+d=a/sqrt(h**2+k**2+l**2);
+x=n*lamda/(2*d);
+theta=asin(x); //angle(radian)
+theta=theta*180/%pi; //glancing angle(degrees)
+
+//Result
+printf('glancing angle is %0.3f degrees \n',int(theta)) \ No newline at end of file
diff --git a/3669/CH3/EX3.10/10.sce b/3669/CH3/EX3.10/10.sce
new file mode 100644
index 000000000..e8f138d43
--- /dev/null
+++ b/3669/CH3/EX3.10/10.sce
@@ -0,0 +1,16 @@
+
+//Variable declaration
+lamda=1.54; //wavelength(angstrom)
+h=1;
+k=1;
+l=1;
+n=1;
+theta=19.2; //angle(degrees)
+
+//Calculation
+theta=theta*%pi/180; //angle(radian)
+d=n*lamda/(2*sin(theta));
+a=d*sqrt(h**2+k**2+l**2); //cube edge of unit cell(angstrom)
+
+//Result
+printf('cube edge of unit cell is %0.3f angstrom \n',(a)) \ No newline at end of file
diff --git a/3669/CH3/EX3.11/11.sce b/3669/CH3/EX3.11/11.sce
new file mode 100644
index 000000000..9890ba6e9
--- /dev/null
+++ b/3669/CH3/EX3.11/11.sce
@@ -0,0 +1,16 @@
+
+//Variable declaration
+lamda=1.54; //wavelength(angstrom)
+h=2;
+k=2;
+l=0;
+n=1;
+theta=38.2; //angle(degrees)
+
+//Calculation
+theta=theta*%pi/180; //angle(radian)
+d=n*lamda/(2*sin(theta));
+a=d*sqrt(h**2+k**2+l**2); //lattice parameter of nickel(angstrom)
+
+//Result
+printf('lattice parameter of nickel is %0.3f angstrom \n',(a)) \ No newline at end of file
diff --git a/3669/CH3/EX3.12/12.sce b/3669/CH3/EX3.12/12.sce
new file mode 100644
index 000000000..d2f8760a4
--- /dev/null
+++ b/3669/CH3/EX3.12/12.sce
@@ -0,0 +1,17 @@
+
+//Variable declaration
+a=0.36; //edge length(nm)
+h1=1;
+k1=1;
+l1=1;
+h2=3;
+k2=2;
+l2=1;
+
+//Calculation
+d1=a/sqrt(h1**2+k1**2+l1**2); //interplanar spacing for (111)(nm)
+d2=a/sqrt(h2**2+k2**2+l2**2); //interplanar spacing for (321)(nm)
+
+//Result
+printf('interplanar spacing for (111) is %0.3f nm \n',(d1))
+printf('interplanar spacing for (321) is %0.3f nm \n',(d2)) \ No newline at end of file
diff --git a/3669/CH3/EX3.13/13.sce b/3669/CH3/EX3.13/13.sce
new file mode 100644
index 000000000..aedb0b938
--- /dev/null
+++ b/3669/CH3/EX3.13/13.sce
@@ -0,0 +1,18 @@
+
+//Variable declaration
+lamda=0.675; //wavelength(angstrom)
+n=3; //order of diffraction
+theta=5+(25/60); //angle(degrees)
+
+//Calculation
+theta=theta*%pi/180; //angle(radian)
+d=lamda/(2*sin(theta));
+theta3=asin(3*lamda/(2*d)); //glancing angle(radian)
+theta3=theta3*180/%pi; //glancing angle(degrees)
+theta_d=int(theta3);
+theta_m=(theta3-theta_d)*60;
+
+//Result
+printf('glancing angle is %0.3f degrees %0.3f minutes \n',theta_d,int(theta_m))
+printf('glancing angle is %2d degrees %2d minutes ',theta_d,int(theta_m))
+printf('answer varies due to approximating off errors\n') \ No newline at end of file
diff --git a/3669/CH3/EX3.14/14.sce b/3669/CH3/EX3.14/14.sce
new file mode 100644
index 000000000..ae6a1ba21
--- /dev/null
+++ b/3669/CH3/EX3.14/14.sce
@@ -0,0 +1,17 @@
+
+//Variable declaration
+lamda=0.79; //wavelength(angstrom)
+n=3; //order of diffraction
+d=3.04; //spacing(angstrom)
+
+//Calculation
+x=(n*lamda/(2*d));
+theta=asin(x); //glancing angle(radian)
+theta=theta*180/%pi; //glancing angle(degrees)
+theta_d=int(theta);
+theta_m=(theta-theta_d)*60;
+theta_s=(theta_m-int(theta_m))*60;
+
+//Result
+printf('glancing angle is %2d degrees %2d minutes %2d seconds',theta_d,int(theta_m),int(theta_s))
+printf('answer given in the book is wrong\n') \ No newline at end of file
diff --git a/3669/CH3/EX3.2/2.sce b/3669/CH3/EX3.2/2.sce
new file mode 100644
index 000000000..7d2eef86b
--- /dev/null
+++ b/3669/CH3/EX3.2/2.sce
@@ -0,0 +1,15 @@
+//Variable declaration
+n=1; //order of diffraction
+theta1=8+(35/60); //angle(degrees)
+d=0.282; //spacing(nm)
+theta2=90;
+
+//Calculation
+theta1=theta1*%pi/180; //angle(radian)
+lamda=2*d*sin(theta1)/n; //wavelength(nm)
+theta2=theta2*%pi/180; //angle(radian)
+nmax=2*d/lamda; //maximum order of diffraction
+
+//Result
+printf('wavelength is %0.3f nm \n',(lamda))
+printf('maximum order of diffraction is %0.3f \n',(nmax)) \ No newline at end of file
diff --git a/3669/CH3/EX3.3/3.sce b/3669/CH3/EX3.3/3.sce
new file mode 100644
index 000000000..19c933ab4
--- /dev/null
+++ b/3669/CH3/EX3.3/3.sce
@@ -0,0 +1,13 @@
+//Variable declaration
+T1=500+273; //temperature(K)
+T2=1000+273; //temperature(K)
+f=1*10**-10; //fraction
+
+//Calculation
+x=(T1/T2);
+y=(log(f));
+w=(x*y);
+F=exp(w); //fraction of vacancy sites
+
+//Result
+printf('fraction of vacancy sites is %0.3f *10**-7 \n',(F*10**7)) \ No newline at end of file
diff --git a/3669/CH3/EX3.4/4.sce b/3669/CH3/EX3.4/4.sce
new file mode 100644
index 000000000..7f6501756
--- /dev/null
+++ b/3669/CH3/EX3.4/4.sce
@@ -0,0 +1,19 @@
+//Variable declaration
+a=1; //assume
+h1=1;
+k1=0;
+l1=0;
+h2=1;
+k2=1;
+l2=0;
+h3=1;
+k3=1;
+l3=1;
+
+//Calculation
+d100=a*6/(h1**2+k1**2+l1**2);
+d110=a*6/(h2**2+k2**2+l2**2);
+d111=a*(6)/(h3**2+k3**2+l3**2);
+
+//Result
+printf('ratio is %0.3f:%0.3f:%0.3f',sqrt( d100), sqrt(d110), sqrt( d111)) \ No newline at end of file
diff --git a/3669/CH3/EX3.5/5.sce b/3669/CH3/EX3.5/5.sce
new file mode 100644
index 000000000..48a6940d6
--- /dev/null
+++ b/3669/CH3/EX3.5/5.sce
@@ -0,0 +1,15 @@
+//Variable declaration
+n=1; //order of diffraction
+theta=38.2; //angle(degrees)
+lamda=1.54; //wavelength(angstrom)
+h=2;
+k=2;
+l=0;
+
+//Calculation
+theta=theta*%pi/180; //angle(radian)
+d=n*lamda/(2*sin(theta));
+a=d*sqrt(h**2+k**2+l**2); //lattice parameter of nickel(angstrom)
+
+//Result
+printf('lattice parameter of nickel is %0.3f angstrom \n',(a)) \ No newline at end of file
diff --git a/3669/CH3/EX3.6/6.sce b/3669/CH3/EX3.6/6.sce
new file mode 100644
index 000000000..330997620
--- /dev/null
+++ b/3669/CH3/EX3.6/6.sce
@@ -0,0 +1,11 @@
+//Variable declaration
+theta=90; //angle(degrees)
+lamda=1.5; //wavelength(angstrom)
+d=1.6; //spacing(angstrom)
+
+//Calculation
+theta=theta*%pi/180; //angle(radian)
+n=2*d*sin(theta)/lamda; //order of diffraction
+
+//Result
+printf('order of diffraction is %0.3f \n',int(n)) \ No newline at end of file
diff --git a/3669/CH3/EX3.7/7.sce b/3669/CH3/EX3.7/7.sce
new file mode 100644
index 000000000..e3e3a0c9c
--- /dev/null
+++ b/3669/CH3/EX3.7/7.sce
@@ -0,0 +1,15 @@
+//Variable declaration
+h=1;
+k=1;
+l=0;
+d=0.203*10**-9; //spacing(m)
+
+//Calculation
+a=d*sqrt(h**2+k**2+l**2); //length of unit cell(m)
+V=a**3; //volume of unit cell(m**3)
+r=sqrt(3)*a/4; //radius of the atom(m)
+
+//Result
+printf('length of unit cell is %0.3f *10**-9 m \n',(a*10**9))
+printf('volume of unit cell is %0.3f *10**-27 m**3 \n',(V*10**27))
+printf('radius of the atom is %0.3f *10**-9 m \n',(r*10**9)) \ No newline at end of file
diff --git a/3669/CH3/EX3.8/8.sce b/3669/CH3/EX3.8/8.sce
new file mode 100644
index 000000000..330997620
--- /dev/null
+++ b/3669/CH3/EX3.8/8.sce
@@ -0,0 +1,11 @@
+//Variable declaration
+theta=90; //angle(degrees)
+lamda=1.5; //wavelength(angstrom)
+d=1.6; //spacing(angstrom)
+
+//Calculation
+theta=theta*%pi/180; //angle(radian)
+n=2*d*sin(theta)/lamda; //order of diffraction
+
+//Result
+printf('order of diffraction is %0.3f \n',int(n)) \ No newline at end of file
diff --git a/3669/CH3/EX3.9/9.sce b/3669/CH3/EX3.9/9.sce
new file mode 100644
index 000000000..c2bdc7afb
--- /dev/null
+++ b/3669/CH3/EX3.9/9.sce
@@ -0,0 +1,22 @@
+
+//Variable declaration
+lamda=0.065; //wavelength(nm)
+a=0.26; //edge length(nm)
+h=1;
+k=1;
+l=0;
+n=2;
+
+//Calculation
+d=a/sqrt(h**2+k**2+l**2);
+x=n*lamda/(2*d);
+theta=asin(x); //glancing angle(radian)
+theta=theta*180/%pi; //glancing angle(degrees)
+theta_d=int(theta);
+theta_m=(theta-theta_d)*60;
+theta_s=(theta_m-int(theta_m))*60;
+
+//Result
+
+printf('glancing angle is %2d degrees %2d minutes %2d seconds',theta_d,int(theta_m),int(theta_s))
+printf('answer varies due to approximating off errors') \ No newline at end of file
generated by cgit (git 2.34.1) at 2024-12-22 09:42:26 +0000