summaryrefslogtreecommitdiff
path: root/3685/CH12/EX12.4/Ex12_4.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3685/CH12/EX12.4/Ex12_4.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3685/CH12/EX12.4/Ex12_4.sce')
-rw-r--r--3685/CH12/EX12.4/Ex12_4.sce22
1 files changed, 22 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