diff options
Diffstat (limited to '2267/CH7/EX7.9/ex7_9.sce')
| -rwxr-xr-x | 2267/CH7/EX7.9/ex7_9.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/2267/CH7/EX7.9/ex7_9.sce b/2267/CH7/EX7.9/ex7_9.sce new file mode 100755 index 000000000..e314cebce --- /dev/null +++ b/2267/CH7/EX7.9/ex7_9.sce @@ -0,0 +1,17 @@ +//Part A Chapter 7 Example 9
+clc;
+clear;
+close;
+p=800;//kPa
+T=200//degree C
+Tsat=170.43;//degree C(at 800kPa)
+v1=0.2404;//m^3/kg(at 800kPa)
+v2=0.2404;//m^3/kg(at 800kPa)
+vg=v2;//m^3/kg//(at 800kPa)
+T1=175;T2=170;//degree C(vg=0.2404;//m^3/kg)
+vg1=0.2168;//m^3/kg
+vg2=0.2428;//m^3/kg
+T2_begin=T1-(T1-T2)*(v1-vg1)/(vg2-vg1);//degree C
+p1=892;p2=791.7;//kPa(vg=0.2404;//m^3/kg)
+p2_begin=p1-(p1-p2)*(v1-vg1)/(vg2-vg1);//degree C
+disp("Pressure and temperature at condensation is "+string(p2_begin)+" kPa & "+string(T2_begin)+" degree C");
|