summaryrefslogtreecommitdiff
path: root/632/CH8/EX8.10/8_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '632/CH8/EX8.10/8_10.sce')
-rwxr-xr-x632/CH8/EX8.10/8_10.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/632/CH8/EX8.10/8_10.sce b/632/CH8/EX8.10/8_10.sce
new file mode 100755
index 000000000..3fac87de0
--- /dev/null
+++ b/632/CH8/EX8.10/8_10.sce
@@ -0,0 +1,13 @@
+//clc()
+P = 100;//kPa
+T = [273 280 290 300 310 320 330 340];
+for i =1:8
+ Ps(i) = exp(13.8216 - 2697.55/(T(i)-48.78));
+end
+disp((Ps))
+for j = 1:8
+ Ys(j) = Ps(j) * 86.11 / ((P - Ps(j))*28);
+end
+disp(Ys)
+plot(T,Ys,rect=[273,0,333,10]);
+xtitle('100% saturation line for nitrogen-hexane system','Temperature, K','Humidity, kg hexane/kg nitrogen'); \ No newline at end of file