Merge pull request #3782 from totto82/cgfrs

Output CGFRF and CGFRS
This commit is contained in:
Bård Skaflestad 2023-11-22 12:52:00 +01:00 committed by GitHub
commit 0419aefd60
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 29 additions and 1 deletions

View File

@ -2293,7 +2293,10 @@ static const auto funs = std::unordered_map<std::string, ofun> {
{ "CTFAC", trans_factors },
{ "CDFAC", d_factors },
{ "CPI", connection_productivity_index },
{ "CGFRF", sub(crate<rt::gas, producer>, crate<rt::dissolved_gas, producer>) }, // Free gas flow
{ "CGFRS", crate<rt::dissolved_gas, producer> }, // Solution gas flow
{ "COFRF", sub(crate<rt::oil, producer>, crate<rt::vaporized_oil, producer>) }, // Liquid oil flow
{ "COFRS", crate<rt::vaporized_oil, producer> }, // Vaporized oil
{ "FWPR", rate< rt::wat, producer > },
{ "FOPR", rate< rt::oil, producer > },
{ "FGPR", rate< rt::gas, producer > },

View File

@ -870,6 +870,24 @@ CGPR
'*' /
/
CGFRF
'*' /
/
CGFRS
'*' /
/
COFRF
'*' /
/
COFRS
'*' /
/
CNFR
'*' /
/

View File

@ -1407,6 +1407,13 @@ BOOST_AUTO_TEST_CASE(connection_kewords) {
BOOST_CHECK_CLOSE( 1.9, ecl_sum_get_well_connection_var( resp, 1, "W_1", "CPR", 1, 1, 1), 1e-5);
BOOST_CHECK_CLOSE( 100.2-100.4,ecl_sum_get_well_connection_var( resp, 1, "W_1", "CGFRF", 1, 1, 1 ), 1e-5 );
BOOST_CHECK_CLOSE( 100.4, ecl_sum_get_well_connection_var( resp, 1, "W_1", "CGFRS", 1, 1, 1 ), 1e-5 );
BOOST_CHECK_CLOSE( 100.1-100.5,ecl_sum_get_well_connection_var( resp, 1, "W_1", "COFRF", 1, 1, 1 ), 1e-5 );
BOOST_CHECK_CLOSE( 100.5, ecl_sum_get_well_connection_var( resp, 1, "W_1", "COFRS", 1, 1, 1 ), 1e-5 );
BOOST_CHECK_MESSAGE(! ecl_sum_has_well_connection_var( resp, "W_1", "CVPR", 1, 1, 1 ),
"Summary vector CVPR must NOT exist for connection 1,1,1 of well W_1");