parallel_obj_Final Subroutine

private impure subroutine parallel_obj_Final()

Finalizes MPI and the parallel environment.

Type Bound

parallel_obj

Arguments

None

Calls

proc~~parallel_obj_final~~CallsGraph proc~parallel_obj_final parallel_obj%parallel_obj_Final mpi_finalize mpi_finalize proc~parallel_obj_final->mpi_finalize

Source Code

    impure subroutine parallel_obj_Final
      !> Finalizes MPI and the parallel environment.
      implicit none
      ! Work variables
      integer :: ierr

      ! Finalize MPI
      call MPI_FINALIZE(ierr)

      return
    end subroutine parallel_obj_Final