OilfieldToolsNet/opm-simulators
4
0
Fork 0
mirror of https://github.com/OPM/opm-simulators.git synced 2024-12-22 23:43:28 -06:00
Code Issues Packages Projects Releases Wiki Activity

Added test for multMatrixTransposed.

Browse Source
This commit is contained in:
Markus Blatt 2018-02-26 15:50:55 +01:00
parent 3be954fe98
commit 247241c037
2 changed files with 55 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
CMakeLists_files.cmake
View File

@ -147,6 +147,7 @@ list (APPEND TEST_SOURCE_FILES
tests/test_welldensitysegmented.cpp
tests/test_vfpproperties.cpp
tests/test_singlecellsolves.cpp
tests/test_multmatrixtransposed.cpp
tests/test_multiphaseupwind.cpp
tests/test_wellmodel.cpp
# tests/test_thresholdpressure.cpp

54
tests/test_multmatrixtransposed.cpp Normal file
View File

@ -0,0 +1,54 @@
/*
Copyright 2018 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/>.
*/
#include <config.h>
#define BOOST_TEST_MODULE MultMatrixTransposed
#include <boost/test/unit_test.hpp>
#include <opm/autodiff/ISTLSolver.hpp>
using namespace Dune;
using namespace Opm::Detail;
BOOST_AUTO_TEST_CASE(testmultmatrixtrans)
{
using Scalar = FieldMatrix<double,1,1>;
Scalar a1 = {{ 4 }}, b1 = {{ 2 }}, res1 = {{}}, resExpect1 = {{ 8 }};
multMatrixTransposed(a1, b1, res1);
BOOST_CHECK_EQUAL(res1, resExpect1);
using Mat2 = FieldMatrix<double,2,2>;
Mat2 a2 = {{ 1, 2 }, { 3, 4} }, b2 = {{ 3, 4 }, { 5, 6} };
Mat2 res2 = {{}, {}}, resExpect2 = {{ 18, 22 }, {26, 32} };
multMatrixTransposed(a2, b2, res2);
BOOST_CHECK_EQUAL(res2, resExpect2);
using Mat3 = FieldMatrix<double,3,3>;
Mat3 a3 = {{ 1, 2, 3 }, { 3, 4, 5}, {6, 7, 8} };
Mat3 b3 = {{ 3, 4, 5 }, { 5, 6, 7}, {7, 8, 9} };
Mat3 res3 = {{}, {}, {}};
Mat3 resExpect3 = {{ 60, 70, 80 }, {75, 88, 101}, { 90, 106, 122 } };
multMatrixTransposed(a3, b3, res3);
BOOST_CHECK_EQUAL(res3, resExpect3);
}