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

adding wellEqIteration() to StandardWell

Browse Source 
the involvement of the group control in updateWellControls() makes the
solution of well equations for each well individually more troublesome.
As a result, we will still makes the solveWellEq in all the wells level.
This commit is contained in:
Kai Bao 2017-06-26 16:01:45 +02:00
parent d99fe876dd
commit 9dace225de
3 changed files with 46 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
opm/autodiff/StandardWell.hpp
View File

@ -147,7 +147,7 @@ namespace Opm
void updateWellControl(WellState& xw) const;
virtual bool getWellConvergence(Simulator& ebosSimulator,
std::vector<double>& B_avg,
const std::vector<double>& B_avg,
const ModelParameters& param) const;
using WellInterface<TypeTag>::phaseUsage;
@ -181,7 +181,6 @@ namespace Opm
using WellInterface<TypeTag>::vfp_properties_;
using WellInterface<TypeTag>::gravity_;
using WellInterface<TypeTag>::well_efficiency_factor_;
using WellInterface<TypeTag>::active_;
using WellInterface<TypeTag>::phase_usage_;
using WellInterface<TypeTag>::first_perf_;
using WellInterface<TypeTag>::ref_depth_;
@ -242,6 +241,10 @@ namespace Opm
const std::vector<double>& rsmax_perf,
const std::vector<double>& rvmax_perf,
const std::vector<double>& surf_dens_perf);
virtual void wellEqIteration(Simulator& ebosSimulator,
const ModelParameters& param,
WellState& well_state);
};
}

47
opm/autodiff/StandardWell_impl.hpp
View File

@ -1136,15 +1136,15 @@ namespace Opm
double liquid = 0.0;
double vapour = 0.0;
const Opm::PhaseUsage& pu = phase_usage_;
const Opm::PhaseUsage& pu = *phase_usage_;
if (active_[ Water ]) {
if (active()[ Water ]) {
aqua = xw.wellRates()[well_index*np + pu.phase_pos[ Water ] ];
}
if (active_[ Oil ]) {
if (active()[ Oil ]) {
liquid = xw.wellRates()[well_index*np + pu.phase_pos[ Oil ] ];
}
if (active_[ Gas ]) {
if (active()[ Gas ]) {
vapour = xw.wellRates()[well_index*np + pu.phase_pos[ Gas ] ];
}
@ -1277,10 +1277,10 @@ namespace Opm
tot_well_rate += g[p] * xw.wellRates()[np*well_index + p];
}
if(std::abs(tot_well_rate) > 0) {
if (active_[ Water ]) {
if (active()[ Water ]) {
xw.wellSolutions()[WFrac*nw + well_index] = g[Water] * xw.wellRates()[np*well_index + Water] / tot_well_rate;
}
if (active_[ Gas ]) {
if (active()[ Gas ]) {
xw.wellSolutions()[GFrac*nw + well_index] = g[Gas] * (1.0 - wsolvent()) * xw.wellRates()[np*well_index + Gas] / tot_well_rate ;
}
if (has_solvent) {
@ -1289,7 +1289,7 @@ namespace Opm
} else { // tot_well_rate == 0
if (wellType() == INJECTOR) {
// only single phase injection handled
if (active_[Water]) {
if (active()[Water]) {
if (distr[Water] > 0.0) {
xw.wellSolutions()[WFrac * nw + well_index] = 1.0;
} else {
@ -1297,7 +1297,7 @@ namespace Opm
}
}
if (active_[Gas]) {
if (active()[Gas]) {
if (distr[Gas] > 0.0) {
xw.wellSolutions()[GFrac * nw + well_index] = 1.0 - wsolvent();
if (has_solvent) {
@ -1313,10 +1313,10 @@ namespace Opm
// this will happen.
} else if (wellType() == PRODUCER) { // producers
// TODO: the following are not addressed for the solvent case yet
if (active_[Water]) {
if (active()[Water]) {
xw.wellSolutions()[WFrac * nw + well_index] = 1.0 / np;
}
if (active_[Gas]) {
if (active()[Gas]) {
xw.wellSolutions()[GFrac * nw + well_index] = 1.0 / np;
}
} else {
@ -1670,7 +1670,7 @@ namespace Opm
bool
StandardWell<TypeTag>::
getWellConvergence(Simulator& ebosSimulator,
std::vector<double>& B_avg,
const std::vector<double>& B_avg,
const ModelParameters& param) const
{
typedef double Scalar;
@ -1774,4 +1774,29 @@ namespace Opm
}
template<typename TypeTag>
void
StandardWell<TypeTag>::
wellEqIteration(Simulator& ebosSimulator,
const ModelParameters& param,
WellState& well_state)
{
// We assemble the well equations, then we check the convergence,
// which is why we do not put the assembleWellEq here.
BVector dx_well(1);
invDuneD_.mv(resWell_, dx_well);
updateWellState(dx_well, param, well_state);
// updateWellControls uses communication
// Therefore the following is executed if there
// are active wells anywhere in the global domain.
updateWellControl(well_state);
setWellVariables(well_state);
}
}

6
opm/autodiff/WellInterface.hpp
View File

@ -140,9 +140,13 @@ namespace Opm
const double wsolvent() const;
virtual bool getWellConvergence(Simulator& ebosSimulator,
std::vector<double>& B_avg,
const std::vector<double>& B_avg,
const ModelParameters& param) const = 0;
virtual void wellEqIteration(Simulator& ebosSimulator,
const ModelParameters& param,
WellState& well_state) = 0;
protected:
// TODO: some variables shared by all the wells should be made static
// well name