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 /1016/CH8 | |
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 '1016/CH8')
-rwxr-xr-x | 1016/CH8/EX8.1/ex8_1.sce | 9 | ||||
-rwxr-xr-x | 1016/CH8/EX8.10/ex8_10.sce | 13 | ||||
-rwxr-xr-x | 1016/CH8/EX8.11/ex8_11.sce | 10 | ||||
-rwxr-xr-x | 1016/CH8/EX8.12/ex8_12.sce | 16 | ||||
-rwxr-xr-x | 1016/CH8/EX8.13/ex8_13.sce | 14 | ||||
-rwxr-xr-x | 1016/CH8/EX8.14/ex8_14.sce | 17 | ||||
-rwxr-xr-x | 1016/CH8/EX8.15/ex8_15.sce | 18 | ||||
-rwxr-xr-x | 1016/CH8/EX8.16/ex8_16.sce | 16 | ||||
-rwxr-xr-x | 1016/CH8/EX8.17/ex8_17.sce | 11 | ||||
-rwxr-xr-x | 1016/CH8/EX8.18/ex8_18.sce | 14 | ||||
-rwxr-xr-x | 1016/CH8/EX8.2/ex8_2.sce | 15 | ||||
-rwxr-xr-x | 1016/CH8/EX8.3/ex8_3.sce | 9 | ||||
-rwxr-xr-x | 1016/CH8/EX8.4/ex8_4.sce | 14 | ||||
-rwxr-xr-x | 1016/CH8/EX8.5/ex8_5.sce | 12 | ||||
-rwxr-xr-x | 1016/CH8/EX8.6/ex8_6.sce | 11 | ||||
-rwxr-xr-x | 1016/CH8/EX8.9/ex8_9.sce | 14 |
16 files changed, 213 insertions, 0 deletions
diff --git a/1016/CH8/EX8.1/ex8_1.sce b/1016/CH8/EX8.1/ex8_1.sce new file mode 100755 index 000000000..d7f20c9ab --- /dev/null +++ b/1016/CH8/EX8.1/ex8_1.sce @@ -0,0 +1,9 @@ +clc;clear;
+//Example 8.1
+
+//given data
+V=60000;//working voltage in V
+
+//calculation
+Wmin=12400/V;
+disp(Wmin,'Wavelength emitted in Angstrom')
\ No newline at end of file diff --git a/1016/CH8/EX8.10/ex8_10.sce b/1016/CH8/EX8.10/ex8_10.sce new file mode 100755 index 000000000..a7cb9c11c --- /dev/null +++ b/1016/CH8/EX8.10/ex8_10.sce @@ -0,0 +1,13 @@ + clc;clear;
+//Example 8.10
+
+//given values
+D=12;//glancing angle in Degree
+n=1;
+d=3.04*10^-10;//grating space in m
+
+//calculation
+W=(2*d*sind(D));
+disp((W/(10^-10)),'the wavelength in Angstrom');
+D3=asind((3*W)/(2*d));
+disp(D3,'the angle for third order reflection in degrees')
\ No newline at end of file diff --git a/1016/CH8/EX8.11/ex8_11.sce b/1016/CH8/EX8.11/ex8_11.sce new file mode 100755 index 000000000..1c44d7c7c --- /dev/null +++ b/1016/CH8/EX8.11/ex8_11.sce @@ -0,0 +1,10 @@ +clc;clear;
+//Example 8.11
+
+//given data
+d=1.181;//distance of seperation in Angstrom
+W=1.540;//wavelength in Angstrom
+
+//calculations
+n=2*d/W;//sin(D) = 1 for max value
+disp(n,'the orders of bragg reflection')
\ No newline at end of file diff --git a/1016/CH8/EX8.12/ex8_12.sce b/1016/CH8/EX8.12/ex8_12.sce new file mode 100755 index 000000000..6ffbb139d --- /dev/null +++ b/1016/CH8/EX8.12/ex8_12.sce @@ -0,0 +1,16 @@ +clc;clear;
+//Example 8.12
+
+//given data
+W=0.6;//wavelength in angstrom
+D1=6.45;
+D2=9.15;
+D3=13;//angles in degree
+
+//calculation
+d=W/(2*sind(D1));
+disp(d,'interplanar spacing for (a) in angstrom');
+d=W/(2*sind(D2));
+disp(d,'interplanar spacing for (b) in angstrom');
+d=W/(2*sind(D3))*2;//n=2 for (c)
+disp(d,'interplanar spacing for (c) in angstrom')
\ No newline at end of file diff --git a/1016/CH8/EX8.13/ex8_13.sce b/1016/CH8/EX8.13/ex8_13.sce new file mode 100755 index 000000000..951f4b516 --- /dev/null +++ b/1016/CH8/EX8.13/ex8_13.sce @@ -0,0 +1,14 @@ +clc;clear;
+//Example 8.13
+
+//given data
+W=3*10^-10;//wavelength in m
+D=40;//angle in degree
+n=1;
+
+//calculation
+d=n*W/(2*sind(D));
+disp((d/10^-10),'spacing in AU')
+a=2*d;
+v=a^3;
+disp(v,'the volumne in m^3 is')
\ No newline at end of file diff --git a/1016/CH8/EX8.14/ex8_14.sce b/1016/CH8/EX8.14/ex8_14.sce new file mode 100755 index 000000000..b413c01fc --- /dev/null +++ b/1016/CH8/EX8.14/ex8_14.sce @@ -0,0 +1,17 @@ +clc;clear;
+//Example 8.14
+
+//given data
+D1=5.4;
+D2=7.6;
+D3=9.4;//angles in degree
+
+//calcualtion
+d1=1/(2*sind(D1));
+d2=1/(2*sind(D2));
+d3=1/(2*sind(D3));
+m=min(d1,d2,d3);
+d1=d1/m;
+d2=d2/m;
+d3=d3/m;
+disp(d1,d2,d3,'d1:d2:d3 =')
\ No newline at end of file diff --git a/1016/CH8/EX8.15/ex8_15.sce b/1016/CH8/EX8.15/ex8_15.sce new file mode 100755 index 000000000..76bdb1edd --- /dev/null +++ b/1016/CH8/EX8.15/ex8_15.sce @@ -0,0 +1,18 @@ +clc;clear;
+//Example 8.15
+
+//given data
+V=50000;//applied voltage in V
+p=1.99*10^3;//density in kg/m^3
+n=4;
+Na=6.02*10^26;//Avgraodo no. in 1/kg mole
+M=74.6;//molecular mass
+W=0.248*10^-10;//wavelength in m
+
+//calculation
+Wmin=12400/V;
+disp(Wmin,'short wavelength limit');
+a=(n*M/(Na*p))^(1/3);
+d=a/2;
+D=asind(W/(2*d));
+disp(D,'glancing angle in degree')
\ No newline at end of file diff --git a/1016/CH8/EX8.16/ex8_16.sce b/1016/CH8/EX8.16/ex8_16.sce new file mode 100755 index 000000000..ea892c9f5 --- /dev/null +++ b/1016/CH8/EX8.16/ex8_16.sce @@ -0,0 +1,16 @@ +clc;clear;
+//Example 8.16
+
+//given data
+W=1.54;//wavelength in angstrom
+D=15.9;//angle in degree
+M=58.45//molecular weight
+p=2164*10^3;//density in kg/m^3
+n=2;//for NaCl molecule
+
+//calculation
+d=W/(2*sind(D));
+disp(d,'lattice spacing in angstrom');
+d=d*10^-10;
+Na=M/(2*d^3*p);
+disp(Na,'Avogrado number in 1/gm mole')
\ No newline at end of file diff --git a/1016/CH8/EX8.17/ex8_17.sce b/1016/CH8/EX8.17/ex8_17.sce new file mode 100755 index 000000000..7ae7ee113 --- /dev/null +++ b/1016/CH8/EX8.17/ex8_17.sce @@ -0,0 +1,11 @@ +clc;clear;
+//Example 8.17
+
+//given data
+D=60;//angle in degree
+W=0.254;//wavelength in angstrom
+
+//calcualtion
+dW=0.024*(1-cosd(D));
+W1=W-dW;
+disp(W1,'primary X-ray wavelength in angstrom')
\ No newline at end of file diff --git a/1016/CH8/EX8.18/ex8_18.sce b/1016/CH8/EX8.18/ex8_18.sce new file mode 100755 index 000000000..376e80e51 --- /dev/null +++ b/1016/CH8/EX8.18/ex8_18.sce @@ -0,0 +1,14 @@ +clc;clear;
+//Example 8.18
+
+//given data
+D=32;//angle in degree
+W=1.54*10^-10;//wavelength in angstrom
+h=2;k=2;l=0;//lattice consts
+
+//calcualtions
+d=W/(2*sind(D));
+a=d*sqrt(h^2+k^2+l^2);
+disp(a,'lattice parameter in m');
+r=sqrt(2)*a/4;
+disp(r,'radius of atom in m')
\ No newline at end of file diff --git a/1016/CH8/EX8.2/ex8_2.sce b/1016/CH8/EX8.2/ex8_2.sce new file mode 100755 index 000000000..c6ae6721e --- /dev/null +++ b/1016/CH8/EX8.2/ex8_2.sce @@ -0,0 +1,15 @@ +clc;clear;
+//Example 8.2
+
+//given data
+V=12400;//Volatage applied in V
+I=0.002;//current drop in A
+e=1.6*10^-19;//the charge on electron in C
+
+//calculations
+n=I/e;
+disp(n,'No. of electrons');
+v=(5.93*10^5)*(sqrt(V));
+disp(v,'the speed with which they strike in m/s');
+Wmin=12400/V;
+disp(Wmin,'shortest wavelength in Angstrom')
\ No newline at end of file diff --git a/1016/CH8/EX8.3/ex8_3.sce b/1016/CH8/EX8.3/ex8_3.sce new file mode 100755 index 000000000..fae6c6b05 --- /dev/null +++ b/1016/CH8/EX8.3/ex8_3.sce @@ -0,0 +1,9 @@ +clc;clear;
+//Example 8.3
+
+//given values
+Wmin=1;//shortest wavelength in Angstrom
+
+//calculations
+V=(12400/Wmin)/1000;
+disp(V,'The minimum applied voltage in kV')
\ No newline at end of file diff --git a/1016/CH8/EX8.4/ex8_4.sce b/1016/CH8/EX8.4/ex8_4.sce new file mode 100755 index 000000000..eee274bb8 --- /dev/null +++ b/1016/CH8/EX8.4/ex8_4.sce @@ -0,0 +1,14 @@ +clc;clear;
+//Exmaple 8.4
+
+//given data
+I=0.005;//current in A
+V=100000;//potential difference in V
+
+//calcualtions
+v=(5.98*10^5)*(sqrt(V));
+disp(v,'Maximum speed in m/s');
+IP=V*I;//incident power in W
+P=.999*IP;//power converted into heat in W
+H=P/4.18;
+disp(H,'The heat produced/second in cal/s');
\ No newline at end of file diff --git a/1016/CH8/EX8.5/ex8_5.sce b/1016/CH8/EX8.5/ex8_5.sce new file mode 100755 index 000000000..7b8a6b2b8 --- /dev/null +++ b/1016/CH8/EX8.5/ex8_5.sce @@ -0,0 +1,12 @@ +clc;clear;
+//Example 8.5
+
+//given data
+V=30000;//potential difference in V
+Wmin=0.414*10^-10;//short wavelength limit in m
+e=1.602*10^-19;//the charge on electron in C
+c=3*10^8;//speed of light in m/s
+
+//calcualtions
+h=(e*V*Wmin)/c;
+disp(h,'The Plancks const in Js')
\ No newline at end of file diff --git a/1016/CH8/EX8.6/ex8_6.sce b/1016/CH8/EX8.6/ex8_6.sce new file mode 100755 index 000000000..1aca3fff7 --- /dev/null +++ b/1016/CH8/EX8.6/ex8_6.sce @@ -0,0 +1,11 @@ +clc;clear;
+//Example 8.6
+
+//given data
+W=1.43*10^-10;//wavelength in m
+Z=74;//atomic no
+R=10.97*10^6;//Rydberg constant in 1/m
+
+//calcualation
+b=74-sqrt(36/(5*R*W));//Transition from to M to L
+disp(b,'the screening const.')
\ No newline at end of file diff --git a/1016/CH8/EX8.9/ex8_9.sce b/1016/CH8/EX8.9/ex8_9.sce new file mode 100755 index 000000000..0a8927981 --- /dev/null +++ b/1016/CH8/EX8.9/ex8_9.sce @@ -0,0 +1,14 @@ +clc;clear;
+//Example 8.9
+
+//given data
+um=0.6;//mass adsoption coeffcient in cm^2/g
+p=2.7;//density of aluminium in g/cm^3
+
+//calculations
+u=p*um;
+disp(u,'linear adsorption coefficent of aluminium in 1/cm');
+T=0.693/u
+disp(T,'the hvl in cm');
+x=(log(20))*(1/u);
+disp(x,'the thickness in cm')
\ No newline at end of file |