darrays_set_comm Subroutine

public subroutine darrays_set_comm(comm)

Set communicator for convenience wrappers

Call after darrays_init to enable gsumf/gsumi/sync/nproc.

Arguments

Type IntentOptional Attributes Name
type(comm_t), intent(in) :: comm

Calls

proc~~darrays_set_comm~~CallsGraph proc~darrays_set_comm darrays_set_comm proc~comm_duplicate comm_t%comm_duplicate proc~darrays_set_comm->proc~comm_duplicate interface~comm_null comm_null proc~comm_duplicate->interface~comm_null mpi_comm_dup mpi_comm_dup proc~comm_duplicate->mpi_comm_dup proc~create_comm_from_mpi create_comm_from_mpi proc~comm_duplicate->proc~create_comm_from_mpi proc~create_null_comm create_null_comm interface~comm_null->proc~create_null_comm mpi_comm_rank mpi_comm_rank proc~create_comm_from_mpi->mpi_comm_rank mpi_comm_size mpi_comm_size proc~create_comm_from_mpi->mpi_comm_size

Source Code

   subroutine darrays_set_comm(comm)
      type(comm_t), intent(in) :: comm
      wrapper_comm = comm%duplicate()
      wrapper_initialized = .true.
   end subroutine darrays_set_comm