% An m-file to set the vapor pressure data for water and ethanol.
peth=[0.00131578947368   0.00657894736842   0.01315789473684   0.02631578947368];
peth=[peth,0.05263157894737   0.07894736842105   0.13157894736842   0.26315789473684];
peth=[peth,0.52631578947368   1.   2.   5.  10.  20.  30.  40. 50.  60.  63.1];
pwater=[0.00006025  0.0002307237  0.0007279474  0.0019655253];
pwater=[pwater,0.0046723684  0.01  0.02  0.05 0.1  0.2  0.3  0.4 0.5  0.6  2.18]*100;
teth=[-0.313 -0.12 -0.023  0.08  0.19  0.26  0.349  0.484];
teth=[teth, 0.635  0.784  0.975  1.26 1.518  1.83  2.03  2.18   2.3  2.42  2.435];
teth=teth*100;
twater=[0   0.2  0.4  0.6  0.8  1.  1.201  1.524  1.805  2.131];
twater=[twater,  2.346  2.511  2.647  2.765  3.742]*100;
