Searched refs:CommCoarsen (Results 1 – 1 of 1) sorted by relevance
67 PetscErrorCode CommCoarsen(MPI_Comm comm, PetscInt number, PetscSubcomm *p) in CommCoarsen() function89 PetscCall(CommCoarsen(comm, number[n - 1], &pscommlist[n - 1])); in CommHierarchyCreate()92 if (pscommlist[k + 1]->color == 0) PetscCall(CommCoarsen(comm_k, number[k], &pscommlist[k])); in CommHierarchyCreate()