//error("Rank %d received foreign particle with local root: %d", engine_rank, gparts[k].root);
//message("Rank %d received foreign particle %lld from rank %d with a local root: %d. i=%d,j=%d.", engine_rank, gparts[0].id_or_neg_offset, foreign_cell->nodeID, gparts[0].root, i, j);
//error("Rank %d received foreign particle with local root: %d", engine_rank, gparts[k].root);
//message("Rank %d received foreign particle %lld from rank %d with a local root: %d. i=%d,j=%d,k=%d.", engine_rank, gparts[k].id_or_neg_offset, foreign_cell->nodeID, gparts[k].root, i, j, k);
}
}
}
}
size_tpart_link_count=0;
/* Loop over each interface cell and find all particle links with foreign cells. */
...
...
@@ -1022,6 +1001,7 @@ void fof_search_foreign_cells(struct space *s) {
if(engine_rank==0)message("Reduction on no. of groups: %d, reduction on no. of particles in groups: %d",total_num_groups_mpi,total_num_parts_in_groups_mpi);
free(displ);
}
#else
...
...
@@ -1485,12 +1433,8 @@ void fof_search_tree(struct space *s) {
#ifdef WITH_MPI
if(s->e->nr_nodes>1){
if(engine_rank==0)message("Total number of groups: %d",total_num_groups);
free(global_nr_gparts);
free(global_group_index);
free(global_group_size);
free(global_group_id);
free(displ);
}
#endif /* WITH_MPI */
...
...
@@ -1515,15 +1459,15 @@ void fof_search_tree(struct space *s) {