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

Also refactor getWellConvergence() like getConvergence().

Browse Source
This commit is contained in:
Atgeirr Flø Rasmussen 2015-09-30 15:20:04 +02:00
parent dcb78877eb
commit d29ee6967c
1 changed files with 13 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
opm/autodiff/BlackoilModelBase_impl.hpp
View File

@ -2312,7 +2312,8 @@ namespace detail {
int nc,
int nw) const
{
const int num_elems = B.cols();
const int np = asImpl().numPhases();
const int nm = asImpl().numMaterials();
// Do the global reductions
#if HAVE_MPI
@ -2361,20 +2362,22 @@ namespace detail {
else
#endif
{
B_avg.resize(num_elems);
maxCoeff.resize(num_elems);
R_sum.resize(num_elems);
maxNormWell.resize(num_elems);
for ( int idx = 0; idx < num_elems; ++idx )
B_avg.resize(nm);
maxCoeff.resize(nm);
R_sum.resize(nm);
maxNormWell.resize(np);
for ( int idx = 0; idx < nm; ++idx )
{
B_avg[idx] = B.col(idx).sum()/nc;
maxCoeff[idx] = tempV.col(idx).maxCoeff();
R_sum[idx] = R.col(idx).sum();
maxNormWell[idx] = 0.0;
for ( int w = 0; w < nw; ++w )
{
maxNormWell[idx] = std::max(maxNormWell[idx], std::abs(residual_.well_flux_eq.value()[nw*idx + w]));
assert(nm >= np);
if (idx < np) {
maxNormWell[idx] = 0.0;
for ( int w = 0; w < nw; ++w ) {
maxNormWell[idx] = std::max(maxNormWell[idx], std::abs(residual_.well_flux_eq.value()[nw*idx + w]));
}
}
}
// Compute total pore volume