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

Add warning to c solvers when stopped wells occur

Browse Source 
Stopped wells are treated as shut wells in the c solvers in opm-core.
I.e they are completly isolated from the domain.
This commit is contained in:
Tor Harald Sandve
2015-01-07 10:32:17 +01:00
parent 82eafbb510
commit 1718800e55
2 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
opm/core/pressure/tpfa/cfs_tpfa_residual.c
View File

@@ -870,7 +870,7 @@ assemble_completion_to_well(int i, int w, int c, int nc, int np,
ctrl = W->ctrls[ w ]; ctrl = W->ctrls[ w ];
if (well_controls_well_is_stopped( ctrl )) { if (well_controls_well_is_stopped( ctrl )) {
/* Interpreting a negative current control index to mean a shut well */ fprintf(stderr, "Stopped well detected: will be treated as completely shut\n");
welleq_coeff_shut(np, h, &res, &w2c, &w2w); welleq_coeff_shut(np, h, &res, &w2c, &w2w);
} }
else { else {

3
opm/core/pressure/tpfa/ifs_tpfa.c
View File

@@ -364,9 +364,8 @@ assemble_well_contrib(int nc ,
ctrls = W->ctrls[ w ]; ctrls = W->ctrls[ w ];
if (well_controls_well_is_stopped(ctrls) ) { if (well_controls_well_is_stopped(ctrls) ) {
fprintf(stderr, "Stopped well detected: will be treated as completely shut\n");
/* Treat this well as a shut well, isolated from the domain. */ /* Treat this well as a shut well, isolated from the domain. */
assemble_shut_well(nc, w, W, mt, h); assemble_shut_well(nc, w, W, mt, h);
} else { } else {