MPIClass Module


Uses


Contents


Derived Types

type, public :: comment

Components

TypeVisibility AttributesNameInitial
character(len=200), public :: comment

type, public :: MPI_

Components

TypeVisibility AttributesNameInitial
integer, public :: ierr
integer, public :: MyRank
integer, public :: PeTot
integer, public :: Comm1
integer, public :: Comm2
integer, public :: Comm3
integer, public :: Comm4
integer, public :: Comm5
integer, public :: LapTimeStep
real(kind=8), public :: stime
real(kind=8), public :: etime
real(kind=8), public :: laptime(1000)
type(comment), public :: comments(1000)

Type-Bound Procedures

procedure, public :: Start => StartMPI
procedure, public :: Barrier => BarrierMPI
procedure, public :: Bcast => BcastMPI
procedure, public :: End => EndMPI
procedure, public :: getLapTime => getLapTimeMPI
procedure, public :: showLapTime => showLapTimeMPI
procedure, public :: GetInfo => GetMPIInfo

Subroutines

public subroutine StartMPI(obj)

Arguments

Type IntentOptional AttributesName
class(MPI_), intent(inout) :: obj

public subroutine GetMPIInfo(obj)

Arguments

Type IntentOptional AttributesName
class(MPI_), intent(inout) :: obj

public subroutine BarrierMPI(obj)

Arguments

Type IntentOptional AttributesName
class(MPI_), intent(inout) :: obj

public subroutine BcastMPI(obj, From, int_val)

Arguments

Type IntentOptional AttributesName
class(MPI_), intent(inout) :: obj
integer, intent(inout) :: From
integer, intent(inout) :: int_val

public subroutine EndMPI(obj)

Arguments

Type IntentOptional AttributesName
class(MPI_), intent(inout) :: obj

public subroutine getLapTimeMPI(obj, comment)

Arguments

Type IntentOptional AttributesName
class(MPI_), intent(inout) :: obj
character(len=*), intent(in), optional :: comment

public subroutine showLapTimeMPI(obj, cLength, rank)

Arguments

Type IntentOptional AttributesName
class(MPI_), intent(inout) :: obj
integer, intent(in), optional :: cLength
integer, intent(in), optional :: rank