ORB5  v4.9.4
pputil Module Reference

Data Types

interface  guard
 
interface  guard3_bsplines_disp
 
interface  ppbcast
 
interface  ppcfft1
 
interface  ppcfft2
 
interface  ppcfft2n
 
interface  ppmax
 
interface  ppmin
 
interface  ppsum
 
interface  pptransp
 
interface  pptranspn
 

Functions/Subroutines

subroutine, public ppinit
 
subroutine, public ppexit
 
subroutine ppsum_r (f, icomm, char_master)
 
subroutine ppsum_ra (f, icomm, char_master)
 
subroutine ppsum_raa (f, icomm, char_master)
 
subroutine ppsum_raaa (f, icomm, char_master)
 
subroutine ppsum_raaaa (f, icomm, char_master)
 
subroutine ppsum_i (f, icomm, char_master)
 
subroutine ppsum_i8 (f, icomm, char_master)
 
subroutine ppsum_ia (f, icomm, char_master)
 
subroutine ppsum_i8a (f, icomm, char_master)
 
subroutine ppsum_iaa (f, icomm, char_master)
 
subroutine ppsum_c (f, icomm, char_master)
 
subroutine ppsum_ca (f, icomm, char_master)
 
subroutine ppsum_caa (f, icomm, char_master)
 
subroutine ppsum_caaa (f, icomm, char_master)
 
subroutine ppsum_caaaa (f, icomm, char_master)
 
subroutine ppmax_r (f, icomm, char_master)
 
subroutine ppmax_ra (f, icomm, char_master)
 
subroutine ppmax_i (f, icomm, char_master)
 
subroutine ppmax_ia (f, icomm, char_master)
 
subroutine ppmin_r (f, icomm, char_master)
 
subroutine ppmin_ra (f, icomm, char_master)
 
subroutine ppmin_i (f, icomm, char_master)
 
subroutine ppmin_ia (f, icomm, char_master)
 
subroutine ppbcast_r (f, icomm)
 
subroutine ppbcast_ra (f, icomm)
 
subroutine ppbcast_raa (f, icomm)
 
subroutine ppbcast_i (f, icomm)
 
subroutine ppbcast_ia (f, icomm)
 
subroutine pptransp_c (a, b)
 
subroutine pptransp_r (a, b)
 
subroutine pptransp_i (a, b)
 
subroutine pptransp2_c (a, b)
 
subroutine pptransp2_r (a, b)
 
subroutine pptransp2_i (a, b)
 
subroutine pptranspn_r (a, b)
 
subroutine pptranspn_c (a, b)
 
subroutine pptranspn_i (a, b)
 
subroutine pptransp2n_r (a, b)
 
subroutine pptransp2n_c (a, b)
 
subroutine pptransp2n_i (a, b)
 
subroutine, public pptransp_mul_c (a, b)
 
subroutine, public timera (icntrl, string, eltime, barrier, startstop)
 
subroutine guard2 (f, nidbas, flag)
 
subroutine guard3 (f, nidbas, flag)
 
subroutine ppcfft2_2d (isign, f, g)
 
subroutine ppcfft2_3d (isign, f, g)
 
subroutine ppcfft2n_2d (isign, f, g)
 
subroutine ppcfft2n_3d (isign, f, g)
 
type(mpi_datatype) function, public blockcols (lda, m, n, otype)
 
type(mpi_datatype) function, public blockcols2 (lda1, lda2, m, n, otype)
 
type(mpi_datatype) function, public blockrows (lda, m, n, otype)
 
type(mpi_datatype) function, public blockrows2 (lda1, lda2, m, n, otype)
 
subroutine ppcfft1_3d (isign, f, g)
 
subroutine, public barrier
 
subroutine, public mpiabort
 
subroutine, public pptopology (bycol)
 
subroutine, public heapcheck (heapstring, heapstep)
 Print min, max, and task 0 values of the heap size. More...
 
subroutine, public init_gather_type (rtype, block_number, block_size, stride_length, new_extent, mpi_base_type)
 
subroutine partners (comm, ids, idr)
 
logical function ispower2 (n)
 
subroutine increment_tag (tag)
 
pure integer function, public get_mpi_comm_int (comm)
 
pure integer function, public get_mpi_info_int (info)
 

Function/Subroutine Documentation

◆ barrier()

subroutine, public pputil::barrier
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ blockcols()

type(mpi_datatype) function, public pputil::blockcols ( integer, intent(in)  lda,
integer, intent(in)  m,
integer, intent(in)  n,
type(mpi_datatype), intent(in)  otype 
)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ blockcols2()

