27 #ifndef OPM_DRY_HUMID_GAS_PVT_HPP
28 #define OPM_DRY_HUMID_GAS_PVT_HPP
37 #include <opm/input/eclipse/EclipseState/EclipseState.hpp>
38 #include <opm/input/eclipse/EclipseState/Tables/TableManager.hpp>
43 #include <opm/common/OpmLog/OpmLog.hpp>
52 template <
class Scalar>
55 typedef std::vector<std::pair<Scalar, Scalar> > SamplingPoints;
67 const std::vector<Scalar>& waterReferenceDensity,
68 const std::vector<TabulatedTwoDFunction>& inverseGasB,
69 const std::vector<TabulatedOneDFunction>& inverseSaturatedGasB,
70 const std::vector<TabulatedTwoDFunction>& gasMu,
71 const std::vector<TabulatedTwoDFunction>& inverseGasBMu,
72 const std::vector<TabulatedOneDFunction>& inverseSaturatedGasBMu,
73 const std::vector<TabulatedOneDFunction>& saturatedWaterVaporizationFactorTable,
76 : gasReferenceDensity_(gasReferenceDensity)
77 , waterReferenceDensity_(waterReferenceDensity)
78 , inverseGasB_(inverseGasB)
79 , inverseSaturatedGasB_(inverseSaturatedGasB)
81 , inverseGasBMu_(inverseGasBMu)
82 , inverseSaturatedGasBMu_(inverseSaturatedGasBMu)
83 , saturatedWaterVaporizationFactorTable_(saturatedWaterVaporizationFactorTable)
84 , saturationPressure_(saturationPressure)
96 void initFromState(
const EclipseState& eclState,
const Schedule&)
98 const auto& pvtgwTables = eclState.getTableManager().getPvtgwTables();
99 const auto& densityTable = eclState.getTableManager().getDensityTable();
101 assert(pvtgwTables.size() == densityTable.size());
106 for (
unsigned regionIdx = 0; regionIdx <
numRegions; ++ regionIdx) {
107 Scalar rhoRefO = densityTable[regionIdx].oil;
108 Scalar rhoRefG = densityTable[regionIdx].gas;
109 Scalar rhoRefW = densityTable[regionIdx].water;
114 for (
unsigned regionIdx = 0; regionIdx <
numRegions; ++ regionIdx) {
115 const auto& pvtgwTable = pvtgwTables[regionIdx];
117 const auto& saturatedTable = pvtgwTable.getSaturatedTable();
118 assert(saturatedTable.numRows() > 1);
120 auto& gasMu = gasMu_[regionIdx];
121 auto& invGasB = inverseGasB_[regionIdx];
122 auto& invSatGasB = inverseSaturatedGasB_[regionIdx];
123 auto& invSatGasBMu = inverseSaturatedGasBMu_[regionIdx];
124 auto& waterVaporizationFac = saturatedWaterVaporizationFactorTable_[regionIdx];
126 waterVaporizationFac.setXYArrays(saturatedTable.numRows(),
127 saturatedTable.getColumn(
"PG"),
128 saturatedTable.getColumn(
"RW"));
130 std::vector<Scalar> invSatGasBArray;
131 std::vector<Scalar> invSatGasBMuArray;
134 for (
unsigned outerIdx = 0; outerIdx < saturatedTable.numRows(); ++ outerIdx) {
135 Scalar pg = saturatedTable.get(
"PG" , outerIdx);
136 Scalar B = saturatedTable.get(
"BG" , outerIdx);
137 Scalar mu = saturatedTable.get(
"MUG" , outerIdx);
139 invGasB.appendXPos(pg);
140 gasMu.appendXPos(pg);
142 invSatGasBArray.push_back(1.0/B);
143 invSatGasBMuArray.push_back(1.0/(mu*B));
145 assert(invGasB.numX() == outerIdx + 1);
146 assert(gasMu.numX() == outerIdx + 1);
148 const auto& underSaturatedTable = pvtgwTable.getUnderSaturatedTable(outerIdx);
149 size_t numRows = underSaturatedTable.numRows();
150 for (
size_t innerIdx = 0; innerIdx < numRows; ++ innerIdx) {
151 Scalar Rw = underSaturatedTable.get(
"RW" , innerIdx);
152 Scalar Bg = underSaturatedTable.get(
"BG" , innerIdx);
153 Scalar mug = underSaturatedTable.get(
"MUG" , innerIdx);
155 invGasB.appendSamplePoint(outerIdx, Rw, 1.0/Bg);
156 gasMu.appendSamplePoint(outerIdx, Rw, mug);
161 std::vector<double> tmpPressure = saturatedTable.getColumn(
"PG").vectorCopy( );
163 invSatGasB.setXYContainers(tmpPressure, invSatGasBArray);
164 invSatGasBMu.setXYContainers(tmpPressure, invSatGasBMuArray);
168 for (
unsigned xIdx = 0; xIdx < invGasB.numX(); ++xIdx) {
170 assert(invGasB.numY(xIdx) > 0);
174 if (invGasB.numY(xIdx) > 1)
180 size_t masterTableIdx = xIdx + 1;
181 for (; masterTableIdx < saturatedTable.numRows(); ++masterTableIdx)
183 if (pvtgwTable.getUnderSaturatedTable(masterTableIdx).numRows() > 1)
187 if (masterTableIdx >= saturatedTable.numRows())
188 throw std::runtime_error(
"PVTGW tables are invalid: The last table must exhibit at least one "
189 "entry for undersaturated gas!");
193 extendPvtgwTable_(regionIdx,
195 pvtgwTable.getUnderSaturatedTable(xIdx),
196 pvtgwTable.getUnderSaturatedTable(masterTableIdx));
206 void extendPvtgwTable_(
unsigned regionIdx,
208 const SimpleTable& curTable,
209 const SimpleTable& masterTable)
211 std::vector<double> RwArray = curTable.getColumn(
"RW").vectorCopy();
212 std::vector<double> gasBArray = curTable.getColumn(
"BG").vectorCopy();
213 std::vector<double> gasMuArray = curTable.getColumn(
"MUG").vectorCopy();
215 auto& invGasB = inverseGasB_[regionIdx];
216 auto& gasMu = gasMu_[regionIdx];
218 for (
size_t newRowIdx = 1; newRowIdx < masterTable.numRows(); ++ newRowIdx) {
219 const auto& RWColumn = masterTable.getColumn(
"RW");
220 const auto& BGColumn = masterTable.getColumn(
"BG");
221 const auto& viscosityColumn = masterTable.getColumn(
"MUG");
224 Scalar diffRw = RWColumn[newRowIdx] - RWColumn[newRowIdx - 1];
225 Scalar newRw = RwArray.back() + diffRw;
228 Scalar B1 = BGColumn[newRowIdx];
229 Scalar B2 = BGColumn[newRowIdx - 1];
230 Scalar x = (B1 - B2)/( (B1 + B2)/2.0 );
234 Scalar newBg = gasBArray.back()*(1.0 + x/2.0)/(1.0 - x/2.0);
237 Scalar mu1 = viscosityColumn[newRowIdx];
238 Scalar mu2 = viscosityColumn[newRowIdx - 1];
239 Scalar xMu = (mu1 - mu2)/( (mu1 + mu2)/2.0 );
243 Scalar newMug = gasMuArray.back()*(1.0 + xMu/2)/(1.0 - xMu/2.0);
247 RwArray.push_back(newRw);
248 gasBArray.push_back(newBg);
249 gasMuArray.push_back(newMug);
252 invGasB.appendSamplePoint(xIdx, newRw, 1.0/newBg);
253 gasMu.appendSamplePoint(xIdx, newRw, newMug);
269 saturatedWaterVaporizationFactorTable_.resize(
numRegions);
281 waterReferenceDensity_[regionIdx] = rhoRefWater;
282 gasReferenceDensity_[regionIdx] = rhoRefGas;
291 { saturatedWaterVaporizationFactorTable_[regionIdx].setContainerOfTuples(samplePoints); }
306 { inverseGasB_[regionIdx] = invBg; }
314 { gasMu_[regionIdx] = mug; }
325 auto& waterVaporizationFac = saturatedWaterVaporizationFactorTable_[regionIdx];
328 Scalar RwMax = waterVaporizationFac.eval(saturatedWaterVaporizationFactorTable_[regionIdx].xMax(),
true);
330 Scalar poMin = samplePoints.front().first;
331 Scalar poMax = samplePoints.back().first;
334 size_t nP = samplePoints.size()*2;
341 for (
size_t RwIdx = 0; RwIdx < nRw; ++RwIdx) {
342 Scalar Rw = RwMin + (RwMax - RwMin)*RwIdx/nRw;
344 gasMu_[regionIdx].appendXPos(Rw);
346 for (
size_t pIdx = 0; pIdx < nP; ++pIdx) {
347 Scalar pg = poMin + (poMax - poMin)*pIdx/nP;
348 Scalar mug = mugTable.
eval(pg,
true);
350 gasMu_[regionIdx].appendSamplePoint(RwIdx, pg, mug);
362 for (
unsigned regionIdx = 0; regionIdx <
numRegions; ++ regionIdx) {
365 const auto& gasMu = gasMu_[regionIdx];
366 const auto& invGasB = inverseGasB_[regionIdx];
367 assert(gasMu.numX() == invGasB.numX());
369 auto& invGasBMu = inverseGasBMu_[regionIdx];
370 auto& invSatGasB = inverseSaturatedGasB_[regionIdx];
371 auto& invSatGasBMu = inverseSaturatedGasBMu_[regionIdx];
373 std::vector<Scalar> satPressuresArray;
374 std::vector<Scalar> invSatGasBArray;
375 std::vector<Scalar> invSatGasBMuArray;
376 for (
size_t pIdx = 0; pIdx < gasMu.numX(); ++pIdx) {
377 invGasBMu.appendXPos(gasMu.xAt(pIdx));
379 assert(gasMu.numY(pIdx) == invGasB.numY(pIdx));
381 size_t numRw = gasMu.numY(pIdx);
382 for (
size_t RwIdx = 0; RwIdx < numRw; ++RwIdx)
383 invGasBMu.appendSamplePoint(pIdx,
384 gasMu.yAt(pIdx, RwIdx),
385 invGasB.valueAt(pIdx, RwIdx)
386 / gasMu.valueAt(pIdx, RwIdx));
391 satPressuresArray.push_back(gasMu.xAt(pIdx));
392 invSatGasBArray.push_back(invGasB.valueAt(pIdx, numRw - 1));
393 invSatGasBMuArray.push_back(invGasBMu.valueAt(pIdx, numRw - 1));
396 invSatGasB.setXYContainers(satPressuresArray, invSatGasBArray);
397 invSatGasBMu.setXYContainers(satPressuresArray, invSatGasBMuArray);
399 updateSaturationPressure_(regionIdx);
407 {
return gasReferenceDensity_.size(); }
412 template <
class Evaluation>
416 const Evaluation&)
const
418 throw std::runtime_error(
"Requested the enthalpy of gas but the thermal option is not enabled");
424 template <
class Evaluation>
427 const Evaluation& pressure,
428 const Evaluation& Rw)
const
430 const Evaluation& invBg = inverseGasB_[regionIdx].eval(pressure, Rw,
true);
431 const Evaluation& invMugBg = inverseGasBMu_[regionIdx].eval(pressure, Rw,
true);
433 return invBg/invMugBg;
439 template <
class Evaluation>
442 const Evaluation& pressure)
const
444 const Evaluation& invBg = inverseSaturatedGasB_[regionIdx].eval(pressure,
true);
445 const Evaluation& invMugBg = inverseSaturatedGasBMu_[regionIdx].eval(pressure,
true);
447 return invBg/invMugBg;
453 template <
class Evaluation>
456 const Evaluation& pressure,
457 const Evaluation& Rw)
const
458 {
return inverseGasB_[regionIdx].eval(pressure, Rw,
true); }
463 template <
class Evaluation>
466 const Evaluation& pressure)
const
467 {
return inverseSaturatedGasB_[regionIdx].eval(pressure,
true); }
472 template <
class Evaluation>
475 const Evaluation& pressure)
const
477 return saturatedWaterVaporizationFactorTable_[regionIdx].eval(pressure,
true);
483 template <
class Evaluation>
488 const Evaluation& )
const
494 template <
class Evaluation>
497 const Evaluation& )
const
507 template <
class Evaluation>
510 const Evaluation& Rw)
const
514 const auto& RwTable = saturatedWaterVaporizationFactorTable_[regionIdx];
515 const Scalar eps = std::numeric_limits<typename Toolbox::Scalar>::epsilon()*1e6;
518 Evaluation pSat = saturationPressure_[regionIdx].eval(Rw,
true);
523 bool onProbation =
false;
524 for (
unsigned i = 0; i < 20; ++i) {
525 const Evaluation& f = RwTable.eval(pSat,
true) - Rw;
526 const Evaluation& fPrime = RwTable.evalDerivative(pSat,
true);
530 if (std::abs(scalarValue(fPrime)) < 1.0e-30) {
534 const Evaluation& delta = f/fPrime;
548 if (std::abs(scalarValue(delta)) < std::abs(scalarValue(pSat))*eps)
552 std::stringstream errlog;
553 errlog <<
"Finding saturation pressure did not converge:"
554 <<
" pSat = " << pSat
557 OpmLog::debug(
"Wet gas saturation pressure", errlog.str());
562 template <
class Evaluation>
563 Evaluation diffusionCoefficient(
const Evaluation& ,
567 throw std::runtime_error(
"Not implemented: The PVT model does not provide a diffusionCoefficient()");
570 const Scalar gasReferenceDensity(
unsigned regionIdx)
const
571 {
return gasReferenceDensity_[regionIdx]; }
573 const Scalar waterReferenceDensity(
unsigned regionIdx)
const
574 {
return waterReferenceDensity_[regionIdx]; }
576 const std::vector<TabulatedTwoDFunction>& inverseGasB()
const {
580 const std::vector<TabulatedOneDFunction>& inverseSaturatedGasB()
const {
581 return inverseSaturatedGasB_;
584 const std::vector<TabulatedTwoDFunction>& gasMu()
const {
588 const std::vector<TabulatedTwoDFunction>& inverseGasBMu()
const {
589 return inverseGasBMu_;
592 const std::vector<TabulatedOneDFunction>& inverseSaturatedGasBMu()
const {
593 return inverseSaturatedGasBMu_;
596 const std::vector<TabulatedOneDFunction>& saturatedWaterVaporizationFactorTable()
const {
597 return saturatedWaterVaporizationFactorTable_;
600 const std::vector<TabulatedOneDFunction>& saturationPressure()
const {
601 return saturationPressure_;
604 Scalar vapPar1()
const {
608 bool operator==(
const DryHumidGasPvt<Scalar>& data)
const
610 return this->gasReferenceDensity_ == data.gasReferenceDensity_ &&
611 this->oilReferenceDensity_ == data.waterReferenceDensity_ &&
612 this->inverseGasB() == data.inverseGasB() &&
613 this->inverseSaturatedGasB() == data.inverseSaturatedGasB() &&
614 this->gasMu() == data.gasMu() &&
615 this->inverseGasBMu() == data.inverseGasBMu() &&
616 this->inverseSaturatedGasBMu() == data.inverseSaturatedGasBMu() &&
617 this->saturatedWaterVaporizationFactorTable() == data.saturatedWaterVaporizationFactorTable() &&
618 this->saturationPressure() == data.saturationPressure() &&
619 this->vapPar1() == data.vapPar1();
623 void updateSaturationPressure_(
unsigned regionIdx)
625 typedef std::pair<Scalar, Scalar> Pair;
626 const auto& waterVaporizationFac = saturatedWaterVaporizationFactorTable_[regionIdx];
630 size_t n = waterVaporizationFac.numSamples();
631 Scalar delta = (waterVaporizationFac.xMax() - waterVaporizationFac.xMin())/Scalar(n + 1);
633 SamplingPoints pSatSamplePoints;
635 for (
size_t i = 0; i <= n; ++ i) {
636 Scalar pSat = waterVaporizationFac.xMin() + Scalar(i)*delta;
640 pSatSamplePoints.push_back(val);
644 auto x_coord_comparator = [](
const Pair& a,
const Pair& b) {
return a.first == b.first; };
645 auto last = std::unique(pSatSamplePoints.begin(), pSatSamplePoints.end(), x_coord_comparator);
646 pSatSamplePoints.erase(last, pSatSamplePoints.end());
648 saturationPressure_[regionIdx].setContainerOfTuples(pSatSamplePoints);
651 std::vector<Scalar> gasReferenceDensity_;
652 std::vector<Scalar> waterReferenceDensity_;
653 std::vector<TabulatedTwoDFunction> inverseGasB_;
654 std::vector<TabulatedOneDFunction> inverseSaturatedGasB_;
655 std::vector<TabulatedTwoDFunction> gasMu_;
656 std::vector<TabulatedTwoDFunction> inverseGasBMu_;
657 std::vector<TabulatedOneDFunction> inverseSaturatedGasBMu_;
658 std::vector<TabulatedOneDFunction> saturatedWaterVaporizationFactorTable_;
659 std::vector<TabulatedOneDFunction> saturationPressure_;
A central place for various physical constants occuring in some equations.
This file provides a wrapper around the "final" C++-2011 statement.
Implements a linearly interpolated scalar function that depends on one variable.
This class represents the Pressure-Volume-Temperature relations of the gas phase with vaporized water...
Definition: DryHumidGasPvt.hpp:54
Evaluation saturatedOilVaporizationFactor(unsigned, const Evaluation &, const Evaluation &, const Evaluation &, const Evaluation &) const
Returns the oil vaporization factor [m^3/m^3] of the oil phase.
Definition: DryHumidGasPvt.hpp:484
Evaluation inverseFormationVolumeFactor(unsigned regionIdx, const Evaluation &, const Evaluation &pressure, const Evaluation &Rw) const
Returns the formation volume factor [-] of the fluid phase.
Definition: DryHumidGasPvt.hpp:454
void setGasViscosity(unsigned regionIdx, const TabulatedTwoDFunction &mug)
Initialize the viscosity of the gas phase.
Definition: DryHumidGasPvt.hpp:313
Evaluation saturationPressure(unsigned regionIdx, const Evaluation &, const Evaluation &Rw) const
Returns the saturation pressure of the gas phase [Pa] depending on its mass fraction of the water com...
Definition: DryHumidGasPvt.hpp:508
void setInverseGasFormationVolumeFactor(unsigned regionIdx, const TabulatedTwoDFunction &invBg)
Initialize the function for the gas formation volume factor.
Definition: DryHumidGasPvt.hpp:305
void initEnd()
Finish initializing the gas phase PVT properties.
Definition: DryHumidGasPvt.hpp:358
unsigned numRegions() const
Return the number of PVT regions which are considered by this PVT-object.
Definition: DryHumidGasPvt.hpp:406
Evaluation viscosity(unsigned regionIdx, const Evaluation &, const Evaluation &pressure, const Evaluation &Rw) const
Returns the dynamic viscosity [Pa s] of the fluid phase given a set of parameters.
Definition: DryHumidGasPvt.hpp:425
void setReferenceDensities(unsigned regionIdx, Scalar, Scalar rhoRefGas, Scalar rhoRefWater)
Initialize the reference densities of all fluids for a given PVT region.
Definition: DryHumidGasPvt.hpp:276
Evaluation saturatedWaterVaporizationFactor(unsigned regionIdx, const Evaluation &, const Evaluation &pressure) const
Returns the water vaporization factor [m^3/m^3] of the water phase.
Definition: DryHumidGasPvt.hpp:473
void setSaturatedGasWaterVaporizationFactor(unsigned regionIdx, const SamplingPoints &samplePoints)
Initialize the function for the oil vaporization factor .
Definition: DryHumidGasPvt.hpp:290
void setSaturatedGasViscosity(unsigned regionIdx, const SamplingPoints &samplePoints)
Initialize the phase viscosity for oil saturated gas.
Definition: DryHumidGasPvt.hpp:323
Evaluation internalEnergy(unsigned, const Evaluation &, const Evaluation &, const Evaluation &) const
Returns the specific enthalpy [J/kg] of gas given a set of parameters.
Definition: DryHumidGasPvt.hpp:413
Evaluation saturatedOilVaporizationFactor(unsigned, const Evaluation &, const Evaluation &) const
Returns the oil vaporization factor [m^3/m^3] of the oil phase.
Definition: DryHumidGasPvt.hpp:495
Evaluation saturatedViscosity(unsigned regionIdx, const Evaluation &, const Evaluation &pressure) const
Returns the dynamic viscosity [Pa s] of oil saturated gas at a given pressure.
Definition: DryHumidGasPvt.hpp:440
Evaluation saturatedInverseFormationVolumeFactor(unsigned regionIdx, const Evaluation &, const Evaluation &pressure) const
Returns the formation volume factor [-] of water saturated gas at a given pressure.
Definition: DryHumidGasPvt.hpp:464
Definition: Exceptions.hpp:46
Implements a linearly interpolated scalar function that depends on one variable.
Definition: Tabulated1DFunction.hpp:47
Evaluation eval(const Evaluation &x, bool extrapolate=false) const
Evaluate the spline at a given position.
Definition: Tabulated1DFunction.hpp:258
void setContainerOfTuples(const XYContainer &points, bool sortInputs=true)
Set the sampling points of the piecewise linear function using a STL-compatible container of tuple-li...
Definition: Tabulated1DFunction.hpp:184