1 files changed, 15 insertions, 0 deletions
diff --git a/1967/CH13/EX13.7/13_7.sce b/1967/CH13/EX13.7/13_7.sce
new file mode 100755
index 000000000..eeb5af902
--- /dev/null
+++ b/1967/CH13/EX13.7/13_7.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+clear
+r= 3.38*10^-4 //volt deg^-1
+F= 23070 //cal volt^-1 deg^-1
+Sagcl= 23 //E.U.mole^-1
+Shg= 18.5 //E.U.mole^-1
+Sag= 10.2 //E.U.mole^-1
+//CALCULATIONS
+dS= F*r
+shgcl= 2*-(dS-Sagcl-Shg+Sag)
+//RESULTS
+printf ('dS  = %.1f E.U.cal deg^-1',dS)
+printf ('\n molar entropy  = %.f E.U.mole^-1',shgcl)
+