diff options
Diffstat (limited to '3831/CH9/EX9.7/Ex9_7.sce')
| -rw-r--r-- | 3831/CH9/EX9.7/Ex9_7.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3831/CH9/EX9.7/Ex9_7.sce b/3831/CH9/EX9.7/Ex9_7.sce new file mode 100644 index 000000000..91cfa862f --- /dev/null +++ b/3831/CH9/EX9.7/Ex9_7.sce @@ -0,0 +1,17 @@ +// Example 9_7
+clc;funcprot(0);
+// Given data
+mdot=0.500;// kg/s
+p_1=8.00;// MPa
+T_1=300;// °C
+T_2=100;// °C
+x_2=1.00;// The quality of steam at station 2
+T_b=20.0;// °C
+h_1=2785.0;// kJ/kg
+h_2=2676.0;// kJ/kg
+s_1=5.7914;// kJ/kg.K
+s_2=7.3557;// kJ/kg.K
+
+// Calculation
+W_max=mdot*[(h_1-((T_b+273.15)*s_1))-(h_2-((T_b+273.15)*s_2))];// kW
+printf("\nThe maximum (reversible) power,W_max=%3.0f kW",W_max);
|