Facebook
From Mammoth Pheasant, 5 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 203
  1. #include <mpi.h>
  2. #include <iostream>
  3. using namespace std;
  4. int main(int argc, char **argv) {
  5. int rank,size,len;
  6. char host[MPI_MAX_PROCESSOR_NAME];
  7. MPI_Status status;
  8. MPI_Init( &argc, &argv);
  9. MPI_Comm_rank( MPI_COMM_WORLD, &rank );
  10. MPI_Comm_size( MPI_COMM_WORLD, &size );
  11. MPI_Get_processor_name(host,&len);
  12. int taskid=rank;
  13. int numtask=size;
  14. int partner;
  15. if(size>0 && size%2==0){
  16. cout<<"" <<"Zbyt mala liczba zadan"<<size<<endl;
  17. return 0;
  18. }
  19. else{
  20. if(taskid< numtask/2) {
  21. partner=numtask/2 +taskid;
  22. }
  23. else if(taskid>=numtask/2){
  24. partner = taskid-numtask/2;
  25. }
  26. }
  27.  
  28. MPI_Finalize();
  29. return 0; }