type(mpi_datatype) function, public pputil::blockcols2 ( integer, intent(in)  lda1,
integer, intent(in)  lda2,
integer, intent(in)  m,
integer, intent(in)  n,
type(mpi_datatype), intent(in)  otype 
)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ blockrows()

type(mpi_datatype) function, public pputil::blockrows ( integer, intent(in)  lda,
integer, intent(in)  m,
integer, intent(in)  n,
type(mpi_datatype)  otype 
)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ blockrows2()

type(mpi_datatype) function, public pputil::blockrows2 ( integer, intent(in)  lda1,
integer, intent(in)  lda2,
integer, intent(in)  m,
integer, intent(in)  n,
type(mpi_datatype)  otype 
)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ get_mpi_comm_int()

pure integer function, public pputil::get_mpi_comm_int ( type(mpi_comm), intent(in)  comm)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ get_mpi_info_int()

pure integer function, public pputil::get_mpi_info_int ( type(mpi_info), intent(in)  info)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ guard2()

subroutine pputil::guard2 ( real, dimension(:,:), intent(inout)  f,
integer, intent(in)  nidbas,
integer, intent(in)  flag 
)
private

◆ guard3()

subroutine pputil::guard3 ( real, dimension(:,:,:), intent(inout)  f,
integer, intent(in)  nidbas,
integer, intent(in)  flag 
)
private

◆ heapcheck()

subroutine, public pputil::heapcheck ( character(*), intent(in)  heapstring,
integer, intent(in), optional  heapstep 
)

Print min, max, and task 0 values of the heap size.

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ increment_tag()

subroutine pputil::increment_tag ( integer, intent(inout)  tag)
private
+ Here is the caller graph for this function:

◆ init_gather_type()

subroutine, public pputil::init_gather_type ( type(mpi_datatype), intent(out)  rtype,
integer, intent(in)  block_number,
integer, intent(in)  block_size,
integer, intent(in)  stride_length,
integer, intent(in)  new_extent,
type(mpi_datatype), intent(in)  mpi_base_type 
)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ ispower2()

logical function pputil::ispower2 ( integer, intent(in)  n)
private
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ mpiabort()

subroutine, public pputil::mpiabort
+ Here is the call graph for this function:

◆ partners()

subroutine pputil::partners ( type(mpi_comm), intent(in)  comm,
integer, dimension(:), intent(out)  ids,
integer, dimension(:), intent(out)  idr 
)
private
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ ppbcast_i()

subroutine pputil::ppbcast_i ( integer, intent(inout)  f,
integer, intent(in)  icomm 
)
private

◆ ppbcast_ia()

subroutine pputil::ppbcast_ia ( integer, dimension (:), intent(inout)  f,
integer, intent(in)  icomm 
)
private

◆ ppbcast_r()

subroutine pputil::ppbcast_r ( real, intent(inout)  f,
integer, intent(in)  icomm 
)
private

◆ ppbcast_ra()

subroutine pputil::ppbcast_ra ( real, dimension (:), intent(inout)  f,
integer, intent(in)  icomm 
)
private

◆ ppbcast_raa()

subroutine pputil::ppbcast_raa ( real, dimension (:,:), intent(inout)  f,
integer, intent(in)  icomm 
)
private

◆ ppcfft1_3d()

subroutine pputil::ppcfft1_3d ( integer, intent(in)  isign,
complex, dimension (:,:,:), intent(inout)  f,
complex, dimension (:,:,:), intent(out)  g 
)
private

◆ ppcfft2_2d()

subroutine pputil::ppcfft2_2d ( integer, intent(in)  isign,
complex, dimension (:,:), intent(inout)  f,
complex, dimension (:,:), intent(out)  g 
)
private

◆ ppcfft2_3d()

subroutine pputil::ppcfft2_3d ( integer, intent(in)  isign,
complex, dimension (:,:,:), intent(inout)  f,
complex, dimension (:,:,:), intent(out)  g 
)

◆ ppcfft2n_2d()

subroutine pputil::ppcfft2n_2d ( integer, intent(in)  isign,
complex, dimension (:,:), intent(inout)  f,
complex, dimension (:,:), intent(out)  g 
)

◆ ppcfft2n_3d()

subroutine pputil::ppcfft2n_3d ( integer, intent(in)  isign,
complex, dimension (:,:,:), intent(inout)  f,
complex, dimension (:,:,:), intent(out)  g 
)

◆ ppexit()

subroutine, public pputil::ppexit
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ ppinit()

subroutine, public pputil::ppinit
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ ppmax_i()

