summaryrefslogtreecommitdiff
path: root/172/CH6/EX6.7/ex7.sce
diff options
context:
space:
mode:
Diffstat (limited to '172/CH6/EX6.7/ex7.sce')
-rwxr-xr-x172/CH6/EX6.7/ex7.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/172/CH6/EX6.7/ex7.sce b/172/CH6/EX6.7/ex7.sce
new file mode 100755
index 000000000..3eb6e1a06
--- /dev/null
+++ b/172/CH6/EX6.7/ex7.sce
@@ -0,0 +1,14 @@
+//example 7
+//heat transfer rate in aftercooler
+clear
+clc
+V1=0 //we assume initial velocity to be zero because its given that it enters with a low velocity
+V2=25 //final velocity with which carbon dioxide exits in m/s
+h2=401.52 //final specific enthalpy of heat when carbon dioxide exits in kJ/kg
+h1=198 //initial specific enthalpy of heat in kJ/kg
+w=h1-h2-V2^2/(2*1000) //in kJ/kg
+Wc=-50 //power input to the compressor in kW
+m=Wc/w //mass flow rate of carbon dioxide in kg/s
+h3=257.9 //final specific enthalpy of heat when carbon dioxide flows into a constant pressure aftercooler
+Qcool=-m*(h3-h2) //heat transfer rate in the aftercooler in kW
+printf(" \n hence,heat transfer rate in the aftercooler is Qcool=%.3f kW. \n",Qcool)