1 files changed, 29 insertions, 0 deletions
diff --git a/551/CH3/EX3.21/21.sce b/551/CH3/EX3.21/21.sce
new file mode 100755
index 000000000..883f60eab
--- /dev/null
+++ b/551/CH3/EX3.21/21.sce
@@ -0,0 +1,29 @@
+clc
+p1=10; //bar
+t_sup=400; //0C
+p2=0.2; //bar
+x2=0.9;
+h_sup=3263.9; //kJ/kg
+s_sup=7.465;  //kJ/kg
+h1=3263.9; //kJ/kg
+s1=s_sup;
+h_f2=251.5; //kJ/kg
+h_fg2=2358.4; //kJ/kg
+s_f2=0.8321; //kJ/kg.K
+s_g2=7.9094; //kJ/kg.K
+s_fg2=s_g2-s_f2;
+h2=h_f2+x2*h_fg2;
+s2=s_f2+x2*s_fg2;
+
+disp("(i) Drop in enthalpy")
+dh=h1-h2;
+disp("Drop in enthalpy = ")
+disp(dh)
+disp("kJ/kg")
+
+
+disp("(ii) Change in entropy")
+ds=s1-s2;
+disp("Change in entropy = ")
+disp(ds)
+disp("kJ/kg.K")
+\ No newline at end of file