OilfieldToolsNet/opm-common
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add New Summary Node Category of Completion

Browse Source 
This enables detecting the last remaining case that has a valid NUMS
entry despite nominally being a well-level keyword.
This commit is contained in:
Bård Skaflestad
2022-08-04 22:59:03 +02:00
parent c5158a1c24
commit 03a94a7288
7 changed files with 563 additions and 254 deletions
Download Patch File Download Diff File Expand all files Collapse all files

104
tests/test_SummaryNode.cpp
View File

@@ -23,11 +23,16 @@
#include <opm/io/eclipse/SummaryNode.hpp>
#include <initializer_list>
#include <stdexcept>
#include <string>
#include <vector>
namespace {
void expect_key(const Opm::EclIO::SummaryNode& node, const std::string& unique_key) {
BOOST_CHECK_EQUAL(node.unique_key(), unique_key);
}
}
} // Anonymous namespace
BOOST_AUTO_TEST_SUITE(UniqueKey)
@@ -86,3 +91,100 @@ BOOST_AUTO_TEST_CASE(user_defined) {
}
BOOST_AUTO_TEST_SUITE_END() // UniqueKey
// ===========================================================================
BOOST_AUTO_TEST_SUITE(Category)
namespace {
std::string to_string(const Opm::EclIO::SummaryNode::Category cat)
{
using Cat = Opm::EclIO::SummaryNode::Category;
switch (cat) {
case Cat::Aquifer: return "Aquifer";
case Cat::Well: return "Well";
case Cat::Group: return "Group";
case Cat::Field: return "Field";
case Cat::Region: return "Region";
case Cat::Block: return "Block";
case Cat::Connection: return "Connection";
case Cat::Completion: return "Completion";
case Cat::Segment: return "Segment";
case Cat::Node: return "Node";
case Cat::Miscellaneous: return "Miscellaneous";
}
throw std::invalid_argument {
"Unhandled Summary Parameter Category '"
+ std::to_string(static_cast<int>(cat)) + '\''
};
}
Opm::EclIO::SummaryNode::Category category(const std::string& kw)
{
return Opm::EclIO::SummaryNode::category_from_keyword(kw);
}
} // Anonymous namespace
BOOST_AUTO_TEST_CASE(Well)
{
const auto well_kw = std::vector<std::string> {
"WOPR", "WOPT", "WGIR", "WWIR",
};
for (const auto& kw : well_kw) {
BOOST_CHECK_MESSAGE(category(kw) == Opm::EclIO::SummaryNode::Category::Well,
"Keyword '" << kw << "' must be category 'Well'. Got '" <<
to_string(category(kw)) << "' instead");
}
BOOST_CHECK_MESSAGE(category("WOPRL") != Opm::EclIO::SummaryNode::Category::Well,
"Keyword 'WOPRL' must NOT be category 'Well'");
}
BOOST_AUTO_TEST_CASE(Connection)
{
const auto connection_kw = std::vector<std::string> {
"COPR", "COPT", "CGIR", "CWIR",
};
for (const auto& kw : connection_kw) {
BOOST_CHECK_MESSAGE(category(kw) == Opm::EclIO::SummaryNode::Category::Connection,
"Keyword '" << kw << "' must be category 'Connection'. Got '" <<
to_string(category(kw)) << "' instead");
}
BOOST_CHECK_MESSAGE(category("COPRL") != Opm::EclIO::SummaryNode::Category::Connection,
"Keyword 'COPRL' must NOT be category 'Connection'");
}
BOOST_AUTO_TEST_CASE(Completion)
{
const auto compl_kw = std::vector<std::string> {
"OPRL", "OPTL", "GIRL", "WIRL",
};
for (const auto& kw_base : compl_kw) {
const auto kw = 'C' + kw_base;
BOOST_CHECK_MESSAGE(category(kw) == Opm::EclIO::SummaryNode::Category::Completion,
"Keyword '" << kw << "' must be category 'Completion'. Got '" <<
to_string(category(kw)) << "' instead");
}
for (const auto* suffix : { "", "__1", "_12", "123" }) {
for (const auto& kw_base : compl_kw) {
const auto kw = 'W' + kw_base + suffix;
BOOST_CHECK_MESSAGE(category(kw) == Opm::EclIO::SummaryNode::Category::Completion,
"Keyword '" << kw << "' must be category 'Completion'. Got '" <<
to_string(category(kw)) << "' instead");
}
}
for (const auto* kw : { "WOPRLK", "CGIR", "WKITL__8", "WOOOOPRL", "WHIRL" }) {
BOOST_CHECK_MESSAGE(category(kw) != Opm::EclIO::SummaryNode::Category::Completion,
"Keyword '" << kw << "' must NOT be category 'Completion'");
}
}
BOOST_AUTO_TEST_SUITE_END() // Category