From 38df5d6bfc6f81138424d087bb666c92ed4a8f02 Mon Sep 17 00:00:00 2001
From: Sebastian Eibl <sebastian.eibl@fau.de>
Date: Fri, 8 Dec 2017 16:36:48 +0100
Subject: [PATCH] check if blockforest creation is deterministic
---
tests/blockforest/CMakeLists.txt | 3 +
tests/blockforest/DeterministicCreation.cpp | 77 +++++++++++++++++++++
2 files changed, 80 insertions(+)
create mode 100644 tests/blockforest/DeterministicCreation.cpp
diff --git a/tests/blockforest/CMakeLists.txt b/tests/blockforest/CMakeLists.txt
index cdadb523d..5c710c5bc 100644
--- a/tests/blockforest/CMakeLists.txt
+++ b/tests/blockforest/CMakeLists.txt
@@ -13,6 +13,9 @@ waLBerla_execute_test( NAME SetupBlockForestTest LABELS longrun CONFIGURATIONS R
waLBerla_compile_test( FILES BlockForestTest.cpp )
waLBerla_execute_test( NAME BlockForestTest PROCESSES 4 )
+waLBerla_compile_test( FILES DeterministicCreation.cpp )
+waLBerla_execute_test( NAME DeterministicCreation PROCESSES 8 )
+
waLBerla_compile_test( NAME SaveLoad FILES SaveLoadTest.cpp DEPENDS core blockforest )
waLBerla_execute_test( NAME SaveLoad01 COMMAND $<TARGET_FILE:SaveLoad> PROCESSES 1 )
waLBerla_execute_test( NAME SaveLoad02 COMMAND $<TARGET_FILE:SaveLoad> PROCESSES 2 )
diff --git a/tests/blockforest/DeterministicCreation.cpp b/tests/blockforest/DeterministicCreation.cpp
new file mode 100644
index 000000000..b50dc5344
--- /dev/null
+++ b/tests/blockforest/DeterministicCreation.cpp
@@ -0,0 +1,77 @@
+//======================================================================================================================
+//
+// This file is part of waLBerla. waLBerla 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.
+//
+// waLBerla 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 waLBerla (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \file DeterministicCreation.cpp
+//! \author Sebastian Eibl <sebastian.eibl@fau.de>
+//
+//======================================================================================================================
+
+#include "blockforest/Initialization.h"
+#include "core/DataTypes.h"
+#include "core/debug/TestSubsystem.h"
+#include "core/logging/Logging.h"
+#include "core/mpi/Environment.h"
+
+using namespace walberla;
+
+void TwoBlockForestsTest()
+{
+ math::AABB domainBlock(0,0,0,3,3,3);
+
+ Vector3<uint_t> cells (10,10,10);
+ Vector3<uint_t> blocks (2,2,2);
+ Vector3<uint_t> procs (2,2,2);
+ Vector3<bool> periodic(true, true, true);
+
+ uint_t peDomainFactor = uint_t(20);
+
+ AABB lbmDomainAABB( real_c(0), real_c(0), real_c(0), real_c(cells[0]), real_c(cells[1]), real_c(cells[2]) );
+ AABB peDomainAABB ( real_c(0), real_c(0), real_c(0), real_c(cells[0]), real_c(cells[1]), real_c(cells[2]*peDomainFactor) );
+
+ mpi::MPIManager::instance()->resetMPI();
+
+ auto lbmBlocks = blockforest::createUniformBlockGrid(
+ lbmDomainAABB,
+ blocks[0], blocks[1], blocks[2], // number of blocks in x/y/z direction
+ cells[0]/blocks[0], cells[1]/blocks[1], cells[2]/blocks[2], // number of cells per block in x/y/z direction
+ procs[0], procs[1], procs[2], // number of processes in x/y/z direction
+ periodic[0], periodic[1], periodic[2], true ); // periodic in every direction
+
+ mpi::MPIManager::instance()->resetMPI();
+
+ auto peBlocks = blockforest::createUniformBlockGrid(
+ peDomainAABB,
+ blocks[0], blocks[1], blocks[2], // number of blocks in x/y/z direction
+ cells[0] / blocks[0], cells[1] / blocks[1], peDomainFactor * cells[2] / blocks[2], // number of cells per block in x/y/z direction
+ procs[0], procs[1], procs[2], // number of processes in x/y/z direction
+ periodic[0], periodic[1], periodic[2], true); // periodic in every direction
+
+ WALBERLA_LOG_DEVEL(lbmBlocks->begin()->getAABB());
+ WALBERLA_LOG_DEVEL(peBlocks->begin()->getAABB());
+
+ WALBERLA_CHECK_EQUAL( lbmBlocks->begin()->getId(), peBlocks->begin()->getId() );
+}
+
+int main( int argc, char** argv )
+{
+ debug::enterTestMode();
+
+ mpi::Environment env( argc, argv );
+ //MPIManager::instance()->useWorldComm();
+
+ TwoBlockForestsTest();
+
+ return EXIT_SUCCESS;
+}
--
GitLab