shr_mpi_mod Module


Uses


Interfaces

public interface shr_mpi_send

  • private subroutine shr_mpi_sendi0(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_sendi1(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_sendr0(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_sendr1(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_sendr3(array, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: array(:,:,:)
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

public interface shr_mpi_recv

  • private subroutine shr_mpi_recvi0(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(out) :: lvec
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_recvi1(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(out) :: lvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_recvr0(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(out) :: lvec
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_recvr1(lvec, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(out) :: lvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

  • private subroutine shr_mpi_recvr3(array, pid, tag, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(out) :: array(:,:,:)
    integer(kind=SHR_KIND_IN), intent(in) :: pid
    integer(kind=SHR_KIND_IN), intent(in) :: tag
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

public interface shr_mpi_bcast

  • private subroutine shr_mpi_bcastc0(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(inout) :: vec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcastc1(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(inout) :: vec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcastl0(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    logical, intent(inout) :: vec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcastl1(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    logical, intent(inout) :: vec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcasti0(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(inout) :: vec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcasti1(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(inout) :: vec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcasti80(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_I8), intent(inout) :: vec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcasti81(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_I8), intent(inout) :: vec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcasti2(arr, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(inout) :: arr(:,:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcastr0(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(inout) :: vec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcastr1(vec, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(inout) :: vec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcastr2(arr, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(inout) :: arr(:,:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

  • private subroutine shr_mpi_bcastr3(arr, comm, string, pebcast)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(inout) :: arr(:,:,:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    integer(kind=SHR_KIND_IN), intent(in), optional :: pebcast

public interface shr_mpi_gathScatVInit

  • private subroutine shr_mpi_gathScatvInitr1(comm, rootid, locArr, glob1DArr, globSize, displs, string)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    integer(kind=SHR_KIND_IN), intent(in) :: rootid
    real(kind=SHR_KIND_R8), intent(in) :: locArr(:)
    real(kind=SHR_KIND_R8), pointer :: glob1DArr(:)
    integer(kind=SHR_KIND_IN), pointer :: globSize(:)
    integer(kind=SHR_KIND_IN), pointer :: displs(:)
    character(len=*), intent(in), optional :: string

public interface shr_mpi_gatherv

  • private subroutine shr_mpi_gathervr1(locArr, locSize, glob1DArr, globSize, displs, rootid, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: locArr(:)
    integer(kind=SHR_KIND_IN), intent(in) :: locSize
    real(kind=SHR_KIND_R8), intent(inout) :: glob1DArr(:)
    integer(kind=SHR_KIND_IN), intent(in) :: globSize(:)
    integer(kind=SHR_KIND_IN), intent(in) :: displs(:)
    integer(kind=SHR_KIND_IN), intent(in) :: rootid
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

public interface shr_mpi_scatterv

  • private subroutine shr_mpi_scattervr1(locarr, locSize, glob1Darr, globSize, displs, rootid, comm, string)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(out) :: locarr(:)
    integer(kind=SHR_KIND_IN), intent(in) :: locSize
    real(kind=SHR_KIND_R8), intent(in) :: glob1Darr(:)
    integer(kind=SHR_KIND_IN), intent(in) :: globSize(:)
    integer(kind=SHR_KIND_IN), intent(in) :: displs(:)
    integer(kind=SHR_KIND_IN), intent(in) :: rootid
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string

public interface shr_mpi_sum

  • private subroutine shr_mpi_sumi0(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec
    integer(kind=SHR_KIND_IN), intent(out) :: gvec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_sumi1(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec(:)
    integer(kind=SHR_KIND_IN), intent(out) :: gvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_sumb0(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_I8), intent(in) :: lvec
    integer(kind=SHR_KIND_I8), intent(out) :: gvec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_sumb1(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_I8), intent(in) :: lvec(:)
    integer(kind=SHR_KIND_I8), intent(out) :: gvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_sumr0(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec
    real(kind=SHR_KIND_R8), intent(out) :: gvec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_sumr1(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec(:)
    real(kind=SHR_KIND_R8), intent(out) :: gvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_sumr2(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec(:,:)
    real(kind=SHR_KIND_R8), intent(out) :: gvec(:,:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_sumr3(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec(:,:,:)
    real(kind=SHR_KIND_R8), intent(out) :: gvec(:,:,:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

public interface shr_mpi_min

  • private subroutine shr_mpi_mini0(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec
    integer(kind=SHR_KIND_IN), intent(out) :: gvec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_mini1(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec(:)
    integer(kind=SHR_KIND_IN), intent(out) :: gvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_minr0(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec
    real(kind=SHR_KIND_R8), intent(out) :: gvec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_minr1(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec(:)
    real(kind=SHR_KIND_R8), intent(out) :: gvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

public interface shr_mpi_max

  • private subroutine shr_mpi_maxi0(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec
    integer(kind=SHR_KIND_IN), intent(out) :: gvec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_maxi1(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    integer(kind=SHR_KIND_IN), intent(in) :: lvec(:)
    integer(kind=SHR_KIND_IN), intent(out) :: gvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_maxr0(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec
    real(kind=SHR_KIND_R8), intent(out) :: gvec
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

  • private subroutine shr_mpi_maxr1(lvec, gvec, comm, string, all)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=SHR_KIND_R8), intent(in) :: lvec(:)
    real(kind=SHR_KIND_R8), intent(out) :: gvec(:)
    integer(kind=SHR_KIND_IN), intent(in) :: comm
    character(len=*), intent(in), optional :: string
    logical, intent(in), optional :: all

Subroutines

public subroutine shr_mpi_chkerr(rcode, string)

Arguments

Type IntentOptional Attributes Name
integer(kind=SHR_KIND_IN), intent(in) :: rcode
character(len=*), intent(in) :: string

public subroutine shr_mpi_commsize(comm, size, string)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
integer, intent(out) :: size
character(len=*), intent(in), optional :: string

public subroutine shr_mpi_commrank(comm, rank, string)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
integer, intent(out) :: rank
character(len=*), intent(in), optional :: string

public subroutine shr_mpi_initialized(flag, string)

Arguments

Type IntentOptional Attributes Name
logical, intent(out) :: flag
character(len=*), intent(in), optional :: string

public subroutine shr_mpi_abort(string, rcode)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in), optional :: string
integer, intent(in), optional :: rcode

public subroutine shr_mpi_barrier(comm, string)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm
character(len=*), intent(in), optional :: string

public subroutine shr_mpi_init(string)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in), optional :: string

public subroutine shr_mpi_finalize(string)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in), optional :: string