Advertisement
Guest User

Untitled

a guest
Aug 31st, 2016
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.41 KB | None | 0 0
  1. #include <stdio.h>
  2. #include <mpi.h>
  3.  
  4. int main(int argc, char *argv[]) {
  5. int numprocs, rank, namelen;
  6. char processor_name[MPI_MAX_PROCESSOR_NAME];
  7.  
  8. MPI_Init(&argc, &argv);
  9. MPI_Comm_size(MPI_COMM_WORLD, &numprocs);
  10. MPI_Comm_rank(MPI_COMM_WORLD, &rank);
  11. MPI_Get_processor_name(processor_name, &namelen);
  12.  
  13. printf("Process %d on %s out of %d\n", rank, processor_name, numprocs);
  14.  
  15. MPI_Finalize();
  16. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement