diff options
Diffstat (limited to '3689/CH14/EX14.10/14_10.sce')
| -rw-r--r-- | 3689/CH14/EX14.10/14_10.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3689/CH14/EX14.10/14_10.sce b/3689/CH14/EX14.10/14_10.sce new file mode 100644 index 000000000..2671d3ed7 --- /dev/null +++ b/3689/CH14/EX14.10/14_10.sce @@ -0,0 +1,16 @@ +////
+//Variable Declarations
+h = 6.626e-34 //Planks constant, J.s
+k = 1.38e-23 //Boltzman constant, J/K
+c = 3.0e8 //speed of light, m/s
+T = 298 //Temeprature, K
+nubar = 917 //Vibrational mode frequencies for F2, 1/cm
+
+//Calculations
+ThetaV = h*c*100*nubar/k
+Th = 10*ThetaV
+qv = 1/(1.-exp(-ThetaV/Th))
+
+//Results
+printf("\n Vibrational partition function for F2 at %4.1f K is %4.3f",T, qv)
+
|