27#ifndef OPM_BINARY_COEFF_H2O_MESITYLENE_HPP
28#define OPM_BINARY_COEFF_H2O_MESITYLENE_HPP
51 template <
class Evaluation>
52 static Evaluation
henry(
const Evaluation& )
55 double sanderH = 1.7e-1;
57 double opmH = sanderH / 101.325;
66 template <
class Evaluation>
67 static Evaluation
gasDiffCoeff(Evaluation temperature, Evaluation pressure)
72 temperature =
max(temperature, 1e-9);
73 temperature =
min(temperature, 500.0);
74 pressure =
max(pressure, 0.0);
75 pressure =
min(pressure, 1e8);
79 const double Tb_m = 437.9;
80 const double Tb_w = 373.15;
81 const double V_B_w = 18.0;
82 const double sigma_w = 1.18*
std::pow(V_B_w, 0.333);
83 const double T_scal_w = 1.15*Tb_w;
84 const double V_B_m = 162.6;
85 const double sigma_m = 1.18*
std::pow(V_B_m, 0.333);
86 const double sigma_wm = 0.5*(sigma_w + sigma_m);
87 const double T_scal_m = 1.15*Tb_m;
88 const double T_scal_wm =
std::sqrt(T_scal_w*T_scal_m);
90 const Evaluation T_star =
max(temperature/T_scal_wm, 1e-5);
92 const Evaluation& Omega = 1.06036/
pow(T_star,0.1561) + 0.193/
exp(T_star*0.47635)
93 + 1.03587/
exp(T_star*1.52996) + 1.76474/
exp(T_star*3.89411);
94 const double B_ = 0.00217 - 0.0005*
std::sqrt(1.0/M_w + 1.0/M_m);
95 const double Mr = (M_w + M_m)/(M_w*M_m);
96 const Evaluation D_wm = (B_*
pow(temperature,1.6)*
std::sqrt(Mr))
97 /(1e-5*pressure*
std::pow(sigma_wm, 2.0)*Omega);
105 template <
class Evaluation>
Binary coefficients for water and mesitylene.
Definition: H2O_Mesitylene.hpp:42
static Evaluation henry(const Evaluation &)
Henry coefficent for mesitylene in liquid water.
Definition: H2O_Mesitylene.hpp:52
static Evaluation gasDiffCoeff(Evaluation temperature, Evaluation pressure)
Binary diffusion coefficent [m^2/s] for molecular water and mesitylene.
Definition: H2O_Mesitylene.hpp:67
static Evaluation liquidDiffCoeff(const Evaluation &, const Evaluation &)
Diffusion coefficent [m^2/s] for mesitylene in liquid water.
Definition: H2O_Mesitylene.hpp:106
Material properties of pure water .
Definition: H2O.hpp:62
static const Scalar molarMass()
The molar mass in of water.
Definition: H2O.hpp:80
Component for Mesitylene.
Definition: Mesitylene.hpp:45
static Scalar molarMass()
The molar mass in of mesitylene.
Definition: Mesitylene.hpp:58
Definition: Air_Mesitylene.hpp:34
Evaluation exp(const Evaluation &value)
Definition: MathToolbox.hpp:403
Evaluation sqrt(const Evaluation &value)
Definition: MathToolbox.hpp:399
ReturnEval_< Evaluation1, Evaluation2 >::type min(const Evaluation1 &arg1, const Evaluation2 &arg2)
Definition: MathToolbox.hpp:346
ReturnEval_< Evaluation1, Evaluation2 >::type max(const Evaluation1 &arg1, const Evaluation2 &arg2)
Definition: MathToolbox.hpp:341
ReturnEval_< Evaluation1, Evaluation2 >::type pow(const Evaluation1 &base, const Evaluation2 &exp)
Definition: MathToolbox.hpp:416