191   PetscInt          *lcid, *gcid, *lsparse, *gsparse, *colmap, *pcols;  in PCGAMGProlongator_Classical_Direct()  local
224   PetscCall(PetscMalloc5(fn, &lsparse, fn, &gsparse, fn, &lcid, fn, &Amax_pos, fn, &Amax_neg));  in PCGAMGProlongator_Classical_Direct()
231     lcid[i] = -1;  in PCGAMGProlongator_Classical_Direct()
243       lcid[i] = cs + cn;  in PCGAMGProlongator_Classical_Direct()
246       lcid[i] = -1;  in PCGAMGProlongator_Classical_Direct()
251     PetscCall(PetscSFBcastBegin(sf, MPIU_INT, lcid, gcid, MPI_REPLACE));  in PCGAMGProlongator_Classical_Direct()
252     PetscCall(PetscSFBcastEnd(sf, MPIU_INT, lcid, gcid, MPI_REPLACE));  in PCGAMGProlongator_Classical_Direct()
275     if (lcid[i] >= 0) {  in PCGAMGProlongator_Classical_Direct()
282 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
309     row_c = lcid[i];  in PCGAMGProlongator_Classical_Direct()
324 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
384 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
386           row_c = lcid[col];  in PCGAMGProlongator_Classical_Direct()
431   PetscCall(PetscFree5(lsparse, gsparse, lcid, Amax_pos, Amax_neg));  in PCGAMGProlongator_Classical_Direct()
561   PetscInt          *gcid, *lcid, *lsparse, *gsparse, *picol;  in PCGAMGProlongator_Classical_Standard()  local
620     PetscCall(PetscMalloc1(nl, &lcid));  in PCGAMGProlongator_Classical_Standard()
621     PetscCall(PetscSFBcastBegin(sf, MPIU_INT, gcid, lcid, MPI_REPLACE));  in PCGAMGProlongator_Classical_Standard()
622     PetscCall(PetscSFBcastEnd(sf, MPIU_INT, gcid, lcid, MPI_REPLACE));  in PCGAMGProlongator_Classical_Standard()
624     lcid = gcid;  in PCGAMGProlongator_Classical_Standard()
637       cid         = lcid[i];  in PCGAMGProlongator_Classical_Standard()
642           if (lcid[icol[j]] >= 0) {  in PCGAMGProlongator_Classical_Standard()
649               if (lcid[icol[k]] >= 0) pcontrib[icol[k]] = 1.;  in PCGAMGProlongator_Classical_Standard()
656           if (lcid[icol[j]] >= 0 && pcontrib[icol[j]] != 0.) {  in PCGAMGProlongator_Classical_Standard()
657             lni = lcid[icol[j]];  in PCGAMGProlongator_Classical_Standard()
669               if (lcid[icol[k]] >= 0 && pcontrib[icol[k]] != 0.) {  in PCGAMGProlongator_Classical_Standard()
670                 lni = lcid[icol[k]];  in PCGAMGProlongator_Classical_Standard()
699       cid    = lcid[i];  in PCGAMGProlongator_Classical_Standard()
708           if (lcid[icol[j]] >= 0) {  in PCGAMGProlongator_Classical_Standard()
723               if (lcid[icol[k]] >= 0 && jdiag * PetscRealPart(vcol[k]) < 0.) {  in PCGAMGProlongator_Classical_Standard()
731                 if (lcid[icol[k]] >= 0 && jdiag * PetscRealPart(vcol[k]) < 0.) {  in PCGAMGProlongator_Classical_Standard()
748             if (lcid[icol[j]] >= 0 && pcontrib[icol[j]] != 0.) {  in PCGAMGProlongator_Classical_Standard()
751                 lni           = lcid[icol[j]];  in PCGAMGProlongator_Classical_Standard()
763                 if (lcid[icol[k]] >= 0 && pcontrib[icol[k]] != 0.) {  in PCGAMGProlongator_Classical_Standard()
765                     lni           = lcid[icol[k]];  in PCGAMGProlongator_Classical_Standard()
791     PetscCall(PetscFree(lcid));  in PCGAMGProlongator_Classical_Standard()