<div dir="ltr">Hello,<div><br></div><div>I don't understand the following subroutine in the Nek mpi_dummy.f file:</div><div><br></div><div>---------------------------------------------------------------------------------------------------------<br></div><div><div>      subroutine mpi_comm_rank ( comm, me, ierror )</div><div><br></div><div>      implicit none</div><div><br></div><div>      integer comm</div><div>      integer ierror</div><div>      integer me</div><div>      integer MPI_FAILURE</div><div>      parameter ( MPI_FAILURE = 1 )</div><div>      integer MPI_SUCCESS</div><div>      parameter ( MPI_SUCCESS = 0 )</div><div><br></div><div>      ierror = MPI_SUCCESS</div><div>      me = 0</div><div><br></div><div>      return</div><div>      end</div></div><div>---------------------------------------------------------------------------------------------------------<br></div><div><br></div><div style>This will always return one. How does this give the rank of the process then? Can someone please explain the reason for this function?</div><div style><br></div><div style>Thanks,</div><div style>Pradeep</div></div>