get_rank Function

public pure function get_rank() result(rank)

Utility function to get the rank of the current MPI process.

Arguments

Return Value integer

   pure integer function get_rank() result(rank)
      !! Utility function to get the rank of the current MPI process.
      rank = nid
   end function get_rank