diff options
Diffstat (limited to '3685/CH12/EX12.4')
| -rw-r--r-- | 3685/CH12/EX12.4/Ex12_4.sce | 22 | ||||
| -rw-r--r-- | 3685/CH12/EX12.4/Ex12_4.txt | 6 |
2 files changed, 28 insertions, 0 deletions
diff --git a/3685/CH12/EX12.4/Ex12_4.sce b/3685/CH12/EX12.4/Ex12_4.sce new file mode 100644 index 000000000..e86cedf09 --- /dev/null +++ b/3685/CH12/EX12.4/Ex12_4.sce @@ -0,0 +1,22 @@ +clc
+h1 = 3465 // Enthalpy at state 1 in kJ/kgK
+h2s = 3065 //Enthalpy at state 2s in kJ/kgK
+h3 = 3565 //Enthalpy at state 3 in kJ/kgK
+h4s = 2300 // Enthalpy at state 4s in kJ/kgK
+x4s = 0.88 // Steam quality at state 4s
+h5 = 191.83// Enthalpy at state 5 in kJ/kgK
+v = 0.001 // specific volume in m^3/kg
+P = 150 // Boiler outlet pressure in bar
+Wp = v*P*100 // Pump work
+h6s = 206.83 // Enthalpy at state 6s in kJ/kgK
+Q1 = (h1-h6s)+(h3-h2s) // Heat addition
+Wt = (h1-h2s)+(h3-h4s) // Turbine work
+Wnet = Wt-Wp // Net work
+n_cycle = 100*Wnet/Q1 // cycle efficiency
+sr = 3600/Wnet //Steam rate
+
+printf("\n Example 12.4 \n")
+printf("\n Quality at turbine exhaust is %f ",0.88)
+printf("\n Cycle efficiency is %f percent",n_cycle)
+printf("\n Steam rate is %f kg/kW h",sr)
+//The answers vary due to round off error
diff --git a/3685/CH12/EX12.4/Ex12_4.txt b/3685/CH12/EX12.4/Ex12_4.txt new file mode 100644 index 000000000..edb7fc5b3 --- /dev/null +++ b/3685/CH12/EX12.4/Ex12_4.txt @@ -0,0 +1,6 @@ +
+ Example 12.4
+
+ Quality at turbine exhaust is 0.880000
+ Cycle efficiency is 43.904347 percent
+ Steam rate is 2.181818 kg/kW h
\ No newline at end of file |