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 /1026/CH9 | |
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 '1026/CH9')
-rwxr-xr-x | 1026/CH9/EX9.1/Example9_1.sce | 27 | ||||
-rwxr-xr-x | 1026/CH9/EX9.2/Example9_2.sce | 15 | ||||
-rwxr-xr-x | 1026/CH9/EX9.3/Example9_3.sce | 25 | ||||
-rwxr-xr-x | 1026/CH9/EX9.4/Example9_4.sce | 19 | ||||
-rwxr-xr-x | 1026/CH9/EX9.5/Example9_5.sce | 19 | ||||
-rwxr-xr-x | 1026/CH9/EX9.6/Example9_6.sce | 13 | ||||
-rwxr-xr-x | 1026/CH9/EX9.7/Example9_7.sce | 31 | ||||
-rwxr-xr-x | 1026/CH9/EX9.8/Example9_8.sce | 25 | ||||
-rwxr-xr-x | 1026/CH9/EX9.9/Example9_9.sce | 21 |
9 files changed, 195 insertions, 0 deletions
diff --git a/1026/CH9/EX9.1/Example9_1.sce b/1026/CH9/EX9.1/Example9_1.sce new file mode 100755 index 000000000..6bc3b2e81 --- /dev/null +++ b/1026/CH9/EX9.1/Example9_1.sce @@ -0,0 +1,27 @@ +//chapter9,Example9_1,pg 237
+
+d=4.255*10^-10
+
+lam=1.549*10^-10//wavelength of K-copper line
+
+n=1//theta is smallest when n=1
+
+theta=asin(lam/(2*d))//glancing angle
+
+theta=theta*(180/%pi)
+
+//max value of sin(theta)=1
+
+//for highest order
+
+nmax=((2*d)/lam)//highest bragg's order
+
+printf("smallest glancing angle\n")
+
+printf("theta=%.2f deg.",theta)
+
+printf("\nmaximum order of reflection\n")
+
+printf("nmax=%.2f",nmax)
+
+printf("\nsince fraction is meaningless for order nmax=5")
\ No newline at end of file diff --git a/1026/CH9/EX9.2/Example9_2.sce b/1026/CH9/EX9.2/Example9_2.sce new file mode 100755 index 000000000..65e3c1bbc --- /dev/null +++ b/1026/CH9/EX9.2/Example9_2.sce @@ -0,0 +1,15 @@ +//chapter9,Example9_2,pg 237
+
+V=60*10^3
+
+c=3*10^8
+
+e=1.6*10^-19
+
+lam=0.194*10^-10//min. wavelength of x-rays
+
+h=(lam*e*V)/c
+
+printf("plancks constant\n")
+
+disp(h)
\ No newline at end of file diff --git a/1026/CH9/EX9.3/Example9_3.sce b/1026/CH9/EX9.3/Example9_3.sce new file mode 100755 index 000000000..7144d6ddf --- /dev/null +++ b/1026/CH9/EX9.3/Example9_3.sce @@ -0,0 +1,25 @@ +//chapter9,Example9_3,pg 238
+
+//for 110 plane
+
+a=3*10^-10//lattice parameter
+
+d=(a/sqrt(2))//d110=(a/sqrt((1^2)+(1^2)+0))
+
+theta=12.5*(%pi/180)//glancing angle
+
+n=1
+
+lam=2*d*sin(theta)//wavelength of x-ray
+
+nmax=((2*d)/lam)//highest order
+
+printf("wavelength of x-ray beam\n")
+
+disp(lam)
+
+printf("\nhighest braggs order\n")
+
+printf("nmax=%.2f",nmax)
+
+printf("\nfraction is meaningless so nmax=4")
\ No newline at end of file diff --git a/1026/CH9/EX9.4/Example9_4.sce b/1026/CH9/EX9.4/Example9_4.sce new file mode 100755 index 000000000..03f3ba71f --- /dev/null +++ b/1026/CH9/EX9.4/Example9_4.sce @@ -0,0 +1,19 @@ +//chapter9,Example9_4,pg 238
+
+d=2.81*10^-10
+
+theta=14*(%pi/180)//glancing angle
+
+lam=2*d*sin(theta)//min. wavelength
+
+e=1.6*10^-19
+
+V=9100
+
+c=3*10^8
+
+h=(lam*e*V)/c
+
+printf("plancks constant\n")
+
+disp(h)
\ No newline at end of file diff --git a/1026/CH9/EX9.5/Example9_5.sce b/1026/CH9/EX9.5/Example9_5.sce new file mode 100755 index 000000000..fc2ab0492 --- /dev/null +++ b/1026/CH9/EX9.5/Example9_5.sce @@ -0,0 +1,19 @@ +//chapter9,Example9_5,pg 238
+
+//for line A-> 2*d*sin(thetaA)=lamA(n=1)
+
+thetaA=30*(%pi/180)//glancing angle for line A
+
+//for line B-> 2*d*sin(thetaB)=3*lamB(n=3)
+
+thetaB=60*(%pi/180)
+
+lamB=0.97*10^-10
+
+d=(3*lamB)/(2*sin(thetaB))
+
+lamA=2*d*sin(thetaA)//wavelength of line A
+
+printf("wavelength of line A\n")
+
+disp(lamA)
\ No newline at end of file diff --git a/1026/CH9/EX9.6/Example9_6.sce b/1026/CH9/EX9.6/Example9_6.sce new file mode 100755 index 000000000..4089599f4 --- /dev/null +++ b/1026/CH9/EX9.6/Example9_6.sce @@ -0,0 +1,13 @@ +//chapter9,Example9_6,pg 239
+
+a=3.615*10^-10
+
+d111=a/sqrt(1+1+1)//for 111 plane
+
+theta=21.7*(%pi/180)//converting into radian
+
+lam=2*d111*sin(theta)
+
+printf("wavelength of X-rays\n")
+
+disp(lam)
\ No newline at end of file diff --git a/1026/CH9/EX9.7/Example9_7.sce b/1026/CH9/EX9.7/Example9_7.sce new file mode 100755 index 000000000..225e00fb8 --- /dev/null +++ b/1026/CH9/EX9.7/Example9_7.sce @@ -0,0 +1,31 @@ +//chapter9,Example9_7,pg 239
+
+V=50*10^3
+
+lam=(12400/V)*10^-10
+
+n=4//FCC crystal
+
+m=74.6
+
+N=6.022*10^26
+
+rho=1.99*10^3
+
+a=(((n*m)/(N*rho))^(1/3))
+
+//for kcl ionic crystal
+
+d=a/2
+
+theta=asin(lam/(2*d))
+
+theta=theta*(180/%pi)
+
+printf("min. wavelength of spectrum from tube\n")
+
+disp(lam)
+
+printf("glancing angle for that wavelength\n")
+
+printf("theta=%.2f deg.",theta)
\ No newline at end of file diff --git a/1026/CH9/EX9.8/Example9_8.sce b/1026/CH9/EX9.8/Example9_8.sce new file mode 100755 index 000000000..8f2763134 --- /dev/null +++ b/1026/CH9/EX9.8/Example9_8.sce @@ -0,0 +1,25 @@ +//chapter9,Example9_8,pg 239
+
+//from bragg's law
+
+//2*d*sin(theta)=n*lam
+
+n=1
+
+theta1=5.4*(%pi/180)
+
+theta2=7.6*(%pi/180)
+
+theta3=9.4*(%pi/180)
+
+d100=lam/2*sin(theta1)
+
+d110=lam/2*sin(theta2)
+
+d111=lam/2*sin(theta3)
+
+printf("ratio of interplannar spacing \n(1/d100):(1/d110):(1/d111)=")
+
+printf("%.2f:",sin(theta1));printf("%.2f:",sin(theta2));printf("%.2f",sin(theta3));
+
+printf("\nas ratio (1/d100):(1/d110):(1/d111)=1:sqrt(2):sqrt(3)this relation is valid for simple cubic crystal therefore, this is a SCC crystal")
\ No newline at end of file diff --git a/1026/CH9/EX9.9/Example9_9.sce b/1026/CH9/EX9.9/Example9_9.sce new file mode 100755 index 000000000..dcc7d07a4 --- /dev/null +++ b/1026/CH9/EX9.9/Example9_9.sce @@ -0,0 +1,21 @@ +//chapter9,Example9_9,pg 240
+
+lam=0.58*10^-10
+
+theta1=6.5*(%pi/180)
+
+theta2=9.15*(%pi/180)
+
+theta3=13*(%pi/180)
+
+//from bragg's law
+
+d1=lam/(2*sin(theta1))*10^10
+
+d2=lam/(2*sin(theta2))*10^10
+
+d3=lam/(2*sin(theta3))*10^10
+
+printf("interplannar spacing of crystal\n")
+
+printf("%.2f:",d1);printf("%.2f:",d2);printf("%.2f",d3);
\ No newline at end of file |