From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3669/CH3/EX3.1/1.sce   | 17 +++++++++++++++++
 3669/CH3/EX3.10/10.sce | 16 ++++++++++++++++
 3669/CH3/EX3.11/11.sce | 16 ++++++++++++++++
 3669/CH3/EX3.12/12.sce | 17 +++++++++++++++++
 3669/CH3/EX3.13/13.sce | 18 ++++++++++++++++++
 3669/CH3/EX3.14/14.sce | 17 +++++++++++++++++
 3669/CH3/EX3.2/2.sce   | 15 +++++++++++++++
 3669/CH3/EX3.3/3.sce   | 13 +++++++++++++
 3669/CH3/EX3.4/4.sce   | 19 +++++++++++++++++++
 3669/CH3/EX3.5/5.sce   | 15 +++++++++++++++
 3669/CH3/EX3.6/6.sce   | 11 +++++++++++
 3669/CH3/EX3.7/7.sce   | 15 +++++++++++++++
 3669/CH3/EX3.8/8.sce   | 11 +++++++++++
 3669/CH3/EX3.9/9.sce   | 22 ++++++++++++++++++++++
 14 files changed, 222 insertions(+)
 create mode 100644 3669/CH3/EX3.1/1.sce
 create mode 100644 3669/CH3/EX3.10/10.sce
 create mode 100644 3669/CH3/EX3.11/11.sce
 create mode 100644 3669/CH3/EX3.12/12.sce
 create mode 100644 3669/CH3/EX3.13/13.sce
 create mode 100644 3669/CH3/EX3.14/14.sce
 create mode 100644 3669/CH3/EX3.2/2.sce
 create mode 100644 3669/CH3/EX3.3/3.sce
 create mode 100644 3669/CH3/EX3.4/4.sce
 create mode 100644 3669/CH3/EX3.5/5.sce
 create mode 100644 3669/CH3/EX3.6/6.sce
 create mode 100644 3669/CH3/EX3.7/7.sce
 create mode 100644 3669/CH3/EX3.8/8.sce
 create mode 100644 3669/CH3/EX3.9/9.sce

(limited to '3669/CH3')

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
-- 
cgit