示例#1
0
void MPICH_Localcopy(void *sendbuf, int sendcount, MPI_Datatype sendtype,
					 void *recvbuf, int recvcount, MPI_Datatype recvtype)
{
  int rank;
 
  AMPI_Comm_rank (MPI_COMM_WORLD, &rank);
  AMPI_Sendrecv ( sendbuf, sendcount, sendtype,
				  rank, MPI_ATA_TAG, 
				  recvbuf, recvcount, recvtype,
				  rank, MPI_ATA_TAG,
				  MPI_COMM_WORLD, MPI_STATUS_IGNORE);
}
示例#2
0
void mpi_comm_rank(int *comm, int *rank, int *ierr)
{
  *ierr = AMPI_Comm_rank(*comm, rank);
}