summaryrefslogtreecommitdiff
path: root/2510/CH16/EX16.6/Ex16_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '2510/CH16/EX16.6/Ex16_6.sce')
-rwxr-xr-x2510/CH16/EX16.6/Ex16_6.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/2510/CH16/EX16.6/Ex16_6.sce b/2510/CH16/EX16.6/Ex16_6.sce
new file mode 100755
index 000000000..0c4f47f3e
--- /dev/null
+++ b/2510/CH16/EX16.6/Ex16_6.sce
@@ -0,0 +1,18 @@
+//Variable declaration:
+T1 = 400.0 //Temperature of fluid entering the shell ( F)
+T2 = 250.0 //Temperature of fluid leaving the shell ( F)
+t1 = 100.0 //Temperature of fluid entering the tube ( F)
+t2 = 175.0 //Temperature of fluid leaving the tube ( F)
+
+//Calculation:
+DT1 = T1 - T2 //Temperature driving force 1 ( F)
+DT2 = t2 - t1 //Temperature driving force 1 ( F)
+DTlm1 = ((DT1-DT2)/log(DT1/DT2)) //Log mean temperature driving force for ideal countercurrent heat exchanger ( F)
+P = (t2-t1)/(T1 - t1) //Dimensionless ratio P
+R = (T1-T2)/(t2-t1) //Dimensionless ratio R
+//From figure 16.8:
+F = 0.985 //Correction factor
+DTlm2 = F*DTlm1 //Log mean temperature driving force for shell and tube exchanger ( F)
+
+//Result:
+printf("The log mean temperature difference between the hot fluid and the cold fluid is : %.1f F.",DTlm2)