Add support for FGPR(F/S)

This commit is contained in:
Lars Petter Øren Hauge 2017-12-19 08:48:12 +01:00
parent 9497dfa1e5
commit afbe8081f6
3 changed files with 8 additions and 0 deletions

View File

@ -755,6 +755,8 @@ static const std::unordered_map< std::string, ofun > funs = {
{ "FNPR", rate< rt::solvent, producer > },
{ "FVPR", sum( sum( rate< rt::reservoir_water, producer>, rate< rt::reservoir_oil, producer >),
rate< rt::reservoir_gas, producer>)},
{ "FGPRS", rate< rt::dissolved_gas, producer > },
{ "FGPRF", sub( rate< rt::gas, producer >, rate< rt::dissolved_gas, producer > ) },
{ "FLPR", sum( rate< rt::wat, producer >, rate< rt::oil, producer > ) },
{ "FWPT", mul( rate< rt::wat, producer >, duration ) },

View File

@ -72,6 +72,8 @@ FLPRH
FGSR
FGCR
FNPR -- solvent
FGPRF
FGPRS
--FTPRSEA
-- Injection Rates
FVIR

View File

@ -678,6 +678,10 @@ BOOST_AUTO_TEST_CASE(field_keywords) {
ecl_sum_get_field_var( resp, 1, "FLPR" ), 1e-5 );
BOOST_CHECK_CLOSE( 10.6 + 10.7 + 10.8 + 20.6 + 20.7 + 20.8,
ecl_sum_get_field_var( resp, 1, "FVPR" ), 1e-5 );
BOOST_CHECK_CLOSE( 10.4 + 20.4,
ecl_sum_get_field_var( resp, 1, "FGPRS" ), 1e-5 );
BOOST_CHECK_CLOSE( 10.2 - 10.4 + 20.2 - 20.4,
ecl_sum_get_field_var( resp, 1, "FGPRF" ), 1e-5 );
/* Production totals */
BOOST_CHECK_CLOSE( 10.0 + 20.0, ecl_sum_get_field_var( resp, 1, "FWPT" ), 1e-5 );