1 files changed, 18 insertions, 0 deletions
diff --git a/632/CH5/EX5.7/example5_7.sce b/632/CH5/EX5.7/example5_7.sce
new file mode 100755
index 000000000..72937ea2b
--- /dev/null
+++ b/632/CH5/EX5.7/example5_7.sce
@@ -0,0 +1,18 @@
+//clc()
+T = 510;//K
+P = 26.6;//bar
+Tc = 425.2;//K
+Pc = 38;//bar
+w = 0.193;
+R = 8.314;
+Pr = P / Pc;
+Tr = T / Tc;
+disp(Pr,"Pr = ")
+disp(Tr,"Tr = ")
+//From fig. 5.6 and 5.7 from the text book
+Z0 = 0.855;
+Z1 = 0.042;
+Z = Z0 + w*Z1;
+disp(Z,"Z = ")
+V = R * T * Z / (P * 10^5);
+disp("m^3/mol",V,"Molar volume of n-butane = ")
+\ No newline at end of file