diff options
Diffstat (limited to '632/CH5/EX5.6/example5_6.sce')
-rwxr-xr-x | 632/CH5/EX5.6/example5_6.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/632/CH5/EX5.6/example5_6.sce b/632/CH5/EX5.6/example5_6.sce new file mode 100755 index 000000000..cedcb2534 --- /dev/null +++ b/632/CH5/EX5.6/example5_6.sce @@ -0,0 +1,17 @@ +//clc()
+T = 510;//K
+P = 26.6;//bar
+Tc = 425.2;//K
+Pc = 38;//bar
+Zc = 0.274;
+R = 8.314;
+Pr = P / Pc;
+Tr = T / Tc;
+disp(Pr,"Pr = ")
+disp(Tr,"Tr = ")
+//From fig. 5.4 and 5.5 from the text book
+Z = 0.865;
+D = 0.15;
+Z1 = Z + D * ( Zc - 0.27);
+V = R * T * Z1 / (P * 10^5);
+disp("m^3/mol",V,"Molar volume of n-butane = ")
\ No newline at end of file |