From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 2510/CH16/EX16.18/Ex16_18.sce | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100755 2510/CH16/EX16.18/Ex16_18.sce (limited to '2510/CH16/EX16.18/Ex16_18.sce') diff --git a/2510/CH16/EX16.18/Ex16_18.sce b/2510/CH16/EX16.18/Ex16_18.sce new file mode 100755 index 000000000..8dc81d9ca --- /dev/null +++ b/2510/CH16/EX16.18/Ex16_18.sce @@ -0,0 +1,33 @@ +//Variable declaration: +//From example 16.10: +m1 = 2.778 //Mass flowrate of water (kg/s) +cp1 = 4176.0 //Heat capacity of water (J/kg. C) +cp2 = 4820.0 //Heat capacity of oil (J/kg. C) +m2 = 2.48 //Mass flowrate of oil (kg/s) +t2 = 84.0 //Temperature of water leaving the tube ( C) +t1 = 16.0 //Temperature of water entering the tube ( C) +T2 = 94.0 //Temperature of oil leaving the shell ( C) +T1 = 160.0 //Temperature of oil entering the shell ( C) +U = 350.0 //Over all heat transfer coefficient (W/m^2. C) +A = 30.33 //Heat transfer area required for heat exchanger (m^2) + +//Calculation: +C1 = m1*cp1 //Capacitance rate of water (W/ C) +C2 = m2*cp2 //Capacitance rate of oil (W/ C) +Q = C1*(t2-t1) //Heat load of water (W) +Qmax = C1*(T1-t1) //Maximum heat load of water (W) +E = Q/Qmax //Effectiveness +if (C1