197   MPI_Comm    subcomm = 0, dupcomm = 0, comm = psubcomm->parent;  in PetscSubcommSetTypeGeneral()  local
205   PetscCallMPI(MPI_Comm_split(comm, color, subrank, &subcomm));  in PetscSubcommSetTypeGeneral()
213   PetscCallMPI(MPI_Comm_size(subcomm, &mysubsize));  in PetscSubcommSetTypeGeneral()
235   PetscCall(PetscCommDuplicate(subcomm, &psubcomm->child, NULL));  in PetscSubcommSetTypeGeneral()
237   PetscCallMPI(MPI_Comm_free(&subcomm));  in PetscSubcommSetTypeGeneral()
377   MPI_Comm    subcomm = 0, dupcomm = 0, comm = psubcomm->parent;  in PetscSubcommCreate_contiguous()  local
404   PetscCallMPI(MPI_Comm_split(comm, color, subrank, &subcomm));  in PetscSubcommCreate_contiguous()
409   PetscCall(PetscCommDuplicate(subcomm, &psubcomm->child, NULL));  in PetscSubcommCreate_contiguous()
411   PetscCallMPI(MPI_Comm_free(&subcomm));  in PetscSubcommCreate_contiguous()
448   MPI_Comm    subcomm = 0, dupcomm = 0, comm = psubcomm->parent;  in PetscSubcommCreate_interlaced()  local
468   PetscCallMPI(MPI_Comm_split(comm, color, subrank, &subcomm));  in PetscSubcommCreate_interlaced()
484   PetscCall(PetscCommDuplicate(subcomm, &psubcomm->child, NULL));  in PetscSubcommCreate_interlaced()
486   PetscCallMPI(MPI_Comm_free(&subcomm));  in PetscSubcommCreate_interlaced()