opm-common/opm/parser/eclipse/IntegrationTests/ParseVFPPROD.cpp

/*
  Copyright 2013 Statoil ASA.

  This file is part of the Open Porous Media project (OPM).

  OPM is free software: you can redistribute it and/or modify
  it under the terms of the GNU General Public License as published by
  the Free Software Foundation, either version 3 of the License, or
  (at your option) any later version.

  OPM is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with OPM.  If not, see <http://www.gnu.org/licenses/>.
 */

#define BOOST_TEST_MODULE ParserIntegrationTests
#include <math.h>

#include <boost/test/unit_test.hpp>
#include <boost/test/test_tools.hpp>

#include <opm/parser/eclipse/Deck/Deck.hpp>
#include <opm/parser/eclipse/Parser/Parser.hpp>
#include <opm/parser/eclipse/Parser/ParserRecord.hpp>
#include <opm/parser/eclipse/Parser/ParserIntItem.hpp>
#include <opm/parser/eclipse/Parser/ParserStringItem.hpp>

#include <opm/parser/eclipse/Parser/ParserEnums.hpp>

using namespace Opm;



BOOST_AUTO_TEST_CASE( parse_VFPPROD_OK ) {
    ParserPtr parser(new Parser());
    boost::filesystem::path file("testdata/integration_tests/VFPPROD/VFPPROD1");
    BOOST_CHECK( parser->isRecognizedKeyword("VFPPROD"));

    DeckPtr deck =  parser->parseFile(file.string());

    DeckKeywordConstPtr VFPPROD1 = deck->getKeyword("VFPPROD" , 0);
    DeckKeywordConstPtr BPR = deck->getKeyword("BPR" , 0);
    DeckKeywordConstPtr VFPPROD2 = deck->getKeyword("VFPPROD" , 1);

    BOOST_CHECK_EQUAL( 573U  , VFPPROD1->size() );
    BOOST_CHECK_EQUAL( 1U    , BPR->size());
    BOOST_CHECK_EQUAL( 573U  , VFPPROD2->size());

    {
        auto record = VFPPROD1->getRecord(0);
        {
            auto item = record->getItem("TABLE");
            BOOST_CHECK_EQUAL( item->getInt(0) , 32 );
        }

        {
            auto item = record->getItem("DATUM_DEPTH");
            BOOST_CHECK_EQUAL( item->getSIDouble(0) , 394);
        }

        {
            auto item = record->getItem("RATE_TYPE");
            BOOST_CHECK_EQUAL( item->getString(0) , "LIQ");
        }


        {
            auto item = record->getItem("WFR");
            BOOST_CHECK_EQUAL( item->getString(0) , "WCT");
        }

        {
            auto item = record->getItem("GFR");
            BOOST_CHECK_EQUAL( item->getString(0) , "GOR");
        }
    }
    {
        auto record = VFPPROD1->getRecord(1);
        auto item = record->getItem("FLOW_VALUES");

        BOOST_CHECK_EQUAL( item->size() , 12 );
        BOOST_CHECK_EQUAL( item->getRawDouble(0)  ,   100 );
        BOOST_CHECK_EQUAL( item->getRawDouble(11) , 20000 );
    }

    {
        auto record = VFPPROD1->getRecord(2);
        auto item = record->getItem("THP_VALUES");

        BOOST_CHECK_EQUAL( item->size() , 7 );
        BOOST_CHECK_CLOSE( item->getRawDouble(0)  , 16.01 , 0.0001 );
        BOOST_CHECK_CLOSE( item->getRawDouble(6) ,  61.01 , 0.0001 );
    }

    {
        auto record = VFPPROD1->getRecord(3);
        auto item = record->getItem("WFR_VALUES");

        BOOST_CHECK_EQUAL( item->size() , 9 );
        BOOST_CHECK_CLOSE( item->getRawDouble(1)  , 0.1 , 0.0001 );
        BOOST_CHECK_CLOSE( item->getRawDouble(7) ,  0.9 , 0.0001 );
    }

    {
        auto record = VFPPROD1->getRecord(4);
        auto item = record->getItem("GFR_VALUES");

        BOOST_CHECK_EQUAL( item->size() , 9 );
        BOOST_CHECK_EQUAL( item->getRawDouble(0)  ,   90 );
        BOOST_CHECK_EQUAL( item->getRawDouble(8) , 10000 );
    }

    {
        auto record = VFPPROD1->getRecord(5);
        auto item = record->getItem("ALQ_VALUES");

        BOOST_CHECK_EQUAL( item->size() , 1 );
        BOOST_CHECK_EQUAL( item->getRawDouble(0)  ,   0 );
    }

    {
        auto record = VFPPROD1->getRecord(6);
        {
            auto item = record->getItem("THP_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 1 );
        }
        {
            auto item = record->getItem("WFR_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 1 );
        }
        {
            auto item = record->getItem("GFR_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 1 );
        }
        {
            auto item = record->getItem("ALQ_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 1 );
        }
        {
            auto item = record->getItem("VALUES");
            BOOST_CHECK_EQUAL( item->size() , 12 );
            BOOST_CHECK_EQUAL( item->getRawDouble(0) , 44.85 );
            BOOST_CHECK_EQUAL( item->getRawDouble(11) , 115.14 );
        }
    }

    {
        auto record = VFPPROD1->getRecord(572);
        {
            auto item = record->getItem("THP_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 7 );
        }
        {
            auto item = record->getItem("WFR_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 9 );
        }
        {
            auto item = record->getItem("GFR_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 9 );
        }
        {
            auto item = record->getItem("ALQ_INDEX");
            BOOST_CHECK_EQUAL( item->size() , 1 );
            BOOST_CHECK_EQUAL( item->getInt(0) , 1 );
        }
        {
            auto item = record->getItem("VALUES");
            BOOST_CHECK_EQUAL( item->size() , 12 );
            BOOST_CHECK_EQUAL( item->getRawDouble(0) , 100.80 );
            BOOST_CHECK_EQUAL( item->getRawDouble(11) , 147.79 );
        }
    }
}