diff options
Diffstat (limited to '3843/CH7/EX7.4/Ex7_4.sce')
| -rw-r--r-- | 3843/CH7/EX7.4/Ex7_4.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3843/CH7/EX7.4/Ex7_4.sce b/3843/CH7/EX7.4/Ex7_4.sce new file mode 100644 index 000000000..3b1c6c652 --- /dev/null +++ b/3843/CH7/EX7.4/Ex7_4.sce @@ -0,0 +1,15 @@ +// Example 7_4
+clc;funcprot(0);
+// Given data
+x=0.85;// The quality of steam
+P=5;// kPa
+T_0=298;// K
+
+// Calculation
+// From steam tables
+h_1=2197.2;// kJ/kg
+h_2=136.5;// kJ/kg
+s_1=7.2136;// kJ/kg.K
+s_2=0.4717;// kJ/kg.K
+dX=(h_1-h_2)-(T_0*(s_1-s_2));// The amount of useful work wasted in the condenser in kJ/kg
+printf("\nThe amount of useful work wasted in the condenser,X_2-X_1=%2.1f kJ/kg",dX);
|