comm_env_is_io_server Function

public function comm_env_is_io_server() result(is_io)

Return .true. if this rank is a dedicated I/O server

Arguments

None

Return Value logical


Source Code

   function comm_env_is_io_server() result(is_io)
      !! Return .true. if this rank is a dedicated I/O server
      logical :: is_io
      is_io = cached_is_io_server
   end function comm_env_is_io_server