MPI_TYPE_NAME Function

public pure function MPI_TYPE_NAME(mpilib) result(name)

Return a name for the MPI library

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: mpilib

Return Value character(len=:), allocatable


Source Code

    pure function MPI_TYPE_NAME(mpilib) result(name)
       integer, intent(in) :: mpilib
       character(len=:), allocatable :: name
       select case (mpilib)
          case (MPI_TYPE_NONE);    name = "none"
          case (MPI_TYPE_OPENMPI); name = "OpenMPI"
          case (MPI_TYPE_MPICH);   name = "MPICH"
          case (MPI_TYPE_INTEL);   name = "INTELMPI"
          case (MPI_TYPE_MSMPI);   name = "MS-MPI"
          case default;            name = "UNKNOWN"
       end select
    end function MPI_TYPE_NAME