summaryrefslogtreecommitdiff
path: root/551/CH3/EX3.19/19.sce
diff options
context:
space:
mode:
Diffstat (limited to '551/CH3/EX3.19/19.sce')
-rwxr-xr-x551/CH3/EX3.19/19.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/551/CH3/EX3.19/19.sce b/551/CH3/EX3.19/19.sce
new file mode 100755
index 000000000..1ec6d28c1
--- /dev/null
+++ b/551/CH3/EX3.19/19.sce
@@ -0,0 +1,15 @@
+clc
+h_g1=2797.2; //kJ/kg
+c_ps= 2.25;
+T_sup=350; //0C
+T_s=212.4; //0C
+h1=h_g1+c_ps*(T_sup-T_s);
+h_f2=908.6; //kJ/kg
+h_fg2=1888.6; //kJ/kg
+
+// Main:20 bar, 250 0C
+T_sup=250; //0C
+Q=2*[h_g1+c_ps*(T_sup-T_s)];
+x2=(Q-h1-h_f2)/h_fg2;
+disp("Quality of steam")
+disp(x2) \ No newline at end of file