RFOF - RF Library for Orbit Following Codes
Public Member Functions | Public Attributes
RFOF_mpi_module Module Reference

Copied from (2011-04-19): http://solps-mdsplus.aug.ipp.mpg.de/wsvn/ASCOT/branches/asalmi/icmods/ascot/mpi_parallel.f90 and modified for RFOF. More...

List of all members.

Public Member Functions

subroutine my_mpi_init (ierr)
subroutine my_mpi_finalize (ierr)
subroutine my_mpi_barrier (ierr)
subroutine my_mpi_bcast0d_int (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast1d_int (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast2d_int (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast_wp (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast2d_wp (data, nsize, bcaster, ierr)
subroutine my_mpi_scatter_wp (sendbuf, sendsize, recvbuf, recvsize, sender, ierr)
subroutine my_mpi_gather_wp (sendbuf, sendsize, recvbuf, recvsize, gatherer, ierr)
subroutine my_mpi_reduce1d_sum_int (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce2d_sum_int (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce1d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce2d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce3d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce4d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce5d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_init (ierr)
subroutine my_mpi_finalize (ierr)
subroutine my_mpi_barrier (ierr)
subroutine my_mpi_bcast0d_int (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast1d_int (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast2d_int (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast_wp (data, nsize, bcaster, ierr)
subroutine my_mpi_bcast2d_wp (data, nsize, bcaster, ierr)
subroutine my_mpi_scatter_wp (sendbuf, sendsize, recvbuf, recvsize, sender, ierr)
subroutine my_mpi_gather_wp (sendbuf, sendsize, recvbuf, recvsize, gatherer, ierr)
subroutine my_mpi_reduce1d_sum_int (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce2d_sum_int (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce1d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce2d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce3d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce4d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)
subroutine my_mpi_reduce5d_sum_wp (sendbuf, recvbuf, sendsize, root, ierr)

Public Attributes

INTEGER, parameter R4 = SELECTED_REAL_KIND(6, 37)
INTEGER, parameter R8 = SELECTED_REAL_KIND(15, 300)
INTEGER, parameter params_wp = R8
INTEGER, parameter params_dp = R8
INTEGER, save mpivar_id
INTEGER, save mpivar_numproc
LOGICAL, save mpivar_independentParallelJob
INTEGER, parameter MPI_SUCCESS = 0

Detailed Description

Copied from (2011-04-19): http://solps-mdsplus.aug.ipp.mpg.de/wsvn/ASCOT/branches/asalmi/icmods/ascot/mpi_parallel.f90 and modified for RFOF.

Author:
Antti Salmi

Definition at line 14 of file RFOF_mpi_parallel.F90.

Member Function/Subroutine Documentation

subroutine RFOF_mpi_module::my_mpi_init ( integer, intent(out)  ierr)

Definition at line 42 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_finalize ( integer, intent(out)  ierr)

Definition at line 63 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_barrier ( INTEGER, intent(out)  ierr)

Definition at line 78 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_bcast0d_int ( integer, intent(inout)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 93 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_bcast1d_int ( integer, dimension(:), intent(inout)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 110 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_bcast2d_int ( integer, dimension(:,:), intent(inout)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 127 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_bcast_wp ( real(kind=params_wp), dimension(:), intent(inout)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 145 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_bcast2d_wp ( real(kind=params_wp), dimension(:,:), intent(inout)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 168 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_scatter_wp ( real(kind=params_wp), dimension(:), intent(in)  sendbuf,
integer, intent(in)  sendsize,
real(kind=params_wp), dimension(:), intent(inout)  recvbuf,
integer, intent(in)  recvsize,
integer, intent(in)  sender,
integer, intent(out)  ierr 
)

Definition at line 190 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_gather_wp ( real(kind=params_wp), dimension(:), intent(in)  sendbuf,
integer, intent(in)  sendsize,
real(kind=params_wp), dimension(:), intent(inout)  recvbuf,
integer, intent(in)  recvsize,
integer, intent(in)  gatherer,
integer, intent(out)  ierr 
)

Definition at line 217 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_reduce1d_sum_int ( integer, dimension(:), intent(in)  sendbuf,
integer, dimension(:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 244 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_reduce2d_sum_int ( integer, dimension(:,:), intent(in)  sendbuf,
integer, dimension(:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 267 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_reduce1d_sum_wp ( real(kind=params_wp), dimension(:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 290 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_reduce2d_sum_wp ( real(kind=params_wp), dimension(:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 365 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_reduce3d_sum_wp ( real(kind=params_wp), dimension(:,:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 394 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_reduce4d_sum_wp ( real(kind=params_wp), dimension(:,:,:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:,:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 424 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_reduce5d_sum_wp ( real(kind=params_wp), dimension(:,:,:,:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:,:,:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 453 of file RFOF_mpi_parallel.F90.

subroutine RFOF_mpi_module::my_mpi_init ( integer  ierr)

Definition at line 40 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_finalize ( integer, intent(out)  ierr)

Definition at line 82 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_barrier ( INTEGER, intent(out)  ierr)

Definition at line 95 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_bcast0d_int ( integer, intent(in)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 108 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_bcast1d_int ( integer, dimension(:), intent(in)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 128 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_bcast2d_int ( integer, dimension(:,:), intent(in)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 146 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_bcast_wp ( real(kind=params_wp), dimension(:), intent(in)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 165 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_bcast2d_wp ( real(kind=params_wp), dimension(:,:), intent(in)  data,
integer, intent(in)  nsize,
integer, intent(in)  bcaster,
integer, intent(out)  ierr 
)

Definition at line 184 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_scatter_wp ( real(kind=params_wp), dimension(:), intent(in)  sendbuf,
integer, intent(in)  sendsize,
real(kind=params_wp), dimension(:), intent(inout)  recvbuf,
integer, intent(in)  recvsize,
integer, intent(in)  sender,
integer, intent(out)  ierr 
)

Definition at line 203 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_gather_wp ( real(kind=params_wp), dimension(:), intent(in)  sendbuf,
integer, intent(in)  sendsize,
real(kind=params_wp), dimension(:), intent(inout)  recvbuf,
integer, intent(in)  recvsize,
integer, intent(in)  gatherer,
integer, intent(out)  ierr 
)

Definition at line 226 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_reduce1d_sum_int ( integer, dimension(:), intent(in)  sendbuf,
integer, dimension(:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 247 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_reduce2d_sum_int ( integer, dimension(:,:), intent(in)  sendbuf,
integer, dimension(:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 269 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_reduce1d_sum_wp ( real(kind=params_wp), dimension(:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 291 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_reduce2d_sum_wp ( real(kind=params_wp), dimension(:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 316 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_reduce3d_sum_wp ( real(kind=params_wp), dimension(:,:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 341 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_reduce4d_sum_wp ( real(kind=params_wp), dimension(:,:,:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:,:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 366 of file RFOF_mpi_serial.F90.

subroutine RFOF_mpi_module::my_mpi_reduce5d_sum_wp ( real(kind=params_wp), dimension(:,:,:,:,:), intent(in)  sendbuf,
real(kind=params_wp), dimension(:,:,:,:,:), intent(inout)  recvbuf,
integer, intent(in)  sendsize,
integer, intent(in)  root,
integer, intent(out)  ierr 
)

Definition at line 390 of file RFOF_mpi_serial.F90.

Member Data Documentation

INTEGER parameter RFOF_mpi_module::R4 = SELECTED_REAL_KIND(6, 37)

Definition at line 24 of file RFOF_mpi_parallel.F90.

INTEGER parameter RFOF_mpi_module::R8 = SELECTED_REAL_KIND(15, 300)

Definition at line 25 of file RFOF_mpi_parallel.F90.

INTEGER parameter RFOF_mpi_module::params_wp = R8

Definition at line 26 of file RFOF_mpi_parallel.F90.

INTEGER, parameter RFOF_mpi_module::params_dp = R8

Definition at line 27 of file RFOF_mpi_parallel.F90.

INTEGER save RFOF_mpi_module::mpivar_id

Definition at line 28 of file RFOF_mpi_parallel.F90.

INTEGER save RFOF_mpi_module::mpivar_numproc

Definition at line 29 of file RFOF_mpi_parallel.F90.

LOGICAL save RFOF_mpi_module::mpivar_independentParallelJob

Definition at line 30 of file RFOF_mpi_parallel.F90.

INTEGER, parameter RFOF_mpi_module::MPI_SUCCESS = 0

Definition at line 21 of file RFOF_mpi_serial.F90.

The documentation for this module was generated from the following files: