diff options
Diffstat (limited to '632/CH11/EX11.19/example11_19.sce')
-rwxr-xr-x | 632/CH11/EX11.19/example11_19.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/632/CH11/EX11.19/example11_19.sce b/632/CH11/EX11.19/example11_19.sce new file mode 100755 index 000000000..0b0f322a2 --- /dev/null +++ b/632/CH11/EX11.19/example11_19.sce @@ -0,0 +1,10 @@ +//clc()
+T1 = 363;//K
+T2 = 373;//K
+P1s = 70.11;//kPa
+P2s = 101.3;//kPa
+R = 8.314;//kJ/kmolK
+// ln(P2s / P1s) = Hv / R * (1/T1 - 1/T2);
+Hv = (log(P2s/P1s)*R)/(1/T1 - 1/T2);
+Hv1 = Hv / (18);
+disp("kJ/kg",Hv1,"Mean heat of vaporization = ")
\ No newline at end of file |