459     PetscMPIInt       *lghost_pe, *lghost_max_pe;  in MatCoarsenApply_HEM_private()  local
511 …PetscCall(PetscMalloc4(num_ghosts, &lghost_matched, num_ghosts, &lghost_pe, num_ghosts, &lghost_gi…  in MatCoarsenApply_HEM_private()
523 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk]); …  in MatCoarsenApply_HEM_private()
543       PetscMPIInt proc = lghost_pe[ix], idx = -1;  in MatCoarsenApply_HEM_private()
578             if ((pe = lghost_pe[aj[jj]]) > max_pe) max_pe = pe;  in MatCoarsenApply_HEM_private()
701 …ouble)(PetscRealPart(lid_max_ew[lid0]) - e->weight), ghost1_idx != -1 ? lghost_pe[ghost1_idx] : ra…  in MatCoarsenApply_HEM_private()
718 …weight, (double)(PetscRealPart(lghost_max_ew[ghost1_idx]) - e->weight), lghost_pe[ghost1_idx], lid…  in MatCoarsenApply_HEM_private()
722 …} else if (g_max_e1 >= e->weight - MY_MEPS && lghost_pe[ghost1_idx] > rank) { // is 'lghost_max_pe…  in MatCoarsenApply_HEM_private()
725 …ank, gid0, gid1, (double)(PetscRealPart(lid_max_ew[lid0]) - e->weight), lghost_pe[ghost1_idx], lgh…  in MatCoarsenApply_HEM_private()
755 …ew), lghost_pe[lidj], lghost_max_pe[lidj], isOK, (double)ew >= (double)(max_e - MY_MEPS), ew >= Pe…  in MatCoarsenApply_HEM_private()
779 …roc %d (max %d)\n", rank, gid0, lghost_gid[lidj], (double)(max_e - ew), lghost_pe[lidj], lghost_ma…  in MatCoarsenApply_HEM_private()
796             PetscMPIInt proc = lghost_pe[ghost1_idx];  in MatCoarsenApply_HEM_private()
1027 …    if ((pe = lghost_pe[aj[jj]]) > max_pe && PetscRealPart(ap[jj]) >= max_e - MY_MEPS) max_pe = pe;  in MatCoarsenApply_HEM_private()
1063       PetscCall(PetscFree4(lghost_matched, lghost_pe, lghost_gid, lghost_max_pe));  in MatCoarsenApply_HEM_private()