1 files changed, 12 insertions, 0 deletions
diff --git a/632/CH7/EX7.8/example7_8.sce b/632/CH7/EX7.8/example7_8.sce
new file mode 100755
index 000000000..98424d78e
--- /dev/null
+++ b/632/CH7/EX7.8/example7_8.sce
@@ -0,0 +1,12 @@
+//clc()
+MW = 44.032;
+Mwater = 18.016;
+x = 2;//%
+Pa = 41.4;//kPa
+Mfr = (x/MW)/(x/MW + (100-x)/Mwater);
+//henry's law gives Pa = Ha * xa
+Ha = Pa / Mfr;
+Molality = 0.1;
+Mfr1 = Molality / (1000/Mwater + Molality);
+Pa1 = Ha * Mfr1;
+disp("kPa",Pa1,"Partial Pressure = ")
+\ No newline at end of file