sync_cmplx Subroutine

private subroutine sync_cmplx(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_cmplx_t

Arguments

Type IntentOptional Attributes Name
class(shared_array_cmplx_t) :: this

Contents

Source Code


Source Code

    subroutine sync_cmplx (this)
        class(shared_array_cmplx_t) :: this
        integer(MPIArg) :: ierr

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

    end subroutine sync_cmplx