1 files changed, 26 insertions, 0 deletions
diff --git a/2870/CH7/EX7.3/Ex7_3.sce b/2870/CH7/EX7.3/Ex7_3.sce
new file mode 100755
index 000000000..3d1aaae3e
--- /dev/null
+++ b/2870/CH7/EX7.3/Ex7_3.sce
@@ -0,0 +1,26 @@
+clc;clear;
+//Example 7.3
+
+//given data
+m=5;
+P1=140;
+T1=20;
+P2=100;
+
+//from refrigerant-134a data
+//at P1 and T1
+s1=1.0624;
+v1=0.16544;
+//at P2
+v2=v1;
+vf=0.0007529;
+vg=0.19254;
+sf=0.07188;
+sfg=0.87995;
+
+//calculations
+// vf < v2 <vg
+x2=(v2-vf)/(vg-vf);
+s2=sf+x2*sfg;
+dS=m*(s2-s1);
+disp(dS,'entropy change in the process in kJ/k')