109     PetscMPIInt rank, size, subsize, subrank, duprank;  in PetscSubcommView()  local
116     PetscCallMPI(MPI_Comm_rank(psubcomm->dupparent, &duprank));  in PetscSubcommView()
118 …or %d, sub-size %d, sub-rank %d, duprank %d\n", rank, psubcomm->color, subsize, subrank, duprank));  in PetscSubcommView()
198   PetscMPIInt size, icolor, duprank, *recvbuf, sendbuf[3], mysubsize, rank, *subsize;  in PetscSubcommSetTypeGeneral()  local
223   duprank = 0;  in PetscSubcommSetTypeGeneral()
226       duprank += subsize[icolor];  in PetscSubcommSetTypeGeneral()
228       duprank += subrank;  in PetscSubcommSetTypeGeneral()
232   PetscCallMPI(MPI_Comm_split(comm, 0, duprank, &dupcomm));  in PetscSubcommSetTypeGeneral()
375   PetscMPIInt rank, size, *subsize, duprank = -1, subrank = -1;  in PetscSubcommCreate_contiguous()  local
399       duprank = rank;  in PetscSubcommCreate_contiguous()
407   PetscCallMPI(MPI_Comm_split(comm, 0, duprank, &dupcomm));  in PetscSubcommCreate_contiguous()
446   PetscMPIInt rank, size, *subsize, duprank, subrank;  in PetscSubcommCreate_interlaced()  local
471   duprank = 0;  in PetscSubcommCreate_interlaced()
474       duprank += subrank;  in PetscSubcommCreate_interlaced()
477     duprank += subsize[i];  in PetscSubcommCreate_interlaced()
482   PetscCallMPI(MPI_Comm_split(comm, 0, duprank, &dupcomm));  in PetscSubcommCreate_interlaced()