Test Dynamic Segment Dimensions Against WSEGDIMS Limits
In particular, check that 1. Number of MS wells <= WSEGDIMS(1) 2. Number of segments per well <= WSEGDIMS(2) 3. Number of branches per well <= WSEGDIMS(3) for all report steps in the simulation run. Example diagnostic message of a case that violates limits 2 and 3: Error: Problem with keyword WSEGDIMS In CASE.DATA line 60 The case has a multi-segmented well with 246 well segments, but at most 200 are allowed in WSEGDIMS. Please increase item 2 of WSEGDIMS to at least 246 Error: Problem with keyword WSEGDIMS In CASE.DATA line 60 The case has a multi-segmented well with 105 lateral branches, but at most 5 are allowed in WSEGDIMS. Please increase item 3 of WSEGDIMS to at least 105
This commit is contained in:
@@ -20,21 +20,27 @@
|
||||
#define BOOST_TEST_MODULE Array_Dimension_Checker
|
||||
|
||||
#include <boost/test/unit_test.hpp>
|
||||
|
||||
#include <boost/version.hpp>
|
||||
|
||||
#include <opm/input/eclipse/Schedule/ArrayDimChecker.hpp>
|
||||
|
||||
#include <opm/common/utility/OpmInputError.hpp>
|
||||
#include <opm/input/eclipse/Python/Python.hpp>
|
||||
#include <opm/input/eclipse/Deck/Deck.hpp>
|
||||
#include <opm/input/eclipse/EclipseState/EclipseState.hpp>
|
||||
#include <opm/input/eclipse/Schedule/Schedule.hpp>
|
||||
|
||||
#include <opm/input/eclipse/Deck/Deck.hpp>
|
||||
|
||||
#include <opm/input/eclipse/Parser/ErrorGuard.hpp>
|
||||
#include <opm/input/eclipse/Parser/InputErrorAction.hpp>
|
||||
#include <opm/input/eclipse/Parser/ParseContext.hpp>
|
||||
#include <opm/input/eclipse/Parser/Parser.hpp>
|
||||
|
||||
#include <iostream>
|
||||
#include <memory>
|
||||
#include <sstream>
|
||||
#include <streambuf>
|
||||
#include <string>
|
||||
|
||||
namespace {
|
||||
@@ -187,6 +193,158 @@ WCONINJE
|
||||
TSTEP
|
||||
100*30 /
|
||||
|
||||
END
|
||||
)" };
|
||||
|
||||
return Opm::Parser{}.parseString(input);
|
||||
}
|
||||
|
||||
Opm::Deck simCaseWellSegmentDims()
|
||||
{
|
||||
const auto input = std::string{ R"(RUNSPEC
|
||||
TITLE
|
||||
Check Well Segment Dimensions /
|
||||
|
||||
DIMENS
|
||||
20 20 15 /
|
||||
|
||||
OIL
|
||||
WATER
|
||||
|
||||
METRIC
|
||||
|
||||
EQLDIMS
|
||||
-- Defaulted
|
||||
/
|
||||
|
||||
TABDIMS
|
||||
-- Defaulted
|
||||
/
|
||||
|
||||
WELLDIMS
|
||||
2 10 5 5
|
||||
/
|
||||
|
||||
WSEGDIMS
|
||||
-- Defaulted => Max # MS wells = 0 (NSWLMX)
|
||||
-- Max # segments = 1 (NSEGMX)
|
||||
-- Max # branches = 1 (NLBRMX)
|
||||
/
|
||||
|
||||
-- ====================================================================
|
||||
GRID
|
||||
|
||||
SPECGRID
|
||||
20 20 15 1 F /
|
||||
|
||||
DXV
|
||||
20*100.0 /
|
||||
|
||||
DYV
|
||||
20*100.0 /
|
||||
|
||||
DZV
|
||||
15*0.1 /
|
||||
|
||||
DEPTHZ
|
||||
441*2000 /
|
||||
|
||||
PORO
|
||||
6000*0.3 /
|
||||
|
||||
PERMX
|
||||
6000*100.0 /
|
||||
|
||||
COPY
|
||||
'PERMX' 'PERMY' /
|
||||
'PERMX' 'PERMZ' /
|
||||
/
|
||||
|
||||
MULTIPLY
|
||||
'PERMZ' 0.1 /
|
||||
/
|
||||
|
||||
-- ====================================================================
|
||||
PROPS
|
||||
|
||||
SWOF
|
||||
0 0 1 0
|
||||
1 1 0 0 /
|
||||
|
||||
PVDO
|
||||
1 1.0 0.5
|
||||
800 0.99 0.51 /
|
||||
|
||||
PVTW
|
||||
300 0.99 1.0e-6 0.25 0 /
|
||||
|
||||
DENSITY
|
||||
850.0 1014.0 1.05 /
|
||||
|
||||
-- ====================================================================
|
||||
SOLUTION
|
||||
|
||||
EQUIL
|
||||
2000 300 2010 0.0 2000 10 /
|
||||
|
||||
-- ====================================================================
|
||||
SUMMARY
|
||||
ALL
|
||||
|
||||
-- ====================================================================
|
||||
SCHEDULE
|
||||
|
||||
RPTRST
|
||||
BASIC=5 FREQ=6 /
|
||||
|
||||
GRUPTREE
|
||||
'G' 'FIELD' /
|
||||
/
|
||||
|
||||
WELSPECS
|
||||
'I-N-1' 'G' 1 1 2000.15 'WATER' /
|
||||
'P-N-0' 'G' 1 10 2000.15 'OIL' /
|
||||
/
|
||||
|
||||
COMPDAT
|
||||
'I-N-1' 0 0 2 10 'OPEN' 1* 1* 1.0 /
|
||||
'P-N-0' 0 0 2 10 'OPEN' 1* 1* 1.0 /
|
||||
/
|
||||
|
||||
WELSEGS
|
||||
-- Number of MS wells = 1 (> 0 from WSEGDIMS(1))
|
||||
-- Max segment ID = 234 (> 1 from WSEGDIMS(2))
|
||||
-- Max branch ID = 123 (> 1 from WSEGDIMS(3))
|
||||
'P-N-0' 2345.6 2456.7 1* ABS 'HF-' /
|
||||
234 234 123 1 3456.7 2345.6 0.02468 0.0010000 /
|
||||
/
|
||||
|
||||
COMPSEGS
|
||||
'P-N-0' /
|
||||
1 10 2 123 3456.7 3456.85 Z /
|
||||
1 10 3 123 3456.85 3457.0 Z /
|
||||
1 10 4 123 3457.0 3457.15 Z /
|
||||
1 10 5 123 3457.15 3457.3 Z /
|
||||
1 10 6 123 3457.3 3457.45 Z /
|
||||
1 10 7 123 3457.45 3457.6 Z /
|
||||
1 10 8 123 3457.6 3457.75 Z /
|
||||
1 10 9 123 3456.75 3457.90 Z /
|
||||
1 10 10 123 3456.90 3458.05 Z /
|
||||
/
|
||||
|
||||
WCONPROD
|
||||
-- Well O/S Mode ORAT WRAT GRAT LRAT RESV BHP
|
||||
'P-N-*' 'OPEN' 'LRAT' 1* 1* 1* 5E3 1* 100 /
|
||||
/
|
||||
|
||||
WCONINJE
|
||||
-- Well Type O/S Mode RATE RESV BHP
|
||||
'I-N-*' 'WATER' 'OPEN' 'RATE' 25E3 1* 500 /
|
||||
/
|
||||
|
||||
TSTEP
|
||||
100*30 /
|
||||
|
||||
END
|
||||
)" };
|
||||
|
||||
@@ -348,17 +506,14 @@ struct CaseObjects
|
||||
|
||||
Opm::ErrorGuard guard;
|
||||
Opm::EclipseState es;
|
||||
std::shared_ptr<Opm::Python> python;
|
||||
Opm::Schedule sched;
|
||||
};
|
||||
|
||||
CaseObjects::CaseObjects(const Opm::Deck& deck, const Opm::ParseContext& ctxt)
|
||||
: guard{}
|
||||
, es (deck)
|
||||
, python( std::make_shared<Opm::Python>())
|
||||
, sched(deck, es, ctxt, guard, python)
|
||||
{
|
||||
}
|
||||
: guard {}
|
||||
, es { deck }
|
||||
, sched { deck, es, ctxt, guard, std::make_shared<Opm::Python>() }
|
||||
{}
|
||||
|
||||
CaseObjects::~CaseObjects()
|
||||
{
|
||||
@@ -377,8 +532,7 @@ private:
|
||||
|
||||
RedirectCERR::RedirectCERR(std::streambuf* buf)
|
||||
: orig_{ std::cerr.rdbuf(buf) }
|
||||
{
|
||||
}
|
||||
{}
|
||||
|
||||
RedirectCERR::~RedirectCERR()
|
||||
{
|
||||
@@ -391,7 +545,7 @@ BOOST_AUTO_TEST_SUITE(WellDimensions)
|
||||
|
||||
namespace {
|
||||
void setWellDimsContext(const Opm::InputErrorAction action,
|
||||
Opm::ParseContext& ctxt)
|
||||
Opm::ParseContext& ctxt)
|
||||
{
|
||||
ctxt.update(Opm::ParseContext::RUNSPEC_NUMWELLS_TOO_LARGE, action);
|
||||
ctxt.update(Opm::ParseContext::RUNSPEC_CONNS_PER_WELL_TOO_LARGE, action);
|
||||
@@ -403,7 +557,7 @@ namespace {
|
||||
BOOST_AUTO_TEST_CASE(MaxGroupSize)
|
||||
{
|
||||
Opm::ParseContext parseContext;
|
||||
auto cse = CaseObjects{ simCaseWellDims(), parseContext };
|
||||
auto cse = CaseObjects { simCaseWellDims(), parseContext };
|
||||
|
||||
// Verify at most ten wells in a single group.
|
||||
BOOST_CHECK_EQUAL(Opm::maxGroupSize(cse.sched, 1), 10);
|
||||
@@ -425,21 +579,21 @@ BOOST_AUTO_TEST_CASE(WellDims)
|
||||
Opm::ParseContext parseContext;
|
||||
setWellDimsContext(Opm::InputErrorAction::THROW_EXCEPTION, parseContext);
|
||||
|
||||
auto cse = CaseObjects{ simCaseWellDims(), parseContext};
|
||||
auto cse = CaseObjects { simCaseWellDims(), parseContext };
|
||||
|
||||
// There should be no failures in basic input layer
|
||||
BOOST_CHECK(!cse.guard);
|
||||
|
||||
BOOST_CHECK_THROW( Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard),
|
||||
Opm::OpmInputError);
|
||||
BOOST_CHECK_THROW(Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard),
|
||||
Opm::OpmInputError);
|
||||
|
||||
setWellDimsContext(Opm::InputErrorAction::DELAYED_EXIT1, parseContext);
|
||||
Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard);
|
||||
|
||||
// There *should* be errors from dimension checking
|
||||
BOOST_CHECK(cse.guard);
|
||||
BOOST_CHECK_MESSAGE(cse.guard, "Exceeding WELLDIMS limits must produce errors");
|
||||
|
||||
{
|
||||
std::stringstream estream;
|
||||
@@ -448,11 +602,15 @@ BOOST_AUTO_TEST_CASE(WellDims)
|
||||
cse.guard.dump();
|
||||
const auto error_msg = estream.str();
|
||||
|
||||
for (const auto& s : {"RUNSPEC_NUMWELLS_TOO_LARGE", "item 1",
|
||||
"RUNSPEC_CONNS_PER_WELL_TOO_LARGE", "item 2",
|
||||
"RUNSPEC_NUMGROUPS_TOO_LARGE", "item 3",
|
||||
"RUNSPEC_GROUPSIZE_TOO_LARGE", "item 4"})
|
||||
BOOST_CHECK( error_msg.find(s) != std::string::npos );
|
||||
for (const auto& s : {"RUNSPEC_NUMWELLS_TOO_LARGE" , "item 1",
|
||||
"RUNSPEC_CONNS_PER_WELL_TOO_LARGE", "item 2",
|
||||
"RUNSPEC_NUMGROUPS_TOO_LARGE" , "item 3",
|
||||
"RUNSPEC_GROUPSIZE_TOO_LARGE" , "item 4"})
|
||||
{
|
||||
BOOST_CHECK(error_msg.find(s) != std::string::npos);
|
||||
}
|
||||
|
||||
BOOST_TEST_MESSAGE("WELLDIMS Diagnostic Message: '" << error_msg << '\'');
|
||||
}
|
||||
}
|
||||
|
||||
@@ -461,22 +619,22 @@ BOOST_AUTO_TEST_CASE(WellDims_ManyChildGroups)
|
||||
Opm::ParseContext parseContext;
|
||||
setWellDimsContext(Opm::InputErrorAction::THROW_EXCEPTION, parseContext);
|
||||
|
||||
auto cse = CaseObjects{ simCaseNodeGroupSizeFailure(), parseContext};
|
||||
auto cse = CaseObjects { simCaseNodeGroupSizeFailure(), parseContext };
|
||||
|
||||
// There should be no failures in basic input layer
|
||||
BOOST_CHECK(!cse.guard);
|
||||
|
||||
// There *should* be errors from dimension checking
|
||||
BOOST_CHECK_THROW( Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard),
|
||||
Opm::OpmInputError);
|
||||
BOOST_CHECK_THROW(Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard),
|
||||
Opm::OpmInputError);
|
||||
|
||||
setWellDimsContext(Opm::InputErrorAction::DELAYED_EXIT1, parseContext);
|
||||
Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard);
|
||||
|
||||
// There *should* be errors from dimension checking
|
||||
BOOST_CHECK(cse.guard);
|
||||
BOOST_CHECK_MESSAGE(cse.guard, "Exceeding WELLDIMS limits must produce errors");
|
||||
|
||||
// Verify that we get expected output from ErrorGuard::dump()
|
||||
{
|
||||
@@ -486,9 +644,73 @@ BOOST_AUTO_TEST_CASE(WellDims_ManyChildGroups)
|
||||
cse.guard.dump();
|
||||
const auto error_msg = estream.str();
|
||||
|
||||
for (const auto& s : {"RUNSPEC_GROUPSIZE_TOO_LARGE", "item 4"})
|
||||
BOOST_CHECK( error_msg.find(s) != std::string::npos );
|
||||
for (const auto& s : {"RUNSPEC_GROUPSIZE_TOO_LARGE", "item 4"}) {
|
||||
BOOST_CHECK(error_msg.find(s) != std::string::npos);
|
||||
}
|
||||
|
||||
BOOST_TEST_MESSAGE("WELLDIMS Diagnostic Message: '" << error_msg << '\'');
|
||||
}
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_SUITE_END()
|
||||
|
||||
// ====================================================================
|
||||
|
||||
BOOST_AUTO_TEST_SUITE(WellSegmentDimensions)
|
||||
|
||||
namespace {
|
||||
void setWellSegmentDimsContext(const Opm::InputErrorAction action,
|
||||
Opm::ParseContext& ctxt)
|
||||
{
|
||||
ctxt.update(Opm::ParseContext::RUNSPEC_NUMMSW_TOO_LARGE, action);
|
||||
ctxt.update(Opm::ParseContext::RUNSPEC_NUMSEG_PER_WELL_TOO_LARGE, action);
|
||||
ctxt.update(Opm::ParseContext::RUNSPEC_NUMBRANCH_TOO_LARGE, action);
|
||||
}
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(WellSegDims)
|
||||
{
|
||||
auto parseContext = Opm::ParseContext{};
|
||||
setWellSegmentDimsContext(Opm::InputErrorAction::THROW_EXCEPTION, parseContext);
|
||||
|
||||
auto cse = CaseObjects { simCaseWellSegmentDims(), parseContext };
|
||||
|
||||
// There should be no failures in basic input layer
|
||||
BOOST_CHECK_MESSAGE(! cse.guard, "Reading input file must not produce errors");
|
||||
|
||||
// Default action (THROW_EXCEPTION) must throw exception from array
|
||||
// dimension checking.
|
||||
BOOST_CHECK_THROW(Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard),
|
||||
Opm::OpmInputError);
|
||||
|
||||
setWellSegmentDimsContext(Opm::InputErrorAction::DELAYED_EXIT1, parseContext);
|
||||
Opm::checkConsistentArrayDimensions(cse.es , cse.sched,
|
||||
parseContext, cse.guard);
|
||||
|
||||
// There *should* be errors from dimension checking when action is DELAYED_EXIT1.
|
||||
BOOST_CHECK_MESSAGE(cse.guard, "Exceeding WSEGDIMS limits must produce errors");
|
||||
|
||||
{
|
||||
std::stringstream estream;
|
||||
RedirectCERR stream(estream.rdbuf());
|
||||
|
||||
using namespace std::string_literals;
|
||||
|
||||
cse.guard.dump();
|
||||
const auto error_msg = estream.str();
|
||||
|
||||
for (const auto* s : {"RUNSPEC_NUMMSW_TOO_LARGE" , "item 1",
|
||||
"RUNSPEC_NUMSEG_PER_WELL_TOO_LARGE", "item 2",
|
||||
"RUNSPEC_NUMBRANCH_TOO_LARGE" , "item 3"})
|
||||
{
|
||||
BOOST_CHECK_MESSAGE(error_msg.find(s) != std::string::npos,
|
||||
"Diagnostic message element '"s + s +
|
||||
"' must be in WSEGDIMS error message"s);
|
||||
}
|
||||
|
||||
BOOST_TEST_MESSAGE("WSEGDIMS Diagnostic Message: '" << error_msg << '\'');
|
||||
}
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_SUITE_END() // WellSegmentDimensions
|
||||
|
||||
Reference in New Issue
Block a user