Fixed scope for MPI to avoid errors in lbpm_segmented_decomp

This commit is contained in:
James McClure
2016-10-10 11:13:55 -04:00
parent 9f844563ba
commit b09a97cdac

View File

@@ -22,13 +22,14 @@ int main(int argc, char **argv)
MPI_Comm_rank(comm,&rank);
MPI_Comm_size(comm,&nprocs);
int SOLID=atoi(argv[1]);
int NWP=atoi(argv[2]);
if (rank==0){
printf("Solid Label %i \n",SOLID);
printf("NWP Label %i \n",NWP);
}
{
//.......................................................................
// Reading the domain information file
//.......................................................................
@@ -264,7 +265,7 @@ int main(int argc, char **argv)
// fwrite(SymDist.get(),8,SymDist.length(),SYMDIST);
fwrite(symid,1,N,SYMID);
fclose(SYMID);
}
MPI_Barrier(comm);
MPI_Finalize();
}