27#ifndef OPM_PENG_ROBINSON_MIXTURE_HPP
28#define OPM_PENG_ROBINSON_MIXTURE_HPP
39template <
class Scalar,
class StaticParameters>
42 enum { numComponents = StaticParameters::numComponents };
49 static const Scalar R;
52 static const Scalar u;
53 static const Scalar w;
62 template <
class MutableParams,
class Flu
idState>
64 const MutableParams& params,
68 return PengRobinson::computeMolarVolumes(Vm, params, phaseIdx, fs);
88 template <
class Flu
idState,
class Params,
class LhsEval =
typename Flu
idState::Scalar>
97 LhsEval Vm = params.molarVolume(phaseIdx);
100 LhsEval bi_b = params.bPure(phaseIdx, compIdx) / params.b(phaseIdx);
103 LhsEval RT = R*fs.temperature(phaseIdx);
104 LhsEval p = fs.pressure(phaseIdx);
108 LhsEval Astar = params.a(phaseIdx)*p/(RT*RT);
109 LhsEval Bstar = params.b(phaseIdx)*p/(RT);
112 for (
unsigned compJIdx = 0; compJIdx < numComponents; ++compJIdx) {
113 A_s += params.aCache(phaseIdx, compIdx, compJIdx) * fs.moleFraction(phaseIdx, compJIdx) * p / (RT * RT);
128 alpha = -
log(Z - Bstar) + bi_b * (Z - 1);
129 betta =
log((Z + m2 * Bstar) / (Z + m1 * Bstar)) * Astar / ((m1 - m2) * Bstar);
130 gamma = (2 / Astar ) * A_s - bi_b;
131 ln_phi = alpha + (betta * gamma);
133 fugCoeff =
exp(ln_phi);
141 fugCoeff =
min(1e10, fugCoeff);
146 fugCoeff =
max(1e-10, fugCoeff);
154template <
class Scalar,
class StaticParameters>
156template<
class Scalar,
class StaticParameters>
157const Scalar PengRobinsonMixture<Scalar, StaticParameters>::u = 2.0;
158template<
class Scalar,
class StaticParameters>
159const Scalar PengRobinsonMixture<Scalar, StaticParameters>::w = -1.0;
static const Scalar R
The ideal gas constant [J/(mol K)].
Definition: Constants.hpp:45
Implements the Peng-Robinson equation of state for a mixture.
Definition: PengRobinsonMixture.hpp:41
static int computeMolarVolumes(Scalar *Vm, const MutableParams ¶ms, unsigned phaseIdx, const FluidState &fs)
Computes molar volumes where the Peng-Robinson EOS is true.
Definition: PengRobinsonMixture.hpp:63
static LhsEval computeFugacityCoefficient(const FluidState &fs, const Params ¶ms, unsigned phaseIdx, unsigned compIdx)
Returns the fugacity coefficient of an individual component in the phase.
Definition: PengRobinsonMixture.hpp:89
Implements the Peng-Robinson equation of state for liquids and gases.
Definition: PengRobinson.hpp:56
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
Evaluation log(const Evaluation &value)
Definition: MathToolbox.hpp:407