Add WOPTS+WOPTF keywords
This commit is contained in:
parent
ff3d0cda28
commit
3fffeda7d7
@ -547,6 +547,9 @@ static const std::unordered_map< std::string, ofun > funs = {
|
||||
{ "WGPTS", mul( rate< rt::dissolved_gas, producer >, duration )},
|
||||
{ "WGPTF", sub( mul( rate< rt::gas, producer >, duration ),
|
||||
mul( rate< rt::dissolved_gas, producer >, duration ))},
|
||||
{ "WOPTS", mul( rate< rt::vaporized_oil, producer >, duration )},
|
||||
{ "WOPTF", sub( mul( rate< rt::oil, producer >, duration ),
|
||||
mul( rate< rt::vaporized_oil, producer >, duration ))},
|
||||
|
||||
{ "WWCT", div( rate< rt::wat, producer >,
|
||||
sum( rate< rt::wat, producer >, rate< rt::oil, producer > ) ) },
|
||||
|
@ -397,6 +397,10 @@ WGPTF
|
||||
/
|
||||
WGPTS
|
||||
/
|
||||
WOPTF
|
||||
/
|
||||
WOPTS
|
||||
/
|
||||
|
||||
-- Tracers
|
||||
--WTPRSEA
|
||||
|
@ -314,6 +314,11 @@ BOOST_AUTO_TEST_CASE(well_keywords) {
|
||||
BOOST_CHECK_CLOSE( 2 * ( 10.2 - 10.4 ), ecl_sum_get_well_var( resp, 2, "W_1", "WGPTF" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 2 * ( 20.2 - 20.4 ), ecl_sum_get_well_var( resp, 2, "W_2", "WGPTF" ), 1e-5 );
|
||||
|
||||
BOOST_CHECK_CLOSE( 2 * 10.5, ecl_sum_get_well_var( resp, 2, "W_1", "WOPTS" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 2 * 20.5, ecl_sum_get_well_var( resp, 2, "W_2", "WOPTS" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 2 * ( 10.1 - 10.5 ), ecl_sum_get_well_var( resp, 2, "W_1", "WOPTF" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 2 * ( 20.1 - 20.5 ), ecl_sum_get_well_var( resp, 2, "W_2", "WOPTF" ), 1e-5 );
|
||||
|
||||
/* Production rates (history) */
|
||||
BOOST_CHECK_CLOSE( 10, ecl_sum_get_well_var( resp, 1, "W_1", "WWPRH" ), 1e-5 );
|
||||
BOOST_CHECK_CLOSE( 20, ecl_sum_get_well_var( resp, 1, "W_2", "WWPRH" ), 1e-5 );
|
||||
|
Loading…
Reference in New Issue
Block a user