create_null_comm Function

private function create_null_comm() result(comm)

Creates an invalid/null communicator object that can be used for initialization or to represent absence of a communicator.

Arguments

None

Return Value type(comm_t)


Called by

proc~~create_null_comm~~CalledByGraph proc~create_null_comm create_null_comm interface~comm_null comm_null interface~comm_null->proc~create_null_comm proc~comm_discard_leader comm_t%comm_discard_leader proc~comm_discard_leader->interface~comm_null proc~comm_split_by_color comm_t%comm_split_by_color proc~comm_discard_leader->proc~comm_split_by_color proc~comm_discard_to comm_t%comm_discard_to proc~comm_discard_to->interface~comm_null proc~comm_discard_to->proc~comm_split_by_color proc~comm_duplicate comm_t%comm_duplicate proc~comm_duplicate->interface~comm_null proc~comm_split_by_color->interface~comm_null proc~comm_split_shared comm_t%comm_split_shared proc~comm_split_shared->interface~comm_null proc~darrays_init darrays_init proc~darrays_init->proc~comm_duplicate proc~darrays_set_comm darrays_set_comm proc~darrays_set_comm->proc~comm_duplicate proc~dlb_init dlb_init proc~dlb_init->proc~comm_duplicate

Source Code

   function create_null_comm() result(comm)
   !! Creates an invalid/null communicator object that can be used
   !! for initialization or to represent absence of a communicator.
      type(comm_t) :: comm

      ! Explicitly initialize to null/invalid state
      comm%m_comm = MPI_COMM_NULL
      comm%m_rank = -1
      comm%m_size = -1
      comm%is_valid = .false.
   end function create_null_comm