Пример #1
0
/* STUB */
int MPI_Cart_rank (
        MPI_Comm comm,
        int *coords,
        int *rank )
{
  _MPI_COVERAGE();
  return PMPI_Cart_rank(comm, coords, rank); 
}
Пример #2
0
/**
 * Measurement wrapper for MPI_Cart_rank
 * @note Auto-generated by wrapgen from template: std.w
 * @note C interface
 * @note Introduced with MPI 1.0
 * @ingroup topo
 */
int MPI_Cart_rank(MPI_Comm comm,
                  int*     coords,
                  int*     rank)
{
  int return_val;

  if (IS_EVENT_GEN_ON_FOR(TOPO))
  {
    EVENT_GEN_OFF();
    esd_enter(epk_mpi_regid[EPK__MPI_CART_RANK]);

    return_val = PMPI_Cart_rank(comm, coords, rank);

    esd_exit(epk_mpi_regid[EPK__MPI_CART_RANK]);
    EVENT_GEN_ON();
  }
  else
  {
    return_val = PMPI_Cart_rank(comm, coords, rank);
  }

  return return_val;
}
Пример #3
0
int MPI_Cart_rank(MPI_Comm comm, int* coords, int* rank) {
  return PMPI_Cart_rank(comm, coords, rank);
}