diff options
Diffstat (limited to '1652/CH8/EX8.5')
-rwxr-xr-x | 1652/CH8/EX8.5/8_5.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1652/CH8/EX8.5/8_5.sce b/1652/CH8/EX8.5/8_5.sce new file mode 100755 index 000000000..d091d76c2 --- /dev/null +++ b/1652/CH8/EX8.5/8_5.sce @@ -0,0 +1,12 @@ +clc
+//Initialization of variables
+R=1.987 //cal/deg mol
+//calculations
+Cvtr=1.5*R
+Cvrot=1.5*R
+Cvt=Cvtr+Cvrot
+disp("Observed Cv= 6.43")
+Cvobs=6.43
+Cvvib=Cvobs-Cvt
+//results
+printf("Vibrational = %.2f cal/deg mol",Cvvib)
|