271   PetscMPIInt rank, comm_size;  in PrintRunInfo()  local
273   PetscCallMPI(MPI_Comm_rank(comm, &rank));  in PrintRunInfo()
366     if (!rank) PetscCall(PetscMalloc1(comm_size, &gather_buffer));  in PrintRunInfo()
369     if (!rank) {  in PrintRunInfo()
382     if (!rank) {  in PrintRunInfo()
405           if (rranks[i] == rank) continue;  // Ignore same-part global->local transfers  in PrintRunInfo()
410           if (iranks[i] == rank) continue;  in PrintRunInfo()
416       if (!rank) {  in PrintRunInfo()
430       if (!rank) {  in PrintRunInfo()
441       if (!rank) {  in PrintRunInfo()
455       if (!rank) {  in PrintRunInfo()
466     if (!rank) PetscCall(PetscFree(gather_buffer));  in PrintRunInfo()