diff options
Diffstat (limited to '551/CH3/EX3.22/22.sce')
-rwxr-xr-x | 551/CH3/EX3.22/22.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/551/CH3/EX3.22/22.sce b/551/CH3/EX3.22/22.sce new file mode 100755 index 000000000..ddab1bf4a --- /dev/null +++ b/551/CH3/EX3.22/22.sce @@ -0,0 +1,12 @@ +clc
+m=1; //kg
+p=12; //bar
+T_sup=523; //K
+c_ps=2.1; //kJ/kg.K
+T_s=461; //K
+h_fg=1984.3; //kJ/kg
+c_pw=4.18;
+s_sup=c_pw*log(T_s/273)+h_fg/T_s+c_ps*log(T_sup/T_s);
+disp("Entropy =")
+disp(s_sup)
+disp("kJ/kg.K")
\ No newline at end of file |