CAM
bshr_mpi_mod Module Reference

Data Types

interface  shr_mpi_bcast
 
interface  shr_mpi_gatherv
 
interface  shr_mpi_gathscatvinit
 
interface  shr_mpi_max
 
interface  shr_mpi_min
 
interface  shr_mpi_recv
 
interface  shr_mpi_scatterv
 
interface  shr_mpi_send
 
interface  shr_mpi_sum
 

Functions/Subroutines

subroutine, public shr_mpi_chkerr (rcode, string)
 
subroutine shr_mpi_sendi0 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_sendi1 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_sendr0 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_sendr1 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_sendr3 (array, pid, tag, comm, string)
 
subroutine shr_mpi_recvi0 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_recvi1 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_recvr0 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_recvr1 (lvec, pid, tag, comm, string)
 
subroutine shr_mpi_recvr3 (array, pid, tag, comm, string)
 
subroutine shr_mpi_bcasti0 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcasti80 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcastl0 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcastc0 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcastc1 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcastr0 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcasti1 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcasti81 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcastl1 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcastr1 (vec, comm, string, pebcast)
 
subroutine shr_mpi_bcastr2 (arr, comm, string, pebcast)
 
subroutine shr_mpi_bcasti2 (arr, comm, string, pebcast)
 
subroutine shr_mpi_bcastr3 (arr, comm, string, pebcast)
 
subroutine shr_mpi_gathscatvinitr1 (comm, rootid, locArr, glob1DArr, globSize, displs, string)
 
subroutine shr_mpi_gathervr1 (locarr, locSize, glob1DArr, globSize, displs, rootid, comm, string)
 
subroutine shr_mpi_scattervr1 (locarr, locSize, glob1Darr, globSize, displs, rootid, comm, string)
 
subroutine shr_mpi_sumi0 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_sumi1 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_sumb0 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_sumb1 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_sumr0 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_sumr1 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_sumr2 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_sumr3 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_mini0 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_mini1 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_minr0 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_minr1 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_maxi0 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_maxi1 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_maxr0 (lvec, gvec, comm, string, all)
 
subroutine shr_mpi_maxr1 (lvec, gvec, comm, string, all)
 
subroutine, public shr_mpi_commsize (comm, size, string)
 
subroutine, public shr_mpi_commrank (comm, rank, string)
 
subroutine, public shr_mpi_initialized (flag, string)
 
subroutine, public shr_mpi_abort (string, rcode)
 
subroutine, public shr_mpi_barrier (comm, string)
 
subroutine, public shr_mpi_init (string)
 
subroutine, public shr_mpi_finalize (string)
 

Variables

character(len= *), parameter, private mod_filename = __FILE__
 

Function/Subroutine Documentation

◆ shr_mpi_abort()

subroutine, public bshr_mpi_mod::shr_mpi_abort ( character(*), intent(in), optional  string,
integer, intent(in), optional  rcode 
)
Here is the caller graph for this function:

◆ shr_mpi_barrier()

subroutine, public bshr_mpi_mod::shr_mpi_barrier ( integer, intent(in)  comm,
character(*), intent(in), optional  string 
)

◆ shr_mpi_bcastc0()

