win_unlock Subroutine

private subroutine win_unlock(this, rank)

Type Bound

win_t

Arguments

Type IntentOptional Attributes Name
class(win_t), intent(in) :: this
integer(kind=int32), intent(in) :: rank

Calls

proc~~win_unlock~~CallsGraph proc~win_unlock win_t%win_unlock mpi_win_unlock mpi_win_unlock proc~win_unlock->mpi_win_unlock

Variables

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

Source Code

   subroutine win_unlock(this, rank)
      class(win_t), intent(in) :: this
      integer(int32), intent(in) :: rank
      integer(int32) :: ierr

      call MPI_Win_unlock(rank, this%m_win, ierr)
   end subroutine win_unlock