diff options
Diffstat (limited to '581/CH11/EX11.6/Example11_6.sce')
| -rwxr-xr-x | 581/CH11/EX11.6/Example11_6.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/581/CH11/EX11.6/Example11_6.sce b/581/CH11/EX11.6/Example11_6.sce new file mode 100755 index 000000000..f1cbeebb2 --- /dev/null +++ b/581/CH11/EX11.6/Example11_6.sce @@ -0,0 +1,13 @@ +
+
+clear ;
+clc;
+
+printf("\t Example 11.6\n");
+T1=263.15; //temp.of ice,K
+
+Pv=exp(21.99-6141/(T1)); //vapor pressure,KPa
+xw=Pv/101.325; //mole fraction of water
+mw=xw*18.02/(xw*18.02+(1-xw)*28.96); //mass fraction
+printf("\t mass fraction of watervapor above the surface of ice is :%.5f\n",mw);
+//end
\ No newline at end of file |