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

Merge pull request #448 from totto82/WCONINJH

Browse Source 
Add support for WCONINJH
This commit is contained in:
Atgeirr Flø Rasmussen 2015-09-04 15:27:40 +02:00
commit 6f0f90d1b6
1 changed files with 30 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
opm/autodiff/SimulatorBase_impl.hpp
View File

@ -445,11 +445,11 @@ namespace Opm
invalid_alq, invalid_vfp, invalid_alq, invalid_vfp,
& distr[0], ctrl); & distr[0], ctrl);
// For WCONHIST/RESV the BHP limit is set to 1 atm. // For WCONHIST the BHP limit is set to 1 atm.
// TODO: Make it possible to modify the BHP limit using // or a value specified using WELTARG
// the WELTARG keyword double bhp_limit = (p.BHPLimit > 0) ? p.BHPLimit : unit::convert::from(1.0, unit::atm);
const int ok_bhp = const int ok_bhp =
well_controls_add_new(BHP, unit::convert::from(1.0, unit::atm), well_controls_add_new(BHP, bhp_limit,
invalid_alq, invalid_vfp, invalid_alq, invalid_vfp,
NULL, ctrl); NULL, ctrl);
@ -462,5 +462,31 @@ namespace Opm
} }
} }
} }
for (int w = 0, nw = wells->number_of_wells; w < nw; ++w) {
WellControls* ctrl = wells->ctrls[w];
const bool is_producer = wells->type[w] == PRODUCER;
if (!is_producer && wells->name[w] != 0) {
WellMap::const_iterator i = wmap.find(wells->name[w]);
if (i != wmap.end()) {
WellConstPtr wp = i->second;
const WellInjectionProperties& injector = wp->getInjectionProperties(step);
if (!injector.predictionMode) {
//History matching WCONINJEH
static const double invalid_alq = -std::numeric_limits<double>::max();
static const int invalid_vfp = -std::numeric_limits<int>::max();
// For WCONINJEH the BHP limit is set to a large number
// or a value specified using WELTARG
double bhp_limit = (injector.BHPLimit > 0) ? injector.BHPLimit : std::numeric_limits<double>::max();
const int ok_bhp =
well_controls_add_new(BHP, bhp_limit,
invalid_alq, invalid_vfp,
NULL, ctrl);
assert(ok_bhp != 0);
}
}
}
}
} }
} // namespace Opm } // namespace Opm