are_all_rank_true.cpp

Go to the documentation of this file.

// -------------------------------------------------------//
//
// SHAMROCK code for hydrodynamics
// Copyright (c) 2021-2026 Timothée David--Cléris <tim.shamrock@proton.me>
// SPDX-License-Identifier: CeCILL Free Software License Agreement v2.1
// Shamrock is licensed under the CeCILL 2.1 License, see LICENSE for more information
//
// -------------------------------------------------------//
 
#include "shambase/stacktrace.hpp"
#include "shamalgs/collective/are_all_rank_true.hpp"
#include "shamcomm/wrapper.hpp"
#include <shamcomm/mpi.hpp>
 
namespace shamalgs::collective {
 
    bool are_all_rank_true(bool input, MPI_Comm comm) {
 
        __shamrock_stack_entry();
 
        bool out = false;
        shamcomm::mpi::Allreduce(&input, &out, 1, MPI_C_BOOL, MPI_LAND, comm);
 
        return out;
    }
 
} // namespace shamalgs::collective