diff options
Diffstat (limited to '551/CH7/EX7.20/20.sce')
-rwxr-xr-x | 551/CH7/EX7.20/20.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/551/CH7/EX7.20/20.sce b/551/CH7/EX7.20/20.sce new file mode 100755 index 000000000..d997b33c0 --- /dev/null +++ b/551/CH7/EX7.20/20.sce @@ -0,0 +1,15 @@ +clc
+h_fg=294.54; //kJ/kg
+
+// log(p)=7.0323 - 3276.6/T - 0.652*log(T)
+// Differentiating both sides, we get
+// 1/2.302/p*dp/dT=3276.6/T^2-0.652/2.302/T
+
+//Putting p=0.1 bar , we get
+p=0.1; //bar
+T=523; //K
+
+vg=h_fg*10^3/T/(2.302*3276.6*p*10^5/T^2 - 0.652*p*10^5/T);
+disp("vg=")
+disp(vg)
+disp("m^3/kg")
\ No newline at end of file |