subroutine bshr_mpi_mod::shr_mpi_bcastc0 ( character(len=*), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcastc1()

subroutine bshr_mpi_mod::shr_mpi_bcastc1 ( character(len=*), dimension(:), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcasti0()

subroutine bshr_mpi_mod::shr_mpi_bcasti0 ( integer(shr_kind_in), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcasti1()

subroutine bshr_mpi_mod::shr_mpi_bcasti1 ( integer(shr_kind_in), dimension(:), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcasti2()

subroutine bshr_mpi_mod::shr_mpi_bcasti2 ( integer, dimension(:,:), intent(inout)  arr,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcasti80()

subroutine bshr_mpi_mod::shr_mpi_bcasti80 ( integer(shr_kind_i8), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcasti81()

subroutine bshr_mpi_mod::shr_mpi_bcasti81 ( integer(shr_kind_i8), dimension(:), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcastl0()

subroutine bshr_mpi_mod::shr_mpi_bcastl0 ( logical, intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcastl1()

subroutine bshr_mpi_mod::shr_mpi_bcastl1 ( logical, dimension(:), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcastr0()

subroutine bshr_mpi_mod::shr_mpi_bcastr0 ( real(shr_kind_r8), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcastr1()

subroutine bshr_mpi_mod::shr_mpi_bcastr1 ( real(shr_kind_r8), dimension(:), intent(inout)  vec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcastr2()

subroutine bshr_mpi_mod::shr_mpi_bcastr2 ( real(shr_kind_r8), dimension(:,:), intent(inout)  arr,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_bcastr3()

subroutine bshr_mpi_mod::shr_mpi_bcastr3 ( real(shr_kind_r8), dimension(:,:,:), intent(inout)  arr,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
integer(shr_kind_in), intent(in), optional  pebcast 
)
private

◆ shr_mpi_chkerr()

subroutine, public bshr_mpi_mod::shr_mpi_chkerr ( integer(shr_kind_in), intent(in)  rcode,
character(*), intent(in)  string 
)

◆ shr_mpi_commrank()

subroutine, public bshr_mpi_mod::shr_mpi_commrank ( integer, intent(in)  comm,
integer, intent(out)  rank,
character(*), intent(in), optional  string 
)

◆ shr_mpi_commsize()

subroutine, public bshr_mpi_mod::shr_mpi_commsize ( integer, intent(in)  comm,
integer, intent(out)  size,
character(*), intent(in), optional  string 
)

◆ shr_mpi_finalize()

subroutine, public bshr_mpi_mod::shr_mpi_finalize ( character(*), intent(in), optional  string)

◆ shr_mpi_gathervr1()

subroutine bshr_mpi_mod::shr_mpi_gathervr1 ( real(shr_kind_r8), dimension(:), intent(in)  locarr,
integer(shr_kind_in), intent(in)  locSize,
real(shr_kind_r8), dimension(:), intent(inout)  glob1DArr,
integer(shr_kind_in), dimension(:), intent(in)  globSize,
integer(shr_kind_in), dimension(:), intent(in)  displs,
integer(shr_kind_in), intent(in)  rootid,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_gathscatvinitr1()

subroutine bshr_mpi_mod::shr_mpi_gathscatvinitr1 ( integer(shr_kind_in), intent(in)  comm,
integer(shr_kind_in), intent(in)  rootid,
real(shr_kind_r8), dimension(:), intent(in)  locArr,
real(shr_kind_r8), dimension(:), pointer  glob1DArr,
integer(shr_kind_in), dimension(:), pointer  globSize,
integer(shr_kind_in), dimension(:), pointer  displs,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_init()

subroutine, public bshr_mpi_mod::shr_mpi_init ( character(*), intent(in), optional  string)

◆ shr_mpi_initialized()

subroutine, public bshr_mpi_mod::shr_mpi_initialized ( logical, intent(out)  flag,
character(*), intent(in), optional  string 
)

◆ shr_mpi_maxi0()

subroutine bshr_mpi_mod::shr_mpi_maxi0 ( integer(shr_kind_in), intent(in)  lvec,
integer(shr_kind_in), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_maxi1()

subroutine bshr_mpi_mod::shr_mpi_maxi1 ( integer(shr_kind_in), dimension(:), intent(in)  lvec,
integer(shr_kind_in), dimension(:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_maxr0()

subroutine bshr_mpi_mod::shr_mpi_maxr0 ( real(shr_kind_r8), intent(in)  lvec,
real(shr_kind_r8), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_maxr1()

subroutine bshr_mpi_mod::shr_mpi_maxr1 ( real(shr_kind_r8), dimension(:), intent(in)  lvec,
real(shr_kind_r8), dimension(:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_mini0()

subroutine bshr_mpi_mod::shr_mpi_mini0 ( integer(shr_kind_in), intent(in)  lvec,
integer(shr_kind_in), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_mini1()

subroutine bshr_mpi_mod::shr_mpi_mini1 ( integer(shr_kind_in), dimension(:), intent(in)  lvec,
integer(shr_kind_in), dimension(:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_minr0()

subroutine bshr_mpi_mod::shr_mpi_minr0 ( real(shr_kind_r8), intent(in)  lvec,
real(shr_kind_r8), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_minr1()

subroutine bshr_mpi_mod::shr_mpi_minr1 ( real(shr_kind_r8), dimension(:), intent(in)  lvec,
real(shr_kind_r8), dimension(:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_recvi0()

subroutine bshr_mpi_mod::shr_mpi_recvi0 ( integer(shr_kind_in), intent(out)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_recvi1()

subroutine bshr_mpi_mod::shr_mpi_recvi1 ( integer(shr_kind_in), dimension(:), intent(out)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_recvr0()

subroutine bshr_mpi_mod::shr_mpi_recvr0 ( real(shr_kind_r8), intent(out)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_recvr1()

subroutine bshr_mpi_mod::shr_mpi_recvr1 ( real(shr_kind_r8), dimension(:), intent(out)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_recvr3()

subroutine bshr_mpi_mod::shr_mpi_recvr3 ( real (shr_kind_r8), dimension(:,:,:), intent(out)  array,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_scattervr1()

subroutine bshr_mpi_mod::shr_mpi_scattervr1 ( real(shr_kind_r8), dimension(:), intent(out)  locarr,
integer(shr_kind_in), intent(in)  locSize,
real(shr_kind_r8), dimension(:), intent(in)  glob1Darr,
integer(shr_kind_in), dimension(:), intent(in)  globSize,
integer(shr_kind_in), dimension(:), intent(in)  displs,
integer(shr_kind_in), intent(in)  rootid,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_sendi0()

subroutine bshr_mpi_mod::shr_mpi_sendi0 ( integer(shr_kind_in), intent(in)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_sendi1()

subroutine bshr_mpi_mod::shr_mpi_sendi1 ( integer(shr_kind_in), dimension(:), intent(in)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_sendr0()

subroutine bshr_mpi_mod::shr_mpi_sendr0 ( real(shr_kind_r8), intent(in)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_sendr1()

subroutine bshr_mpi_mod::shr_mpi_sendr1 ( real(shr_kind_r8), dimension(:), intent(in)  lvec,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_sendr3()

subroutine bshr_mpi_mod::shr_mpi_sendr3 ( real (shr_kind_r8), dimension(:,:,:), intent(in)  array,
integer(shr_kind_in), intent(in)  pid,
integer(shr_kind_in), intent(in)  tag,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string 
)
private

◆ shr_mpi_sumb0()

subroutine bshr_mpi_mod::shr_mpi_sumb0 ( integer(shr_kind_i8), intent(in)  lvec,
integer(shr_kind_i8), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_sumb1()

subroutine bshr_mpi_mod::shr_mpi_sumb1 ( integer(shr_kind_i8), dimension(:), intent(in)  lvec,
integer(shr_kind_i8), dimension(:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_sumi0()

subroutine bshr_mpi_mod::shr_mpi_sumi0 ( integer(shr_kind_in), intent(in)  lvec,
integer(shr_kind_in), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_sumi1()

subroutine bshr_mpi_mod::shr_mpi_sumi1 ( integer(shr_kind_in), dimension(:), intent(in)  lvec,
integer(shr_kind_in), dimension(:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_sumr0()

subroutine bshr_mpi_mod::shr_mpi_sumr0 ( real(shr_kind_r8), intent(in)  lvec,
real(shr_kind_r8), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_sumr1()

subroutine bshr_mpi_mod::shr_mpi_sumr1 ( real(shr_kind_r8), dimension(:), intent(in)  lvec,
real(shr_kind_r8), dimension(:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_sumr2()

subroutine bshr_mpi_mod::shr_mpi_sumr2 ( real(shr_kind_r8), dimension(:,:), intent(in)  lvec,
real(shr_kind_r8), dimension(:,:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

◆ shr_mpi_sumr3()

subroutine bshr_mpi_mod::shr_mpi_sumr3 ( real(shr_kind_r8), dimension(:,:,:), intent(in)  lvec,
real(shr_kind_r8), dimension(:,:,:), intent(out)  gvec,
integer(shr_kind_in), intent(in)  comm,
character(*), intent(in), optional  string,
logical, intent(in), optional  all 
)
private

Variable Documentation

◆ mod_filename

character(len=*), parameter, private bshr_mpi_mod::mod_filename = __FILE__
private