diff options
Diffstat (limited to '3685/CH8/EX8.18/Ex8_18.sce')
| -rw-r--r-- | 3685/CH8/EX8.18/Ex8_18.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/3685/CH8/EX8.18/Ex8_18.sce b/3685/CH8/EX8.18/Ex8_18.sce new file mode 100644 index 000000000..cfdc774b1 --- /dev/null +++ b/3685/CH8/EX8.18/Ex8_18.sce @@ -0,0 +1,23 @@ +clc
+h1 = 3230.9 // Enthalpy of steam at turbine inlet in kJ/kg
+s1 = 6.69212// Entropy of steam at turbine inlet in kJ/kgK
+V1 = 160 // Velocity of steam at turbine inlet in m/s
+T1 = 400 // Temperature of steam at turbine inlet in degree Celsius
+h2 = 2676.1 // Enthalpy of steam at turbine exit in kJ/kg
+s2 = 7.3549 // Entropy of steam at turbine exit in kJ/kgK
+V2 = 100 // Velocity of steam at turbine exit in m/s
+T2 = 100 // Temperature of steam at turbine exit in degree Celsius
+T0 = 298 // Ambient temperature in K
+W = 540 // Work developed by turbine in kW
+Tb = 500 // Average outer surface temperature of turbine in K
+
+printf("\n Example 8.18")
+Q = (h1-h2)+((V1^2-V2^2)/2)*1e-03-W // Heat loss
+I = 151.84-Q*(0.404) // Irreversibility
+AF = W + Q*(1-(T0/Tb)) + I // Exergy transfer
+n2 = W/AF // second law efficiency
+
+printf("\n Irreversibility per unit mass is %f kJ/kg",I)
+printf("\n The second law efficiency of the turbine is %d percent",n2*100)
+
+
|