12 files changed, 226 insertions, 0 deletions

diff --git a/3840/CH3/EX3.1/Ex3_1.sce b/3840/CH3/EX3.1/Ex3_1.sce
new file mode 100644
index 000000000..75e86a580
--- /dev/null
+++ b/3840/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+a=0.28         //lattice spacing(nm)
+lamda=0.071    //wavelength of X-rays(nm)
+h=1
+k=1
+l=0
+n=2
+
+//Calculation
+d=a/sqrt(h**2+k**2+l**2)           
+sintheta=n*lamda/(2*d)
+theta=asin(sintheta)*180/%pi            //glancing angle(degrees)
+
+//Result
+printf("\n glancing angle is %0.0f  degrees",theta)
diff --git a/3840/CH3/EX3.10/Ex3_10.sce b/3840/CH3/EX3.10/Ex3_10.sce
new file mode 100644
index 000000000..51cde5518
--- /dev/null
+++ b/3840/CH3/EX3.10/Ex3_10.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n=1     //order
+theta=19.2*%pi/180     //glancing angle(radian)
+lamda=1.54                 //wavelength(angstrom)
+h=1
+k=1
+l=1
+
+//Calculation
+d=n*lamda/(2*sin(theta))       //lattice parameter(angstrom)
+a=d*sqrt(h**2+k**2+l**2)       //cube edge of unit cell(angstrom)
+
+//Result
diff --git a/3840/CH3/EX3.11/Ex3_11.sce b/3840/CH3/EX3.11/Ex3_11.sce
new file mode 100644
index 000000000..110a7f7f3
--- /dev/null
+++ b/3840/CH3/EX3.11/Ex3_11.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n=1     //order
+theta=38.2*%pi/180     //glancing angle(radian)
+lamda=1.54                 //wavelength(angstrom)
+h=2
+k=2
+l=0
+
+//Calculation
+d=n*lamda/(2*sin(theta))       //lattice parameter(angstrom)
+a=d*sqrt(h**2+k**2+l**2)       //lattice parameter(angstrom)
+
+//Result
+printf("\n lattice parameter is %0.3f  angstrom",a)
diff --git a/3840/CH3/EX3.12/Ex3_12.sce b/3840/CH3/EX3.12/Ex3_12.sce
new file mode 100644
index 000000000..0acd207f8
--- /dev/null
+++ b/3840/CH3/EX3.12/Ex3_12.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+a=0.36       //cube edge of unit cell(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
diff --git a/3840/CH3/EX3.13/Ex3_13.sce b/3840/CH3/EX3.13/Ex3_13.sce
new file mode 100644
index 000000000..1862c33ef
--- /dev/null
+++ b/3840/CH3/EX3.13/Ex3_13.sce
@@ -0,0 +1,23 @@
+clear
+//
+//
+//
+
+//Variable declaration
+theta=(5+(25/60))*%pi/180     //glancing angle(radian)
+lamda=0.675   //wavelength of X-rays(angstrom)
+n1=1                  //order
+n3=3                  //order 
+
+//Calculation
+d=n1*lamda/(2*sin(theta))       //lattice spacing(angstrom)
+d=(d)
+
+theta3=asin(n3*lamda/(2*d))*180/%pi     //glancing angle for 3rd order(degrees)
+theta3d=int(theta3)                             //glancing angle for 3rd order(degrees)  
+theta3m=(theta3-theta3d)*60                     //glancing angle for 3rd order(minutes)
+
+//Result
+printf("\n lattice spacing is %0.3f  angstrom",d)
+printf("\n glancing angle for 3rd order is %0.3f degrees %0.1f minutes",theta3d,theta3m)
+printf("\n answer for minutes given in the book varies due to rounding off errors")
diff --git a/3840/CH3/EX3.14/Ex3_14.sce b/3840/CH3/EX3.14/Ex3_14.sce
new file mode 100644
index 000000000..c1850bcc4
--- /dev/null
+++ b/3840/CH3/EX3.14/Ex3_14.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+d=3.04         //interplanar spacing(angstrom)             
+lamda=0.79    //wavelength of X-rays(angstrom)
+n=3
+
+//Calculation
+sintheta=n*lamda/(2*d)
+theta=(5+(25/60))*%pi/180;     //glancing angle(radian)
+thetad=asin(sintheta)*180/%pi            //glancing angle(degrees)
+thetam=(theta-int(theta))*60                        //glancing angle(minutes)
+thetas=60*(thetam-int(thetam))                  //glancing angle(seconds)
+
+//Result
+printf("\n glancing angle is %0.0f degrees %0.3f minutes %0.3f seconds",thetad,thetam,thetas)
+printf("\n answer given in the book is wrong")
diff --git a/3840/CH3/EX3.2/Ex3_2.sce b/3840/CH3/EX3.2/Ex3_2.sce
new file mode 100644
index 000000000..fa2ad196e
--- /dev/null
+++ b/3840/CH3/EX3.2/Ex3_2.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+d=0.282       //lattice spacing(nm)
+theta=(8+(35/60))*%pi/180     //glancing angle(radian)
+n=1           //order
+
+//Calculation
+lamda=2*d*sin(theta)/n    //wavelength of X-rays(nm)
+n=2*d/lamda                    //maximum order of diffraction
+
+//Result
diff --git a/3840/CH3/EX3.5/Ex3_5.sce b/3840/CH3/EX3.5/Ex3_5.sce
new file mode 100644
index 000000000..930d51740
--- /dev/null
+++ b/3840/CH3/EX3.5/Ex3_5.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n=1     //order
+theta=38.2*%pi/180     //glancing angle(radian)
+lamda=1.54                 //wavelength(angstrom)
+h=2
+k=2
+l=0
+
+//Calculation
+a=sqrt(h**2+k**2+l**2)
+d=n*lamda*a/(2*sin(theta))       //lattice parameter(angstrom)
+
+//Result
diff --git a/3840/CH3/EX3.6/Ex3_6.sce b/3840/CH3/EX3.6/Ex3_6.sce
new file mode 100644
index 000000000..c965a1a19
--- /dev/null
+++ b/3840/CH3/EX3.6/Ex3_6.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+d=1.6       //lattice spacing(angstrom)
+theta=90*%pi/180     //glancing angle(radian)
+lamda=1.5    //wavelength of X-rays(angstrom)
+
+//Calculation
+n=2*d*sin(theta)/lamda       //maximum order of diffraction 
+
+//Result
diff --git a/3840/CH3/EX3.7/Ex3_7.sce b/3840/CH3/EX3.7/Ex3_7.sce
new file mode 100644
index 000000000..e08b3f336
--- /dev/null
+++ b/3840/CH3/EX3.7/Ex3_7.sce
@@ -0,0 +1,22 @@
+clear
+//
+//
+//
+
+//Variable declaration
+d=0.203*10**-9       //lattice spacing(m)
+h=1
+k=1
+l=0          //miller indices of (110)
+lamda=1.5    //wavelength of X-rays(angstrom)
+
+//Calculation
+a=d*sqrt(h**2+k**2+l**2)     //length(m)
+V=a**3       //volume of unit cell(m**3)
+r=sqrt(3)*a/4     //radius of atom(m)
+
+//Result
+printf("\n length is %0.3f  *10**-9 m",a*10**9)
+printf("\n volume of unit cell is %0.5f  *10**-27 m**3",V*10**27)
+printf("\n answer for volume given in the book varies due to rounding off errors")
+printf("\n radius of atom is %0.4f  *10**-9 m",r*10**9)
diff --git a/3840/CH3/EX3.8/Ex3_8.sce b/3840/CH3/EX3.8/Ex3_8.sce
new file mode 100644
index 000000000..c965a1a19
--- /dev/null
+++ b/3840/CH3/EX3.8/Ex3_8.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+d=1.6       //lattice spacing(angstrom)
+theta=90*%pi/180     //glancing angle(radian)
+lamda=1.5    //wavelength of X-rays(angstrom)
+
+//Calculation
+n=2*d*sin(theta)/lamda       //maximum order of diffraction 
+
+//Result
diff --git a/3840/CH3/EX3.9/Ex3_9.sce b/3840/CH3/EX3.9/Ex3_9.sce
new file mode 100644
index 000000000..36f6d2d54
--- /dev/null
+++ b/3840/CH3/EX3.9/Ex3_9.sce
@@ -0,0 +1,24 @@
+clear
+//
+//
+//
+
+//Variable declaration
+a=0.26         //lattice spacing(nm)
+lamda=0.065    //wavelength of X-rays(nm)
+h=1
+k=1
+l=0
+n=2
+
+//Calculation
+d=a/sqrt(h**2+k**2+l**2)           
+sintheta=n*lamda/(2*d)
+theta=asin(sintheta)*180/%pi            //glancing angle(degrees)
+thetad=int(theta)                               //glancing angle(degrees)  
+thetam=(theta-thetad)*60                        //glancing angle(minutes)
+thetas=60*(thetam-int(thetam))                  //glancing angle(seconds)
+
+//Result
+printf("\n glancing angle is %0.3f degrees %0.3f minutes %0.3f seconds",thetad,thetam,thetas)
+printf("\n answer in the book is wrong")