summaryrefslogtreecommitdiff
path: root/551/CH7/EX7.20/20.sce
diff options
context:
space:
mode:
Diffstat (limited to '551/CH7/EX7.20/20.sce')
-rwxr-xr-x551/CH7/EX7.20/20.sce15
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