ps. mam to ale to tylko jednai grupa na dwóch coś mi nie chce działać
- Kod: Zaznacz cały
#include<mpi.h>
#include<stdio.h>
#define NPROCS 8
int main(int argc, char **argv) {
int rank, new_rank, sendbuf, ranks1[4]={0,1,2,3}, ranks2[4]={4,5,6,7};
MPI_Group orgi_group, new_group;
MPI_Comm new_comm;
MPI_Init(&argc,&argv);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
MPI_Comm_group(MPI_COMM_WORLD, &orgi_group);
if (rank < NPROCS/2)
{
MPI_Group_incl(orgi_group, NPROCS/2,ranks1, &new_group);
}
else{
MPI_Group_incl(orgi_group, NPROCS/2, ranks2, &new_group);
}
MPI_Comm_create(MPI_COMM_WORLD, new_group, &new_comm);
MPI_Group_rank (new_group, &new_rank);
if ((rank %2)==0) {
printf("rank= %d newrank= %d Proces parzysty\n",rank,new_rank);
printf("\n");
}else {
printf("rank= %d newrank= %d Proces nieparzysty\n",rank,new_rank);
printf("\n");
}
MPI_Comm_free(&new_comm);
MPI_Group_free(&orgi_group);
MPI_Group_free(&new_group);
MPI_Finalize();
return 0;
}
