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