Skeleton for INTEHEAD Writing
Based on reverse-engineering of several ECL runs.
This commit is contained in:
committed by
Joakim Hove
parent
e864031bf4
commit
ce1f66b4e5
369
tests/test_InteHEAD.cpp
Executable file
369
tests/test_InteHEAD.cpp
Executable file
@@ -0,0 +1,369 @@
|
||||
/*
|
||||
Copyright 2018 Statoil IT
|
||||
|
||||
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 InteHEAD_Vector
|
||||
|
||||
#include <boost/test/unit_test.hpp>
|
||||
|
||||
#include <opm/output/eclipse/InteHEAD.hpp>
|
||||
|
||||
#include <array>
|
||||
#include <initializer_list>
|
||||
|
||||
BOOST_AUTO_TEST_SUITE(Member_Functions)
|
||||
|
||||
BOOST_AUTO_TEST_CASE(Dimensions_Individual)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.dimensions(100, 60, 15);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[ 9 - 1], 100); // Nx
|
||||
BOOST_CHECK_EQUAL(v[10 - 1], 60); // Ny
|
||||
BOOST_CHECK_EQUAL(v[11 - 1], 15); // Nz
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(Dimensions_Array)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.dimensions({100, 60, 15});
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[ 9 - 1], 100); // Nx
|
||||
BOOST_CHECK_EQUAL(v[10 - 1], 60); // Ny
|
||||
BOOST_CHECK_EQUAL(v[11 - 1], 15); // Nz
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(NumActive)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.numActive(72390);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[12 - 1], 72390); // NACTIVE
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(UnitConventions)
|
||||
{
|
||||
using USys = Opm::RestartIO::InteHEAD::UnitSystem;
|
||||
|
||||
auto ih = Opm::RestartIO::InteHEAD{};
|
||||
|
||||
// Metric
|
||||
{
|
||||
ih.unitConventions(USys::Metric);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[3 - 1], 1); // Unit
|
||||
}
|
||||
|
||||
// Field
|
||||
{
|
||||
ih.unitConventions(USys::Field);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[3 - 1], 2); // Unit
|
||||
}
|
||||
|
||||
// Lab
|
||||
{
|
||||
ih.unitConventions(USys::Lab);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[3 - 1], 3); // Unit
|
||||
}
|
||||
|
||||
// PVT-M
|
||||
{
|
||||
ih.unitConventions(USys::PVT_M);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[3 - 1], 4); // Unit
|
||||
}
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(WellTableDimensions)
|
||||
{
|
||||
const auto numWells = 17;
|
||||
const auto maxPerf = 29;
|
||||
const auto maxWellInGroup = 3;
|
||||
const auto maxGroupInField = 14;
|
||||
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.wellTableDimensions({
|
||||
numWells, maxPerf, maxWellInGroup, maxGroupInField
|
||||
});
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[17 - 1], numWells); // NWELLS
|
||||
BOOST_CHECK_EQUAL(v[18 - 1], maxPerf); // NCWMAX
|
||||
BOOST_CHECK_EQUAL(v[20 - 1], maxWellInGroup); // NWGMAX
|
||||
BOOST_CHECK_EQUAL(v[21 - 1], maxGroupInField); // NGMAXZ
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(CalendarDate)
|
||||
{
|
||||
// 2015-04-09T11:22:33+0000
|
||||
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
. calenderDate({
|
||||
2015, 4, 9, 11, 22, 33
|
||||
});
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[67 - 1], 2015); // Year
|
||||
BOOST_CHECK_EQUAL(v[66 - 1], 4); // Month
|
||||
BOOST_CHECK_EQUAL(v[65 - 1], 9); // Day
|
||||
|
||||
BOOST_CHECK_EQUAL(v[207 - 1], 11); // Hour
|
||||
BOOST_CHECK_EQUAL(v[208 - 1], 22); // Minute
|
||||
BOOST_CHECK_EQUAL(v[411 - 1], 33000000); // Second (in microseconds)
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(ActivePhases)
|
||||
{
|
||||
using Ph = Opm::RestartIO::InteHEAD::Phases;
|
||||
auto ih = Opm::RestartIO::InteHEAD{};
|
||||
|
||||
// Oil
|
||||
{
|
||||
ih.activePhases(Ph{ 1, 0, 0 });
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[15 - 1], 1);
|
||||
}
|
||||
|
||||
// Water
|
||||
{
|
||||
ih.activePhases(Ph{ 0, 1, 0 });
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[15 - 1], 2);
|
||||
}
|
||||
|
||||
// Gas
|
||||
{
|
||||
ih.activePhases(Ph{ 0, 0, 1 });
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[15 - 1], 4);
|
||||
}
|
||||
|
||||
// Oil/Water
|
||||
{
|
||||
ih.activePhases(Ph{ 1, 1, 0 });
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[15 - 1], 3);
|
||||
}
|
||||
|
||||
// Oil/Gas
|
||||
{
|
||||
ih.activePhases(Ph{ 1, 0, 1 });
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[15 - 1], 5);
|
||||
}
|
||||
|
||||
// Water/Gas
|
||||
{
|
||||
ih.activePhases(Ph{ 0, 1, 1 });
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[15 - 1], 6);
|
||||
}
|
||||
|
||||
// Oil/Water/Gas
|
||||
{
|
||||
ih.activePhases(Ph{ 1, 1, 1 });
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[15 - 1], 7);
|
||||
}
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(NWell_Parameters)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.params_NWELZ(27, 18, 28, 1);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[25 - 1], 27); // NIWELZ
|
||||
BOOST_CHECK_EQUAL(v[26 - 1], 18); // NSWELZ
|
||||
BOOST_CHECK_EQUAL(v[27 - 1], 28); // NXWELZ
|
||||
BOOST_CHECK_EQUAL(v[28 - 1], 1); // NZWELZ
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(NConn_Parameters)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.params_NCON(31, 41, 59);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[33 - 1], 31); // NICONZ
|
||||
BOOST_CHECK_EQUAL(v[34 - 1], 41); // NSCONZ
|
||||
BOOST_CHECK_EQUAL(v[35 - 1], 59); // NXCONZ
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(GroupSize_Parameters)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.params_GRPZ({ 577, 215, 664, 901 }); // https://oeis.org/A001620
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[37 - 1], 577); // NIGRPZ
|
||||
BOOST_CHECK_EQUAL(v[38 - 1], 215); // NSGRPZ
|
||||
BOOST_CHECK_EQUAL(v[39 - 1], 664); // NXGRPZ
|
||||
BOOST_CHECK_EQUAL(v[40 - 1], 901); // NZGRPZ
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(Analytic_Aquifer_Parameters)
|
||||
{
|
||||
// https://oeis.org/A001622
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.params_NAAQZ(1, 61, 803, 3988, 74989, 484820, 4586834);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[42 - 1], 1); // NCAMAX
|
||||
BOOST_CHECK_EQUAL(v[43 - 1], 61); // NIAAQZ
|
||||
BOOST_CHECK_EQUAL(v[44 - 1], 803); // NSAAQZ
|
||||
BOOST_CHECK_EQUAL(v[45 - 1], 3988); // NXAAQZ
|
||||
BOOST_CHECK_EQUAL(v[46 - 1], 74989); // NICAQZ
|
||||
BOOST_CHECK_EQUAL(v[47 - 1], 484820); // NSCAQZ
|
||||
BOOST_CHECK_EQUAL(v[48 - 1], 4586834); // NACAQZ
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(Time_and_report_step)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.stepParam(12, 2);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[67], 12); // TSTEP
|
||||
BOOST_CHECK_EQUAL(v[68], 2); // REP_STEP
|
||||
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(Tuning_param)
|
||||
{
|
||||
const auto newtmx = 17;
|
||||
const auto newtmn = 5;
|
||||
const auto litmax = 102;
|
||||
const auto litmin = 20;
|
||||
const auto mxwsit = 8;
|
||||
const auto mxwpit = 6;
|
||||
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.tuningParam({
|
||||
newtmx, newtmn, litmax, litmin, mxwsit, mxwpit
|
||||
});
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[80], newtmx); // NEWTMX
|
||||
BOOST_CHECK_EQUAL(v[81], newtmn); // NEWTMN
|
||||
BOOST_CHECK_EQUAL(v[82], litmax); // LITMAX
|
||||
BOOST_CHECK_EQUAL(v[83], litmin); // LITMIN
|
||||
BOOST_CHECK_EQUAL(v[84], mxwsit); // MXWSIT
|
||||
BOOST_CHECK_EQUAL(v[85], mxwpit); // MXWPIT
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(Various_Parameters)
|
||||
{
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.variousParam(100, 2, 3);
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[ 94], 100); // IPROG
|
||||
BOOST_CHECK_EQUAL(v[101], 2); // IH_101
|
||||
BOOST_CHECK_EQUAL(v[103], 3); // IH_103
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(wellSegDimensions)
|
||||
{
|
||||
const auto nsegwl = 3;
|
||||
const auto nswlmx = 4;
|
||||
const auto nsegmx = 5;
|
||||
const auto nlbrmx = 6;
|
||||
const auto nisegz = 7;
|
||||
const auto nrsegz = 8;
|
||||
const auto nilbrz = 9;
|
||||
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.wellSegDimensions({
|
||||
nsegwl, nswlmx, nsegmx, nlbrmx, nisegz, nrsegz, nilbrz
|
||||
});
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[174], nsegwl);
|
||||
BOOST_CHECK_EQUAL(v[175], nswlmx);
|
||||
BOOST_CHECK_EQUAL(v[176], nsegmx);
|
||||
BOOST_CHECK_EQUAL(v[177], nlbrmx);
|
||||
BOOST_CHECK_EQUAL(v[178], nisegz);
|
||||
BOOST_CHECK_EQUAL(v[179], nrsegz);
|
||||
BOOST_CHECK_EQUAL(v[180], nilbrz);
|
||||
}
|
||||
|
||||
BOOST_AUTO_TEST_CASE(regionDimensions)
|
||||
{
|
||||
|
||||
const auto ntfip = 12;
|
||||
const auto nmfipr = 22;
|
||||
const auto nrfreg = 5;
|
||||
const auto ntfreg = 6;
|
||||
const auto nplmix = 7;
|
||||
|
||||
const auto ih = Opm::RestartIO::InteHEAD{}
|
||||
.regionDimensions({
|
||||
ntfip, nmfipr, nrfreg, ntfreg, nplmix
|
||||
|
||||
});
|
||||
|
||||
const auto& v = ih.data();
|
||||
|
||||
BOOST_CHECK_EQUAL(v[88], ntfip); // NTFIP
|
||||
BOOST_CHECK_EQUAL(v[99], nmfipr); // NMFIPR
|
||||
|
||||
}
|
||||
|
||||
|
||||
BOOST_AUTO_TEST_SUITE_END()
|
||||
Reference in New Issue
Block a user