pic_mpi_finalize Subroutine

public subroutine pic_mpi_finalize(ierr)

Finalize MPI environment

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(out), optional :: ierr

Calls

proc~~pic_mpi_finalize~~CallsGraph proc~pic_mpi_finalize pic_mpi_finalize mpi_finalize mpi_finalize proc~pic_mpi_finalize->mpi_finalize

Variables

Type Visibility Attributes Name Initial
integer(kind=int32), private :: ierr_local

Source Code

   subroutine pic_mpi_finalize(ierr)
      !! Finalize MPI environment
      integer(int32), optional, intent(out) :: ierr
      integer(int32) :: ierr_local
      call MPI_Finalize(ierr_local)
      if (present(ierr)) ierr = ierr_local
   end subroutine pic_mpi_finalize