diff options
Diffstat (limited to '3685/CH14/EX14.7/Ex14_7.sce')
| -rw-r--r-- | 3685/CH14/EX14.7/Ex14_7.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/3685/CH14/EX14.7/Ex14_7.sce b/3685/CH14/EX14.7/Ex14_7.sce new file mode 100644 index 000000000..e65ca6773 --- /dev/null +++ b/3685/CH14/EX14.7/Ex14_7.sce @@ -0,0 +1,18 @@ +clc
+tsat = 120.2 // Saturation temperature in degree Celsius
+hfg = 2201.9 // Latent heat of fusion in kJ/kg
+T1 = 120.2 // Generator temperature in degree Celsius
+T2 = 30 // Ambient temperature in degree Celsius
+Tr = -10 // Operating temperature of refrigerator in degree Celsius
+COP_max = (((T1+273)-(T2+273))*(Tr+273))/(((T2+273)-(Tr+273))*(T1+273)) // Ideal coefficient of performance
+ACOP = 0.4*COP_max // Actual COP
+L = 20 // Refrigeration load in tonnes
+Qe = (L*14000)/3600 // Heat extraction in KW
+Qg = Qe/ACOP // Heat transfer from generator
+x = 0.9 // Quality of refrigerant
+H = x*hfg // Heat extraction
+SFR = Qg/H // Steam flow rate
+printf("\n Example 14.7\n")
+printf("\n Steam flow rate required is %f kg/s",SFR)
+//The answers vary due to round off error
+
|