1 files changed, 22 insertions, 0 deletions
diff --git a/1752/CH8/EX8.7/exa_8_7.sce b/1752/CH8/EX8.7/exa_8_7.sce
new file mode 100755
index 000000000..fc02140b1
--- /dev/null
+++ b/1752/CH8/EX8.7/exa_8_7.sce
@@ -0,0 +1,22 @@
+//Exa 8.7
+clc;
+clear;
+close;
+//given data
+// (a) For parallel flow arrangment
+del_t1=60-10;// in degree C
+del_t2=40-30;// in degree C
+del_tm=(del_t1-del_t2)/log(del_t1/del_t2);// in degree C
+q=100*10^3;// in W
+U=75;// in W/m^2 degree C
+// Formula q=U*A*del_tm;
+A=q/(U*del_tm);
+disp(A,"Area for paraller flow arrangment in square meter");
+// (b) For counter flow heat exchange
+del_t1=60-30;// in degree C
+del_t2=40-10;// in degree C
+// In this case
+del_tm=(del_t1+del_t2)/2;// in degree C
+A=q/(U*del_tm);
+disp(A,"Area For counter flow heat exchange in square meter");
+disp("In counter flow arrangment less area is required for the above purpose")
+\ No newline at end of file