sync_real Subroutine

private subroutine sync_real(this)

callls MPI_Win_Sync on the array’s shared memory window to sync rma This has to be called between read/write epochs to ensure all tasks of a node are looking at the same shared data

Type Bound

shared_array_real_t

Arguments

Type IntentOptional Attributes Name
class(shared_array_real_t) :: this

Contents

Source Code

sync_real

Source Code

    subroutine sync_real (this)
        class(shared_array_real_t) :: this
        integer(MPIArg) :: ierr

        call MPI_Win_Sync(this%win, ierr)
        call MPI_Barrier(mpi_comm_intra, ierr)

    end subroutine sync_real