trilinos_utilities.h

Go to the documentation of this file.

// -----------------------------------------------------------------------------
//
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception OR LGPL-2.1-or-later
// Copyright (C) 2022 - 2026 by the deal.II authors
//
// This file is part of the deal.II library.
//
// Detailed license information governing the source code and contributions
// can be found in LICENSE.md and CONTRIBUTING.md at the top level directory.
//
// -----------------------------------------------------------------------------
 
#ifndef dealii_trilinos_utilities_h
#define dealii_trilinos_utilities_h
 
#include <deal.II/base/config.h>
 
#include <deal.II/base/exceptions.h>
#include <deal.II/base/mpi_stub.h>
 
#ifdef DEAL_II_WITH_TRILINOS
 
DEAL_II_DISABLE_EXTRA_DIAGNOSTICS
#  ifdef DEAL_II_TRILINOS_WITH_EPETRA
#    include <Epetra_Comm.h>
#    include <Epetra_Map.h>
 
#    ifdef DEAL_II_WITH_MPI
#      include <Epetra_MpiComm.h>
#    else
#      include <Epetra_SerialComm.h>
#    endif
#  endif
#  include <Teuchos_Comm.hpp>
#  include <Teuchos_RCP.hpp>
DEAL_II_ENABLE_EXTRA_DIAGNOSTICS
#endif
 
 
DEAL_II_NAMESPACE_OPEN
 
namespace Utilities
{
#ifdef DEAL_II_TRILINOS_WITH_EPETRA
  namespace Trilinos
  {
    const Epetra_Comm &
    comm_world();
 
    const Epetra_Comm &
    comm_self();
 
    Epetra_Comm *
    duplicate_communicator(const Epetra_Comm &communicator);
 
    void
    destroy_communicator(Epetra_Comm &communicator);
 
    unsigned int
    get_n_mpi_processes(const Epetra_Comm &mpi_communicator);
 
    unsigned int
    get_this_mpi_process(const Epetra_Comm &mpi_communicator);
 
    Epetra_Map
    duplicate_map(const Epetra_BlockMap &map, const Epetra_Comm &comm);
  } // namespace Trilinos
#endif
 
 
#ifdef DEAL_II_TRILINOS_WITH_TPETRA
  namespace Trilinos
  {
    const Teuchos::RCP<const Teuchos::Comm<int>> &
    tpetra_comm_self();
 
    MPI_Comm
    teuchos_comm_to_mpi_comm(
      const Teuchos::RCP<const Teuchos::Comm<int>> &teuchos_comm);
 
    namespace internal
    {
#  if defined(DOXYGEN) || !DEAL_II_TRILINOS_VERSION_GTE(14, 0, 0)
      template <class T, class... Args>
      Teuchos::RCP<T>
      make_rcp(Args &&...args);
#  else
      using Teuchos::make_rcp;
#  endif // defined DOXYGEN || !DEAL_II_TRILINOS_VERSION_GTE(14, 0, 0)
    }    // namespace internal
 
 
 
    /* ------------------------- Inline functions ---------------------- */
    namespace internal
    {
#  if !DEAL_II_TRILINOS_VERSION_GTE(14, 0, 0)
      template <class T, class... Args>
      inline Teuchos::RCP<T>
      make_rcp(Args &&...args)
      {
        return Teuchos::RCP<T>(new T(std::forward<Args>(args)...));
      }
#  endif // !DEAL_II_TRILINOS_VERSION_GTE(14, 0, 0)
    }    // namespace internal
 
  }    // namespace Trilinos
#endif // DEAL_II_TRILINOS_WITH_TPETRA
 
} // namespace Utilities
 
DEAL_II_NAMESPACE_CLOSE
 
#endif