1 files changed, 15 insertions, 0 deletions
diff --git a/3733/CH18/EX18.4/Ex18_4.sce b/3733/CH18/EX18.4/Ex18_4.sce
new file mode 100644
index 000000000..dcf7a3940
--- /dev/null
+++ b/3733/CH18/EX18.4/Ex18_4.sce
@@ -0,0 +1,15 @@
+// Example 18_4
+clc;funcprot(0);
+//Given data 
+V=5000;//Circulation of cooling water in m^3/hr 
+C=3;// Allowable concentration ratio
+Cr=12;// The cooling range in °C
+El=2;// Evaporation losses in %
+Wl=0.2;// Windage losses in %
+
+//Calculation
+E=(El/100)*V;// Evaporation losses in m^3/hr
+W=(Wl/100)*V;// Windage losses in m^3/hr
+B=(E/(C-1))-W;// Blow down rate in m^3/hr
+M=E+W+B;// The make up water in m^3/hr 
+printf('\nThe make up water required=%0.0f m^3/hr',M );