OilfieldToolsNet/opm-simulators
4
0
Fork 0
mirror of https://github.com/OPM/opm-simulators.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

This adds bubble/dew point pressure output to legacy flow

Browse Source
This commit is contained in:
babrodtk
2017-04-18 11:29:49 +02:00
parent 6d9440d8e2
commit 8ae7178f0a
7 changed files with 96 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

50
opm/autodiff/BlackoilPropsAdFromDeck.cpp
View File

@@ -942,16 +942,66 @@ BlackoilPropsAdFromDeck::BlackoilPropsAdFromDeck(const BlackoilPropsAdFromDeck&
}
}
// Get max oil saturation vector
const std::vector<double>& BlackoilPropsAdFromDeck::satOilMax() const
{
return satOilMax_;
}
// Set max oil saturation vector
void BlackoilPropsAdFromDeck::setSatOilMax(const std::vector<double>& max_sat) {
assert(satOilMax_.size() == max_sat.size());
satOilMax_ = max_sat;
}
/// Bubble point pressures
std::vector<double> BlackoilPropsAdFromDeck::bubblePointPressure(const Cells& cells,
const V& T,
const V& rs) const
{
if (!phase_usage_.phase_used[Gas]) {
OPM_THROW(std::runtime_error, "Cannot call bubblePointPressure(): gas phase not active.");
}
const int n = cells.size();
std::vector<double> Pb(n, 0.0);
for (int i = 0; i < n; ++i) {
unsigned pvtRegionIdx = cellPvtRegionIdx_[cells[i]];
try {
Pb[i] = FluidSystem::oilPvt().saturationPressure(pvtRegionIdx, T[i], rs[i]);
}
catch (const NumericalProblem&) {
// Ignore
}
}
return Pb;
}
/// Dew point pressures
std::vector<double> BlackoilPropsAdFromDeck::dewPointPressure(const Cells& cells,
const V& T,
const V& rv) const
{
if (!phase_usage_.phase_used[Gas]) {
OPM_THROW(std::runtime_error, "Cannot call dewPointPressure(): gas phase not active.");
}
const int n = cells.size();
std::vector<double> Pd(n, 0.0);
for (int i = 0; i < n; ++i) {
unsigned pvtRegionIdx = cellPvtRegionIdx_[cells[i]];
try {
Pd[i] = FluidSystem::gasPvt().saturationPressure(pvtRegionIdx, T[i], rv[i]);
}
catch (const NumericalProblem&) {
// Ignore
}
}
return Pd;
}
/// Set capillary pressure scaling according to pressure diff. and initial water saturation.
/// \param[in] saturation Array of n*numPhases saturation values.
/// \param[in] pc Array of n*numPhases capillary pressure values.