opm-common/tests/parser/RestartConfigTests.cpp
2023-01-16 22:17:50 +01:00

1585 lines
37 KiB
C++

/*
Copyright 2016 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 RestartConfigTests
#include <boost/test/unit_test.hpp>
#include <opm/input/eclipse/Deck/Deck.hpp>
#include <opm/input/eclipse/EclipseState/EclipseState.hpp>
#include <opm/input/eclipse/Parser/InputErrorAction.hpp>
#include <opm/input/eclipse/Parser/Parser.hpp>
#include <opm/input/eclipse/Parser/ParseContext.hpp>
#include <opm/input/eclipse/Parser/ErrorGuard.hpp>
#include <opm/input/eclipse/Schedule/Schedule.hpp>
#include <opm/common/utility/OpmInputError.hpp>
#include <cstddef>
#include <map>
#include <string>
#include <vector>
using namespace Opm;
namespace {
std::vector<std::string> filter_keywords(const std::map<std::string, int>& keywords) {
std::vector<std::string> kwlist;
for (const auto& [kw, value] : keywords) {
if (kw == "BASIC" || kw == "FREQ" || kw == "RESTART")
continue;
if (value == 0)
continue;
kwlist.push_back(kw);
}
return kwlist;
}
std::string grid()
{
return { R"(RUNSPEC
DIMENS
10 10 10 /
START
21 MAY 1981 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
)" };
}
Schedule make_schedule(std::string sched_input, bool add_grid = true) {
if (add_grid)
sched_input = grid() + sched_input;
auto deck = Parser{}.parseString( sched_input );
EclipseState es(deck);
return Schedule(deck, es);
}
} // namespace Anonymous
BOOST_AUTO_TEST_CASE(TestIOConfigCreation) {
const std::string deckData = R"(
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 FREQ=2 /
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 JAN 2011 /
/
)";
auto sched = make_schedule(deckData);
BOOST_CHECK_MESSAGE(! sched.write_rst_file(0), "Must NOT write restart output on step 0");
BOOST_CHECK_MESSAGE(! sched.write_rst_file(1), "Must NOT write restart output on step 1");
BOOST_CHECK_MESSAGE( sched.write_rst_file(2), "Must write restart output on step 2");
BOOST_CHECK_MESSAGE(! sched.write_rst_file(3), "Must NOT write restart output on step 3");
}
BOOST_AUTO_TEST_CASE(TestIOConfigCreationWithSolutionRPTRST) {
const std::string deckData = R"(
SOLUTION
RPTRST
BASIC=1/
RPTRST
BASIC=3 FREQ=5 /
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
DATES -- 2
20 JAN 2010 /
/
RPTRST
BASIC=3 FREQ=2 /
DATES -- 3
20 JAN 2011 /
/
)";
auto sched = make_schedule(deckData);
BOOST_CHECK_MESSAGE( sched.write_rst_file(0), "Must write restart file for report step 0");
BOOST_CHECK_MESSAGE(! sched.write_rst_file(1), "Must NOT write restart file for report step 1");
BOOST_CHECK_MESSAGE(! sched.write_rst_file(2), "Must NOT write restart file for report step 2");
BOOST_CHECK_MESSAGE(! sched.write_rst_file(3), "Must NOT write restart file for report step 3");
}
BOOST_AUTO_TEST_CASE(TestIOConfigCreationWithSolutionRPTSOL) {
const std::string deckData = R"(
SOLUTION
RPTSOL
RESTART=2
/
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 FREQ=3
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
RESTART=1
/
)";
const std::string deckData2 = R"(
SOLUTION
RPTSOL
0 0 0 0 0 0 2
/
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 FREQ=3
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
RESTART=1
/
)";
auto sched1 = make_schedule(deckData);
auto sched2 = make_schedule(deckData2);
BOOST_CHECK_MESSAGE(sched1.write_rst_file(0), "SCHED1 must write restart file for report step 0");
BOOST_CHECK_MESSAGE(sched2.write_rst_file(0), "SCHED2 must write restart file for report step 0");
}
BOOST_AUTO_TEST_CASE(RPTRST_AND_RPTSOL_SOLUTION)
{
const auto input = std::string { R"(RUNSPEC
DIMENS
10 10 10 /
START
6 JUN 2020 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SOLUTION
RPTSOL
'RESTART=2' 'FIP=3' 'FIPRESV' 'THPRES' /
SCHEDULE
RPTRST
'BASIC=5' 'FREQ=6' 'CONV=10' /
--SCHEDULE
DATES
7 'JLY' 2020 / ( 1)
10 'JLY' 2020 / ( 2)
20 'JLY' 2020 / ( 3)
30 'JLY' 2020 / ( 4)
5 'AUG' 2020 / ( 5)
20 'AUG' 2020 / ( 6)
5 'SEP' 2020 / ( 7)
1 'OCT' 2020 / ( 8)
1 'NOV' 2020 / ( 9)
1 'DEC' 2020 / -- WRITE (10)
5 'JAN' 2021 / (11)
1 'FEB' 2021 / (12)
17 'MAY' 2021 / (13)
6 'JLY' 2021 / -- WRITE (14)
1 'DEC' 2021 / (15)
31 'DEC' 2021 / (16)
21 'JAN' 2022 / -- WRITE (17)
31 'JAN' 2022 / (18)
/
END
)" };
auto sched = make_schedule(input, false);
for (const std::size_t stepID : { 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 15, 16, 18 }) {
BOOST_CHECK_MESSAGE(! sched.write_rst_file(stepID),
"Must not write restart information for excluded step " << stepID);
}
for (const std::size_t stepID : { 0, 10, 14, 17 }) {
BOOST_CHECK_MESSAGE(sched.write_rst_file(stepID),
"Must write restart information for included step " << stepID);
}
const auto expected = std::vector<std::tuple<bool, bool, TimeStampUTC>> {
{true , true , TimeStampUTC(2020, 6, 6)}, // 0
{true , false, TimeStampUTC(2020, 7, 7)}, // 1
{false, false, TimeStampUTC(2020, 7, 10)}, // 2
{false, false, TimeStampUTC(2020, 7, 20)}, // 3
{false, false, TimeStampUTC(2020, 7, 30)}, // 4
{true , false, TimeStampUTC(2020, 8, 5)}, // 5
{false, false, TimeStampUTC(2020, 8, 20)}, // 6
{true , false, TimeStampUTC(2020, 9, 5)}, // 7
{true , false, TimeStampUTC(2020, 10, 1)}, // 8
{true , false, TimeStampUTC(2020, 11, 1)}, // 9
{true , false, TimeStampUTC(2020, 12, 1)}, // 10
{true , true , TimeStampUTC(2021, 1, 5)}, // 11
{true , false, TimeStampUTC(2021, 2, 1)}, // 12
{true , false, TimeStampUTC(2021, 5, 17)}, // 13
{true , false, TimeStampUTC(2021, 7, 6)}, // 14
{true , false, TimeStampUTC(2021, 12, 1)}, // 15
{false, false, TimeStampUTC(2021, 12, 31)}, // 16
{true, true , TimeStampUTC(2022, 1, 21)}, // 17
{false, false, TimeStampUTC(2022, 1, 31)}, // 18
};
for (std::size_t index = 0; index < sched.size(); ++index) {
const auto& state = sched[index];
const auto& [first_in_month, first_in_year, ts] = expected[index];
BOOST_CHECK_EQUAL( state.month_num(), ts.month() - 1);
BOOST_CHECK_EQUAL( state.first_in_month(), first_in_month );
BOOST_CHECK_EQUAL( state.first_in_year(), first_in_year );
BOOST_CHECK_MESSAGE( ts == TimeStampUTC( TimeService::to_time_t(state.start_time() )),
"Time stamp does not match expected");
}
}
BOOST_AUTO_TEST_CASE(RPTRST_AND_RPTSOL_SOLUTION2)
{
const auto input = std::string { R"(RUNSPEC
DIMENS
10 10 10 /
START
6 JLY 2019 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SOLUTION
-- basic = 5, every month
RPTRST
'BASIC=5' 'FREQ=6' 'CONV=10' /
RPTSOL
'RESTART=2' 'FIP=3' 'FIPRESV' 'THPRES' /
SCHEDULE
DATES
1 AUG 2019 / ( 1)
2 AUG 2019 / ( 2)
3 AUG 2019 / ( 3)
4 AUG 2019 / ( 4)
12 AUG 2019 / ( 5)
13 AUG 2019 / ( 6)
14 AUG 2019 / ( 7)
22 AUG 2019 / ( 8)
23 AUG 2019 / ( 9)
24 AUG 2019 / (10)
1 SEP 2019 / (11)
11 SEP 2019 / (12)
21 SEP 2019 / (13)
22 SEP 2019 / (14)
23 SEP 2019 / (15)
1 OCT 2019 / (16)
2 OCT 2019 / (17)
3 OCT 2019 / (18)
11 OCT 2019 / (19)
12 OCT 2019 / (20)
13 OCT 2019 / (21)
21 OCT 2019 / (22)
31 OCT 2019 / (23)
1 NOV 2019 / (24)
2 NOV 2019 / (25)
10 NOV 2019 / (26)
20 NOV 2019 / (27)
21 NOV 2019 / (28)
22 NOV 2019 / (29)
30 NOV 2019 / (30)
1 DEC 2019 / (31)
11 DEC 2019 / (32)
12 DEC 2019 / (33)
13 DEC 2019 / (34)
22 DEC 2019 / (35)
23 DEC 2019 / (36)
24 DEC 2019 / (37)
1 JAN 2020 / Write (38)
2 JAN 2020 / (39)
12 JAN 2020 / (40)
13 JAN 2020 / (41)
14 JAN 2020 / (42)
23 JAN 2020 / (43)
24 JAN 2020 / (44)
25 JAN 2020 / (45)
1 FEB 2020 / (46)
1 MAR 2020 / (47)
1 APR 2020 / (48)
1 MAY 2020 / (49)
1 JUN 2020 / (50)
1 JUL 2020 / Write (51)
1 AUG 2020 / (52)
1 SEP 2020 / (53)
1 OCT 2020 / (54)
1 NOV 2020 / (55)
/
END
)" };
auto sched = make_schedule(input, false);
for (std::size_t step = 0; step < sched.size(); ++step) {
if (step == 0 || step == 38 || step == 51)
BOOST_CHECK_MESSAGE( sched.write_rst_file(step),
"Restart file expected for step: " << step );
else
BOOST_CHECK_MESSAGE( !sched.write_rst_file(step),
"Should *not* have restart file for step: " << step);
}
}
BOOST_AUTO_TEST_CASE(RPTSCHED_INTEGER) {
const std::string deckData1 = R"(
RUNSPEC
START -- 0
19 JUN 2007 /
DIMENS
10 10 10 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SOLUTION
RPTRST -- PRES,DEN,PCOW,PCOG,RK,VELOCITY,COMPRESS
6*0 1 0 1 9*0 1 7*0 1 0 3*1 / -- Static
SCHEDULE
-- 0
DATES -- 1
10 OKT 2008 /
/
RPTSCHED -- 1
RESTART=1
/
DATES -- 2
20 JAN 2010 /
/
RPTRST -- RK,VELOCITY,COMPRESS --2
18*0 0 8*0 /
DATES -- 3
20 FEB 2010 /
/
RPTSCHED -- 3
RESTART=0
/
)";
auto sched = make_schedule(deckData1, false);
BOOST_CHECK_MESSAGE( sched.write_rst_file( 0 ),
"Must write restart for report step 0" );
// By comparison with ECLIPSE it turns out that we should write a restart
// file for report step 1, there is clearly a bug in the old RPTRST
// implementation which has been unnoticed for years. While reimplementing
// the schedule implementation to use a snapshots based approach the test is
// switched to require a restart file for report step 0 - and temporarily
// disabled.
//
// BOOST_CHECK_MESSAGE( sched.write_rst_file( 1 ), "Must write restart for report step 1" );
BOOST_CHECK_MESSAGE( sched.write_rst_file( 2 ), "Must write restart for report step 2" );
BOOST_CHECK_MESSAGE( !sched.write_rst_file( 3 ), "Must NOT write restart for report step 3" );
const auto& kw_list1 = filter_keywords(sched.rst_keywords(1));
const auto expected1 = {"BG","BO","BW","COMPRESS","DEN","KRG","KRO","KRW","PCOG","PCOW","PRES","RK","VELOCITY","VGAS","VOIL","VWAT"};
BOOST_CHECK_EQUAL_COLLECTIONS( expected1.begin(), expected1.end(),
kw_list1.begin(), kw_list1.end() );
const auto& kw_list2 = filter_keywords( sched.rst_keywords(3));
const auto expected2 = { "COMPRESS", "RK", "VELOCITY" };
BOOST_CHECK_EQUAL_COLLECTIONS( expected2.begin(), expected2.end(),
kw_list2.begin(), kw_list2.end() );
}
BOOST_AUTO_TEST_CASE(RPTRST_mixed_mnemonics_int_list) {
const char* data = R"(
RUNSPEC
DIMENS
10 10 10 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
START -- 0
19 JUN 2007 /
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 0 1 2
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
BASIC=1
/
)";
ParseContext parseContext;
ErrorGuard errors;
auto deck = Parser().parseString( data);
EclipseState es(deck);
parseContext.update(ParseContext::RPT_MIXED_STYLE, InputErrorAction::THROW_EXCEPTION);
BOOST_CHECK_THROW( Schedule( deck, es, parseContext, errors, {} ), std::exception );
}
BOOST_AUTO_TEST_CASE(RPTRST) {
const std::string deckData1 = R"(
RUNSPEC
START -- 0
19 JUN 2007 /
DIMENS
10 10 10 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SOLUTION
RPTRST
ACIP KRG KRO KRW NORST SFREQ=10 ALLPROPS/
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=1
/
DATES -- 2
20 JAN 2010 /
/
)";
const std::string deckData2 = R"(
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 FREQ=2 FLOWS RUBBISH=5
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 JAN 2011 /
/
)";
const char* deckData3 = R"(
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
3 0 0 0 0 2
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 JAN 2011 /
/
)";
auto sched1 = make_schedule(deckData1, false);
// Observe that this is true due to some undocumented guessing that
// the initial restart file should be written if a RPTRST keyword is
// found in the SOLUTION section, irrespective of the content of that
// keyword.
BOOST_CHECK( sched1.write_rst_file( 0 ) );
BOOST_CHECK( !sched1.write_rst_file( 1 ) );
BOOST_CHECK( sched1.write_rst_file( 2 ) );
std::vector<std::string> expected = { "ACIP","BG","BO","BW","DEN","KRG", "KRO", "KRW", "NORST", "SFREQ", "VGAS", "VOIL", "VWAT"};
const auto kw_list = filter_keywords( sched1.rst_keywords(2) );
BOOST_CHECK_EQUAL_COLLECTIONS( expected.begin() ,expected.end(),
kw_list.begin() , kw_list.end() );
auto sched2 = make_schedule(deckData2);
const auto expected2 = { "FLOWS" };
const auto kw_list2 = filter_keywords( sched2.rst_keywords( 2 ) );
BOOST_CHECK_EQUAL_COLLECTIONS( expected2.begin(), expected2.end(),
kw_list2.begin(), kw_list2.end() );
BOOST_CHECK( !sched2.write_rst_file( 0 ) );
BOOST_CHECK( !sched2.write_rst_file( 1 ) );
BOOST_CHECK( sched2.write_rst_file( 2 ) );
BOOST_CHECK( !sched2.write_rst_file( 3 ) );
auto sched3 = make_schedule(deckData3);
BOOST_CHECK( !sched3.write_rst_file( 0 ) );
BOOST_CHECK( !sched3.write_rst_file( 1 ) );
BOOST_CHECK( sched3.write_rst_file( 2 ) );
BOOST_CHECK( !sched3.write_rst_file( 3 ) );
}
BOOST_AUTO_TEST_CASE(RPTRST_FORMAT_ERROR) {
const std::string deckData0 = R"(
RUNSPEC
START -- 0
19 JUN 2007 /
DIMENS
10 10 10 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SOLUTION
RPTRST
ACIP KRG KRO KRW NORST SFREQ=10 ALLPROPS/
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC 1
/
DATES -- 2
20 JAN 2010 /
/
)";
const std::string deckData1 = R"(
RUNSPEC
START -- 0
19 JUN 2007 /
DIMENS
10 10 10 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SOLUTION
RPTRST
ACIP KRG KRO KRW NORST SFREQ = 10 ALLPROPS/
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC = 1
/
DATES -- 2
20 JAN 2010 /
/
)";
const std::string deckData2 = R"(
RUNSPEC
START -- 0
19 JUN 2007 /
DIMENS
10 10 10 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC = 3 FREQ = 2 FLOWS RUBBISH = 5
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 JAN 2011 /
/
)";
const std::string deckData3 = R"(
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
3 0 0 0 0 2
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 JAN 2011 /
/
)";
Opm::Parser parser;
ParseContext ctx;
ErrorGuard errors;
auto deck0 = parser.parseString( deckData0, ctx, errors );
auto deck1 = parser.parseString( deckData1, ctx, errors );
auto deck2 = parser.parseString( deckData2, ctx, errors );
EclipseState es0(deck0);
EclipseState es1(deck1);
EclipseState es2(deck2);
ctx.update(ParseContext::RPT_UNKNOWN_MNEMONIC, InputErrorAction::IGNORE);
ctx.update(ParseContext::RPT_MIXED_STYLE, InputErrorAction::THROW_EXCEPTION);
BOOST_CHECK_THROW( Schedule( deck1, es1, ctx, errors, {} ), std::exception );
ctx.update(ParseContext::RPT_MIXED_STYLE, InputErrorAction::IGNORE);
Schedule sched1(deck1, es1, ctx, errors, {});
// The case "BASIC 1" - i.e. without '=' can not be salvaged; this should
// give an exception whatever is the value of ParseContext::RPT_MIXED_STYLE:
BOOST_CHECK_THROW( Schedule( deck0, es0, ctx, errors, {} ), std::exception );
// Observe that this is true due to some undocumented guessing that
// the initial restart file should be written if a RPTRST keyword is
// found in the SOLUTION section, irrespective of the content of that
// keyword.
BOOST_CHECK( sched1.write_rst_file( 0 ) );
BOOST_CHECK( !sched1.write_rst_file( 1 ) );
BOOST_CHECK( sched1.write_rst_file( 2 ) );
std::vector<std::string> expected = { "ACIP","BG","BO","BW","DEN","KRG", "KRO", "KRW", "NORST", "SFREQ", "VGAS", "VOIL", "VWAT"};
const auto kw_list = filter_keywords( sched1.rst_keywords(2) );
BOOST_CHECK_EQUAL_COLLECTIONS( expected.begin() ,expected.end(),
kw_list.begin() , kw_list.end() );
ctx.update(ParseContext::RPT_UNKNOWN_MNEMONIC, InputErrorAction::THROW_EXCEPTION);
BOOST_CHECK_THROW( Schedule( deck2, es2, ctx, errors, {} ), std::exception );
ctx.update(ParseContext::RPT_UNKNOWN_MNEMONIC, InputErrorAction::IGNORE);
Schedule sched2(deck2, es2, ctx, errors, {});
const auto expected2 = { "FLOWS"};
const auto kw_list2 = filter_keywords( sched2.rst_keywords( 2 ) );
BOOST_CHECK_EQUAL_COLLECTIONS( expected2.begin(), expected2.end(),
kw_list2.begin(), kw_list2.end() );
BOOST_CHECK( !sched2.write_rst_file( 0 ) );
BOOST_CHECK( !sched2.write_rst_file( 1 ) );
BOOST_CHECK( sched2.write_rst_file( 2 ) );
BOOST_CHECK( !sched2.write_rst_file( 3 ) );
auto sched3 = make_schedule(deckData3);
BOOST_CHECK( !sched3.write_rst_file( 0 ) );
BOOST_CHECK( !sched3.write_rst_file( 1 ) );
BOOST_CHECK( sched3.write_rst_file( 2 ) );
BOOST_CHECK( !sched3.write_rst_file( 3 ) );
}
BOOST_AUTO_TEST_CASE(RPTSCHED) {
const std::string deckData1 = R"(
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTSCHED
RESTART=1
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
RESTART=0
/
)";
const std::string deckData2 = R"(
RUNSPEC
DIMENS
10 10 10 /
GRID
START -- 0
19 JUN 2007 /
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTSCHED
RESTART=3 FIP
/
DATES -- 2
20 JAN 2010 /
/
RPTSCHED
RESTART=4
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
NOTHING RUBBISH
/
)";
const std::string deckData3 = R"(
RUNSPEC
DIMENS
10 10 10 /
GRID
START -- 0
19 JUN 2007 /
SOLUTION
RPTSOL
RESTART=4 /
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 FREQ=1 RUBBISH=5
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
0 0 0 0 0 0 0 0
/
)";
auto sched1 = make_schedule(deckData1);
BOOST_CHECK( !sched1.write_rst_file( 0 ) );
BOOST_CHECK( !sched1.write_rst_file( 1 ) );
BOOST_CHECK( sched1.write_rst_file( 2 ) );
BOOST_CHECK( sched1.write_rst_file( 3 ) );
auto sched2 = make_schedule(deckData2);
BOOST_CHECK( !sched2.write_rst_file( 0 ) );
BOOST_CHECK( !sched2.write_rst_file( 1 ) );
BOOST_CHECK( sched2.write_rst_file( 2 ) );
BOOST_CHECK( sched2.write_rst_file( 3 ) );
const auto expected2 = { "FIP"};
const auto kw_list2 = filter_keywords( sched2.rst_keywords( 2 ) );
BOOST_CHECK_EQUAL_COLLECTIONS( expected2.begin(), expected2.end(),
kw_list2.begin(), kw_list2.end() );
auto sched3 = make_schedule(deckData3);
//Older ECLIPSE 100 data set may use integer controls instead of mnemonics
BOOST_CHECK( sched3.write_rst_file( 0 ) );
BOOST_CHECK( !sched3.write_rst_file( 1 ) );
BOOST_CHECK( sched3.write_rst_file( 2 ) );
BOOST_CHECK( sched3.write_rst_file( 3 ) );
std::vector<std::string> expected3 = {};
const auto kw_list3 = filter_keywords( sched3.rst_keywords(2) );
BOOST_CHECK_EQUAL_COLLECTIONS( expected3.begin() , expected3.end() , kw_list3.begin() , kw_list3.end() );
}
BOOST_AUTO_TEST_CASE(RPTSCHED_and_RPTRST) {
const std::string deckData = R"(
RUNSPEC
DIMENS
10 10 10 /
GRID
START -- 0
19 JUN 2007 /
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 FREQ=3 BG BO
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
RESTART=1
/
)";
auto sched3 = make_schedule(deckData);
BOOST_CHECK( !sched3.write_rst_file( 0 ) );
BOOST_CHECK( !sched3.write_rst_file( 1 ) );
BOOST_CHECK( !sched3.write_rst_file( 2 ) );
BOOST_CHECK( sched3.write_rst_file( 3 ) );
}
BOOST_AUTO_TEST_CASE(NO_BASIC) {
const std::string data = R"(
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
/
)";
auto sched = make_schedule(data);
for( size_t ts = 0; ts < 4; ++ts )
BOOST_CHECK( !sched.write_rst_file( ts ) );
}
BOOST_AUTO_TEST_CASE(BASIC_EQ_1) {
const std::string data = R"(
SCHEDULE
DATES -- 1
10 OKT 2008 /
/
RPTRST
BASIC=3 FREQ=3
/
DATES -- 2
20 JAN 2010 /
/
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
BASIC=1
/
)";
auto sched = make_schedule(data);
for( size_t ts = 0; ts < 3; ++ts )
BOOST_CHECK( !sched.write_rst_file( ts ) );
BOOST_CHECK( sched.write_rst_file( 3 ) );
}
BOOST_AUTO_TEST_CASE(BASIC_EQ_3) {
const std::string data = R"(
SCHEDULE
RPTRST
BASIC=3 FREQ=3
/
DATES
22 MAY 1981 / -- timestep 1
23 MAY 1981 / -- timestep 2
24 MAY 1981 / -- timestep 3
25 MAY 1981 / -- timestep 4
26 MAY 1981 / -- timestep 5
1 JAN 1982 / -- timestep 6
1 JAN 1982 13:55:44 / -- timestep 7
3 JAN 1982 14:56:45.123 / -- timestep 8
4 JAN 1982 14:56:45.123 / -- timestep 9
5 JAN 1982 14:56:45.123 / -- timestep 10
6 JAN 1982 14:56:45.123 / -- timestep 11
/
)";
auto sched = make_schedule(data);
const std::size_t freq = 3;
/* BASIC=3, restart files are created every nth report time, n=3 */
for (std::size_t ts = 1; ts < 12; ++ts)
BOOST_CHECK_EQUAL( ts % freq == 0, sched.write_rst_file( ts ) );
}
BOOST_AUTO_TEST_CASE(BASIC_EQ_4) {
const std::string data = R"(
SCHEDULE
RPTRST
BASIC=4
/
DATES
22 MAY 1981 / -- timestep 1
23 MAY 1981 / -- timestep 2
24 MAY 1981 / -- timestep 3
25 MAY 1981 / -- timestep 4
26 MAY 1981 / -- timestep 5
1 JAN 1982 / -- timestep 6
1 JAN 1982 13:55:44 / -- timestep 7
3 JAN 1982 14:56:45.123 / -- timestep 8
4 JAN 1982 14:56:45.123 / -- timestep 9
5 JAN 1982 14:56:45.123 / -- timestep 10
6 JAN 1982 14:56:45.123 / -- timestep 11
6 JAN 1983 14:56:45.123 / -- timestep 12
/
)";
auto sched = make_schedule(data);
/* BASIC=4, restart file is written at the first report step of each year.
*/
for (std::size_t ts : { 1, 2, 3, 4, 5, 7, 8, 9, 10, 11 })
BOOST_CHECK(!sched.write_rst_file( ts ) );
for (std::size_t ts : { 6, 12 })
BOOST_CHECK( sched.write_rst_file( ts ) );
}
BOOST_AUTO_TEST_CASE(BASIC_EQ_4_FREQ_2) {
const std::string data = R"(
SCHEDULE
RPTRST
BASIC=4 FREQ=2
/
DATES
22 MAY 1981 / -- 1
23 MAY 1981 / -- 2
24 MAY 1981 / -- 3
23 MAY 1982 / -- 4
24 MAY 1982 / -- 5
24 MAY 1983 / -- 6 write
25 MAY 1984 / -- 7
26 MAY 1984 / -- 8
26 MAY 1985 / -- 9 write
27 MAY 1985 / -- 10
1 JAN 1986 / -- 11
/
)";
auto sched = make_schedule(data);
/* BASIC=4, restart file is written at the first report step of each year.
* Optionally, if the mnemonic FREQ is set >1 the restart is written only
* every n'th year.
*
* FREQ=2
*/
for (const std::size_t ts : { 1, 2, 3, 4, 5, 7, 8, 10, 11 } )
BOOST_CHECK_MESSAGE( !sched.write_rst_file( ts ),
"Must NOT write restart file for excluded step " << ts);
for (const std::size_t ts : { 6, 9 } )
BOOST_CHECK_MESSAGE( sched.write_rst_file( ts ),
"Must write restart file for included step " << ts);
}
BOOST_AUTO_TEST_CASE(BASIC_EQ_5) {
const std::string data = R"(
START
1 MAY 1981 /
SCHEDULE
RPTRST
BASIC=5 FREQ=2
/
DATES
22 MAY 1981 / -- 1
23 MAY 1981 / -- 2
24 MAY 1981 / -- 3
1 JUN 1981 / -- 4
1 JUL 1981 / -- 5 Write
1 JAN 1982 / -- 6 Write
2 JAN 1982 / -- 7
1 FEB 1982 / -- 8
1 MAR 1982 / -- 9 Write
1 APR 1983 / --10 Write
16 APR 1983 / --11
30 APR 1983 / --12
1 MAY 1983 / --13
17 MAY 1983 / --14
31 MAY 1983 / --15
2 JUN 1983 / --16 Write
10 JUN 1983 / --17
23 JUN 1983 / --18
30 JUN 1983 / --19
21 JUL 1983 / --20
31 JUL 1983 / --21
5 AUG 1983 / --22 Write
22 AUG 1983 / --23
/
)";
auto sched = make_schedule(data);
/* BASIC=5, restart file is written at the first report step of each month.
*/
for (std::size_t ts : { 0, 1, 2, 3, 4, 7, 8, 11, 12, 13, 14, 15, 17, 18, 19, 20, 21, 23 }) {
BOOST_CHECK_MESSAGE( !sched.write_rst_file(ts),
"Must not write restart file for excluded step " << ts );
}
for (std::size_t ts : { 5, 6, 9, 10, 16, 22 }) {
BOOST_CHECK_MESSAGE( sched.write_rst_file(ts),
"Restart file expected for step: " << ts );
}
}
BOOST_AUTO_TEST_CASE(BASIC_EQ_5_FREQ_EQ_6)
{
const auto deckStr = std::string { R"(RUNSPEC
DIMENS
1 1 1/
START
1 JAN 2000 /
GRID
DX
1 /
DY
1 /
DZ
1 /
TOPS
0 /
SOLUTION
RPTRST
BASIC=5 FREQ=6 /
SCHEDULE
DATES
2 JAN 2000 / -- 1
3 JAN 2000 / -- 2
9 JAN 2000 / -- 3
6 FEB 2000 / -- 4
11 AUG 2000 / -- 5 Write
3 SEP 2000 / -- 6
24 SEP 2000 / -- 7
22 DEC 2000 / -- 8
31 DEC 2000 / -- 9
1 JAN 2001 / -- 10
2 JAN 2001 / -- 11
30 JAN 2001 / -- 12
31 JAN 2001 / -- 13
1 FEB 2001 / -- 14 Write
2 FEB 2001 / -- 15
28 FEB 2001 / -- 16
1 MAR 2001 / -- 17
2 MAR 2001 / -- 18
3 MAR 2001 / -- 19
31 MAR 2001 / -- 20
1 APR 2001 / -- 21
30 APR 2001 / -- 22
1 MAY 2001 / -- 23
31 MAY 2001 / -- 24
1 JUN 2001 / -- 25
30 JUN 2001 / -- 26
1 JLY 2001 / -- 27
2 JLY 2001 / -- 28
30 JLY 2001 / -- 29
31 JLY 2001 / -- 30
1 AUG 2001 / -- 31 Write
31 AUG 2001 / -- 32
10 SEP 2001 / -- 33
17 OCT 2001 / -- 34
7 NOV 2001 / -- 35
8 NOV 2001 / -- 36
27 NOV 2001 / -- 37
29 NOV 2001 / -- 38
30 NOV 2001 / -- 39
6 DEC 2001 / -- 40
7 DEC 2001 / -- 41
30 DEC 2001 / -- 42
31 DEC 2001 / -- 43
1 JAN 2002 / -- 44
2 JAN 2002 / -- 45
31 JAN 2002 / -- 46
1 FEB 2002 / -- 47 Write
2 FEB 2002 / -- 48
19 JUN 2002 / -- 49
19 JLY 2002 / -- 50
31 JLY 2002 / -- 51
1 AUG 2002 / -- 52 Write
/
END
)" };
auto sched = make_schedule(deckStr, false);
BOOST_CHECK_MESSAGE( sched.write_rst_file( 0), "Must write restart file at report step 0");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 1), "Must NOT write restart file at report step 1");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 2), "Must NOT write restart file at report step 2");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 3), "Must NOT write restart file at report step 3");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 4), "Must NOT write restart file at report step 4");
BOOST_CHECK_MESSAGE( sched.write_rst_file( 5), "Must write restart file at report step 5");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 6), "Must NOT write restart file at report step 6");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 7), "Must NOT write restart file at report step 7");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 8), "Must NOT write restart file at report step 8");
BOOST_CHECK_MESSAGE(!sched.write_rst_file( 9), "Must NOT write restart file at report step 9");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(10), "Must NOT write restart file at report step 10");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(11), "Must NOT write restart file at report step 11");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(12), "Must NOT write restart file at report step 12");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(13), "Must NOT write restart file at report step 13");
BOOST_CHECK_MESSAGE( sched.write_rst_file(14), "Must write restart file at report step 14");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(15), "Must NOT write restart file at report step 15");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(16), "Must NOT write restart file at report step 16");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(17), "Must NOT write restart file at report step 17");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(18), "Must NOT write restart file at report step 18");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(19), "Must NOT write restart file at report step 19");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(20), "Must NOT write restart file at report step 20");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(21), "Must NOT write restart file at report step 21");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(22), "Must NOT write restart file at report step 22");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(23), "Must NOT write restart file at report step 23");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(24), "Must NOT write restart file at report step 24");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(25), "Must NOT write restart file at report step 25");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(26), "Must NOT write restart file at report step 26");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(27), "Must NOT write restart file at report step 27");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(28), "Must NOT write restart file at report step 28");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(29), "Must NOT write restart file at report step 29");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(30), "Must NOT write restart file at report step 30");
BOOST_CHECK_MESSAGE( sched.write_rst_file(31), "Must write restart file at report step 31");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(32), "Must NOT write restart file at report step 32");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(33), "Must NOT write restart file at report step 33");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(34), "Must NOT write restart file at report step 34");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(35), "Must NOT write restart file at report step 35");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(36), "Must NOT write restart file at report step 36");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(37), "Must NOT write restart file at report step 37");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(38), "Must NOT write restart file at report step 38");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(39), "Must NOT write restart file at report step 39");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(40), "Must NOT write restart file at report step 40");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(41), "Must NOT write restart file at report step 41");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(42), "Must NOT write restart file at report step 42");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(43), "Must NOT write restart file at report step 43");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(44), "Must NOT write restart file at report step 44");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(45), "Must NOT write restart file at report step 45");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(46), "Must NOT write restart file at report step 46");
BOOST_CHECK_MESSAGE( sched.write_rst_file(47), "Must write restart file at report step 47");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(48), "Must NOT write restart file at report step 48");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(49), "Must NOT write restart file at report step 49");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(50), "Must NOT write restart file at report step 50");
BOOST_CHECK_MESSAGE(!sched.write_rst_file(51), "Must NOT write restart file at report step 51");
BOOST_CHECK_MESSAGE( sched.write_rst_file(52), "Must write restart file at report step 52");
}
BOOST_AUTO_TEST_CASE(BASIC_EQ_0) {
const std::string data = R"(
SCHEDULE
RPTRST
BASIC=0 FREQ=2
/
DATES
22 MAY 1981 /
23 MAY 1981 /
24 MAY 1981 /
1 JUN 1981 /
1 JUL 1981 /
1 JAN 1982 /
2 JAN 1982 /
1 FEB 1982 /
1 MAR 1982 /
1 APR 1983 /
2 JUN 1983 /
/
)";
auto sched = make_schedule(data);
/* RESTART=0, no restart file is written
*/
for (std::size_t ts = 0; ts < 11; ++ts)
BOOST_CHECK( !sched.write_rst_file( ts ) );
}
BOOST_AUTO_TEST_CASE(RESTART_EQ_0) {
const std::string data = R"(
RUNSPEC
DIMENS
10 10 10 /
START
21 MAY 1981 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SCHEDULE
RPTSCHED
RESTART=0
/
DATES
22 MAY 1981 /
23 MAY 1981 /
24 MAY 1981 /
1 JUN 1981 /
1 JUL 1981 /
1 JAN 1982 /
2 JAN 1982 /
1 FEB 1982 /
1 MAR 1982 /
1 APR 1983 /
2 JUN 1983 /
/
)";
/* RESTART=0, no restart file is written
*/
auto sched = make_schedule(data, false);
for (std::size_t ts = 0; ts < 11; ++ts)
BOOST_CHECK( !sched.write_rst_file( ts ) );
}
BOOST_AUTO_TEST_CASE(RESTART_BASIC_GT_2) {
const std::string data = R"(
SCHEDULE
RPTRST
BASIC=4 FREQ=2
/
DATES
22 MAY 1981 /
/
RPTSCHED -- BASIC >2, ignore RPTSCHED RESTART
RESTART=3, FREQ=1
/
DATES
23 MAY 1981 /
24 MAY 1981 /
23 MAY 1982 /
24 MAY 1982 /
24 MAY 1983 / -- write
25 MAY 1984 /
26 MAY 1984 /
26 MAY 1985 / -- write
27 MAY 1985 /
1 JAN 1986 /
/
)";
auto sched = make_schedule(data);
for (std::size_t ts : { 1, 2, 3, 4, 5, 7, 8, 10, 11 })
BOOST_CHECK( !sched.write_rst_file( ts ) );
for (std::size_t ts : { 6, 9 })
BOOST_CHECK( sched.write_rst_file( ts ) );
}
BOOST_AUTO_TEST_CASE(RESTART_BASIC_LEQ_2) {
const std::string data = R"(
SCHEDULE
RPTRST
BASIC=1"
/
DATES
22 MAY 1981 /
/
RPTSCHED
RESTART=0
/
DATES
23 MAY 1981 /
24 MAY 1981 /
23 MAY 1982 /
24 MAY 1982 /
24 MAY 1983 /
25 MAY 1984 /
26 MAY 1984 /
26 MAY 1985 /
27 MAY 1985 /
1 JAN 1986 /
/
)";
auto sched = make_schedule(data);
BOOST_CHECK_MESSAGE( sched.write_rst_file( 1 ), "Must write restart for report step 1" );
for (std::size_t ts = 2; ts < 11; ++ts)
BOOST_CHECK_MESSAGE( !sched.write_rst_file( ts ),
"Must NOT write restart for report step " << ts );
}
BOOST_AUTO_TEST_CASE(RESTART_SAVE) {
const std::string data = R"(
SCHEDULE
DATES
22 MAY 1981 /
/
DATES
23 MAY 1981 /
24 MAY 1981 /
23 MAY 1982 /
24 MAY 1982 /
24 MAY 1983 /
25 MAY 1984 /
26 MAY 1984 /
26 MAY 1985 /
27 MAY 1985 /
1 JAN 1986 /
/
SAVE
TSTEP
1 /
)";
auto sched = make_schedule(data);
for (std::size_t ts = 1; ts < 11; ++ts)
BOOST_CHECK_MESSAGE( !sched.write_rst_file(ts),
"Must NOT write restart for report step " << ts);
BOOST_CHECK_MESSAGE( sched.write_rst_file(11),
"Must write restart for report step 11");
BOOST_CHECK_MESSAGE( !sched.write_rst_file( 12 ),
"Must NOT write restart for report step 12");
}
BOOST_AUTO_TEST_CASE(RPTSCHED_INTEGER2) {
const auto deckData1 = std::string { R"(
RUNSPEC
START -- 0
19 JUN 2007 /
DIMENS
10 10 10 /
GRID
DXV
10*1 /
DYV
10*1 /
DZV
10*1 /
DEPTHZ
121*1 /
PORO
1000*0.25 /
SOLUTION
RPTRST -- PRES,DEN,PCOW,PCOG,RK,VELOCITY,COMPRESS
1 5*0 1 0 1 9*0 1 7*0 1 0 3*1 / -- Static
SCHEDULE
-- 0
DATES -- 1
10 OKT 2008 /
/
RPTSCHED
RESTART=1
/
DATES -- 2
20 JAN 2010 /
/
RPTRST -- RK,VELOCITY,COMPRESS
18*0 0 8*0 /
DATES -- 3
20 FEB 2010 /
/
RPTSCHED
RESTART=0
/
DATES -- 4
1 MAR 2010 /
/
)" };
auto sched = make_schedule(deckData1, false);
BOOST_CHECK_EQUAL( sched.size(), 5);
BOOST_CHECK( sched.write_rst_file( 0 ) );
BOOST_CHECK( sched.write_rst_file( 1 ) );
BOOST_CHECK( sched.write_rst_file( 2 ) );
BOOST_CHECK( !sched.write_rst_file( 3 ) );
const auto& kw_list1 = filter_keywords(sched.rst_keywords(1));
const auto expected1 = {"BG","BO","BW","COMPRESS","DEN","KRG","KRO","KRW","PCOG","PCOW","PRES","RK","VELOCITY","VGAS","VOIL","VWAT"};
BOOST_CHECK_EQUAL_COLLECTIONS( expected1.begin(), expected1.end(),
kw_list1.begin(), kw_list1.end() );
const auto& kw_list2 = filter_keywords( sched.rst_keywords(3));
const auto expected2 = { "COMPRESS", "RK", "VELOCITY" };
BOOST_CHECK_EQUAL_COLLECTIONS( expected2.begin(), expected2.end(),
kw_list2.begin(), kw_list2.end() );
}