Support WOPRS+WOPRF
This commit is contained in:
parent
da70718beb
commit
f8cb32c7d2
@ -641,6 +641,8 @@ static const std::unordered_map< std::string, ofun > funs = {
|
||||
|
||||
{ "WGPRS", rate< rt::dissolved_gas, producer > },
|
||||
{ "WGPRF", sub( rate< rt::gas, producer >, rate< rt::dissolved_gas, producer > ) },
|
||||
{ "WOPRS", rate< rt::vaporized_oil, producer > },
|
||||
{ "WOPRF", sub (rate < rt::oil, producer >, rate< rt::vaporized_oil, producer > ) },
|
||||
|
||||
{ "WLPR", sum( rate< rt::wat, producer >, rate< rt::oil, producer > ) },
|
||||
{ "WWPT", mul( rate< rt::wat, producer >, duration ) },
|
||||
|
@ -304,6 +304,11 @@ BOOST_AUTO_TEST_CASE(well_keywords) {
|
||||
BOOST_CHECK_CLOSE( 10.2 - 10.4, ecl_sum_get_well_var( resp, 1, "W_1", "WGPRF" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 20.2 - 20.4, ecl_sum_get_well_var( resp, 1, "W_2", "WGPRF" ), 1e-5 );
|
||||
|
||||
BOOST_CHECK_CLOSE( 10.5, ecl_sum_get_well_var( resp, 1, "W_1", "WOPRS" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 20.5, ecl_sum_get_well_var( resp, 1, "W_2", "WOPRS" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( (10.1 - 10.5), ecl_sum_get_well_var( resp, 1, "W_1", "WOPRF" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( (20.1 - 20.5), ecl_sum_get_well_var( resp, 1, "W_2", "WOPRF" ), 1e-5 );
|
||||
|
||||
/* Production totals */
|
||||
BOOST_CHECK_CLOSE( 10.0, ecl_sum_get_well_var( resp, 1, "W_1", "WWPT" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 20.0, ecl_sum_get_well_var( resp, 1, "W_2", "WWPT" ), 1e-5 );
|
||||
|
Loading…
Reference in New Issue
Block a user