summaryrefslogtreecommitdiff
path: root/2510/CH14/EX14.8/Ex14_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '2510/CH14/EX14.8/Ex14_8.sce')
-rwxr-xr-x2510/CH14/EX14.8/Ex14_8.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/2510/CH14/EX14.8/Ex14_8.sce b/2510/CH14/EX14.8/Ex14_8.sce
new file mode 100755
index 000000000..fe3fcd8ab
--- /dev/null
+++ b/2510/CH14/EX14.8/Ex14_8.sce
@@ -0,0 +1,19 @@
+//Variable declaration:
+T1 = 138.0 //Temperature of oil entering the cooler (°F)
+T2 = 103.0 //Temperature of oil leaving the cooler (°F)
+t1 = 88.0 //Temperature of coolant entering the cooler (°F)
+t2 = 98.0 //Temperature of coolant leaving the cooler (°F)
+
+//Calculation:
+//For counter flow unit:
+DT1 = T1 - t2 //Temperature difference driving force at the cooler entrance (°F)
+DT2 = T2 - t1 //Temperature difference driving force at the cooler exit (°F)
+DTlm1 = (DT1 - DT2)/(log(DT1/DT2)) //LMTD (driving force) for the heat exchanger (°F)
+//For parallel flow unit:
+DT3 = T1 - t1 //Temperature difference driving force at the cooler entrance (°F)
+DT4 = T2 - t2 //Temperature difference driving force at the cooler exit (°F)
+DTlm2 = (DT3 - DT4)/(log(DT3/DT4)) //LMTD (driving force) for the heat exchanger (°F)
+
+//Result:
+printf("The LMTD for counter-current flow unit is : %.1f °F.",DTlm1)
+printf("The LMTD for parallel flow unit is : %.1f °F.",DTlm2)