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 /944/CH7/EX7.2 | |
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 '944/CH7/EX7.2')
-rwxr-xr-x | 944/CH7/EX7.2/example7_2_TACC.sce | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/944/CH7/EX7.2/example7_2_TACC.sce b/944/CH7/EX7.2/example7_2_TACC.sce new file mode 100755 index 000000000..3172f8822 --- /dev/null +++ b/944/CH7/EX7.2/example7_2_TACC.sce @@ -0,0 +1,35 @@ +//example 7.2
+
+clear;
+clc;
+
+//Given:
+T=298;//Temperature [K]
+v=6.5*10^13;//Frequency in [sec-1]
+//Consider zero point energy = 0.
+h=6.627*10^-34;//planck's constant[J.s]
+k=1.381*10^-23;//Boltzmann constant
+N=1;//Since N=summation(gj*exp(-Ej/kT))
+
+//To find the fraction of molecules present in vibrational level
+E1=h*v;//for energy level 1[J]
+E2=2*h*v;//for energy level 2[J]
+x=k*T;
+g1=1;
+g2=1;
+N1=[g1*exp(-E1/x)];//molecules present in energy level 1
+N2=[g2*exp(-E2/x)];//molecules present in energy level 2
+n1=N1/N;//fraction of molecules present in energy level 1
+n2=N2/N;//fraction of molecules present in energy level 2
+printf("The fraction of molecule s present in energy level 1 is %f",n1);
+
+
+disp(n2,'The fraction of molecules present in energy level 2 is ');
+
+
+
+
+
+
+
+
|