summaryrefslogtreecommitdiff
path: root/3878/CH2/EX2.1/Ex2_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3878/CH2/EX2.1/Ex2_1.sce')
-rw-r--r--3878/CH2/EX2.1/Ex2_1.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3878/CH2/EX2.1/Ex2_1.sce b/3878/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..a8796f8d4
--- /dev/null
+++ b/3878/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,22 @@
+clear
+// Variable Declaration
+T_l=0+273// The required cooling temperature of room in °C
+T_h=30+273// The temperature of outside air in °C
+T_e=-5+273// The evaporating temperature of Refrigeration cycle in °C
+T_c=35+273// The Condensing temperature of Refrigeration cycle in °C
+deltaT=5// The temperature difference at the evaporator and the condenser in K
+h_i=249.7// Enthalpy of fl uid entering evaporator in kJ/kg
+h_e=395.6// Enthalpy of saturated vapour leaving evaporator in kJ/kg
+h_sup=422.5// Enthalpy of superheated vapour leaving compressor in kJ/kg
+
+// Calculation
+CarnotCOP=T_l/(T_h-T_l)
+printf("\n The Carnot COP for the process is %0.1f ",CarnotCOP)
+// For Refrigeration cycle,
+CarnotCOP=T_e/(T_c-T_e)
+printf("\n The Carnot COP for the refrigeration cycle is %0.1f ",CarnotCOP)
+// For R134a,
+Q=h_e-h_i// Cooling effect in kJ/kg
+W_in=h_sup-h_e// Compressor energy input in kJ/kg
+COP=Q/W_in// Ideal R134a vapour compression cycle COP
+printf("\n The Carnot COP for the ideal vapour compression cycle is %0.1f ",COP)