summaryrefslogtreecommitdiff
path: root/551/CH3/EX3.22/22.sce
diff options
context:
space:
mode:
Diffstat (limited to '551/CH3/EX3.22/22.sce')
-rwxr-xr-x551/CH3/EX3.22/22.sce12
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