diff options
Diffstat (limited to '1967/CH13/EX13.4/13_4.sce')
-rwxr-xr-x | 1967/CH13/EX13.4/13_4.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1967/CH13/EX13.4/13_4.sce b/1967/CH13/EX13.4/13_4.sce new file mode 100755 index 000000000..a17842e3a --- /dev/null +++ b/1967/CH13/EX13.4/13_4.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+clear
+k1= -9130 //cal
+k2= 7.46 //cal K^-1
+k3= -3.69*10^-3 //K^-2
+k4= 0.235*10^-6 //K^-3
+k5= -12.07
+T= 298 //K
+R= 1.987 //cal deg^-1 mole^-1
+//CALCULATIONS
+dF= k1+k2*T*log(T)+k3*T^2+k4*T^3+k5*R*T
+//RESULTS
+printf ('Free energy = %.f cal',dF)
|