1 files changed, 17 insertions, 0 deletions
diff --git a/680/CH6/EX6.01/6_01.sce b/680/CH6/EX6.01/6_01.sce
new file mode 100755
index 000000000..954ce79b6
--- /dev/null
+++ b/680/CH6/EX6.01/6_01.sce
@@ -0,0 +1,17 @@
+//Problem 6.01:
+
+//initializing the variables:
+mc = 20; // in lb
+T1 = 100; // in degrees C
+T2 = 25; // in Deg C
+mw = 6; // in gallons
+Cpc = 0.092; // Btu/lb.degF
+Cpw = 1.0; // Btu/lb.degF
+
+//calculation:
+T = (mc*Cpc*T1 + mw*8.33*Cpw*T2)/(mc*Cpc + mw*8.33*Cpw)
+Tk = T + 273
+dS = mc*Cpc*log(Tk/373)
+
+printf("\n\nResult\n\n")
+printf("\n the entropy change of the copper is %.3f Btu/deg F",dS)
+\ No newline at end of file