subroutine pputil::ppmax_i ( integer, intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppmax_ia()

subroutine pputil::ppmax_ia ( integer, dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppmax_r()

subroutine pputil::ppmax_r ( real, intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppmax_ra()

subroutine pputil::ppmax_ra ( real, dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppmin_i()

subroutine pputil::ppmin_i ( integer, intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppmin_ia()

subroutine pputil::ppmin_ia ( integer, dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppmin_r()

subroutine pputil::ppmin_r ( real, intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppmin_ra()

subroutine pputil::ppmin_ra ( real, dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_c()

subroutine pputil::ppsum_c ( complex, intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_ca()

subroutine pputil::ppsum_ca ( complex, dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_caa()

subroutine pputil::ppsum_caa ( complex, dimension (:,:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_caaa()

subroutine pputil::ppsum_caaa ( complex, dimension (:,:,:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_caaaa()

subroutine pputil::ppsum_caaaa ( complex, dimension (:,:,:,:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_i()

subroutine pputil::ppsum_i ( integer, intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_i8()

subroutine pputil::ppsum_i8 ( integer(kind=i8), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_i8a()

subroutine pputil::ppsum_i8a ( integer(kind=i8), dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_ia()

subroutine pputil::ppsum_ia ( integer, dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_iaa()

subroutine pputil::ppsum_iaa ( integer, dimension (:,:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_r()

subroutine pputil::ppsum_r ( real, intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)

◆ ppsum_ra()

subroutine pputil::ppsum_ra ( real, dimension (:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_raa()

subroutine pputil::ppsum_raa ( real, dimension (:,:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_raaa()

subroutine pputil::ppsum_raaa ( real, dimension (:,:,:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ ppsum_raaaa()

subroutine pputil::ppsum_raaaa ( real, dimension (:,:,:,:), intent(inout)  f,
integer, intent(in)  icomm,
character(len=*), intent(in), optional  char_master 
)
private

◆ pptopology()

subroutine, public pputil::pptopology ( logical, intent(in), optional  bycol)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ pptransp2_c()

subroutine pputil::pptransp2_c ( complex, dimension(:,:,:), intent(in)  a,
complex, dimension(:,:,:), intent(out)  b 
)
private

◆ pptransp2_i()

subroutine pputil::pptransp2_i ( integer, dimension(:,:,:), intent(in)  a,
integer, dimension(:,:,:), intent(out)  b 
)
private

◆ pptransp2_r()

subroutine pputil::pptransp2_r ( real, dimension(:,:,:), intent(in)  a,
real, dimension(:,:,:), intent(out)  b 
)
private

◆ pptransp2n_c()

subroutine pputil::pptransp2n_c ( complex, dimension(:,:,:), intent(in)  a,
complex, dimension(:,:,:), intent(out)  b 
)
private

◆ pptransp2n_i()

subroutine pputil::pptransp2n_i ( integer, dimension(:,:,:), intent(in)  a,
integer, dimension(:,:,:), intent(out)  b 
)
private

◆ pptransp2n_r()

subroutine pputil::pptransp2n_r ( real*8, dimension(:,:,:), intent(in)  a,
real*8, dimension(:,:,:), intent(out)  b 
)
private

◆ pptransp_c()

subroutine pputil::pptransp_c ( complex, dimension(:,:), intent(in)  a,
complex, dimension(:,:), intent(out)  b 
)
private

◆ pptransp_i()

subroutine pputil::pptransp_i ( integer, dimension(:,:), intent(in)  a,
integer, dimension(:,:), intent(out)  b 
)
private

◆ pptransp_mul_c()

subroutine, public pputil::pptransp_mul_c ( complex, dimension(:,:,:), intent(in)  a,
complex, dimension(:,:,:), intent(inout)  b 
)
+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ pptransp_r()

subroutine pputil::pptransp_r ( real, dimension(:,:), intent(in)  a,
real, dimension(:,:), intent(out)  b 
)
private

◆ pptranspn_c()

subroutine pputil::pptranspn_c ( complex, dimension(:,:), intent(in)  a,
complex, dimension(:,:), intent(out)  b 
)
private

◆ pptranspn_i()

subroutine pputil::pptranspn_i ( integer, dimension(:,:), intent(in)  a,
integer, dimension(:,:), intent(out)  b 
)
private

◆ pptranspn_r()

subroutine pputil::pptranspn_r ( real*8, dimension(:,:), intent(in)  a,
real*8, dimension(:,:), intent(out)  b 
)
private

◆ timera()

subroutine, public pputil::timera ( integer, intent(in)  icntrl,
character(len=*), intent(in)  string,
real*8, intent(out), optional  eltime,
logical, intent(in), optional  barrier,
character(len=4), intent(in), optional  startstop 
)
+ Here is the call graph for this function:
+ Here is the caller graph for this function: