87   const PetscScalar *rval;  in PCGAMGCreateGraph_Classical()  local
111     PetscCall(MatGetRow(A, r, &ncols, &rcol, &rval));  in PCGAMGCreateGraph_Classical()
113       if (PetscRealPart(-rval[c]) > rmax && rcol[c] != r) rmax = PetscRealPart(-rval[c]);  in PCGAMGCreateGraph_Classical()
121 …   if (PetscRealPart(-rval[c]) > gamg->threshold[0] * PetscRealPart(Amax[r - s]) || rcol[c] == r) {  in PCGAMGCreateGraph_Classical()
129     PetscCall(MatRestoreRow(A, r, &ncols, &rcol, &rval));  in PCGAMGCreateGraph_Classical()
142     PetscCall(MatGetRow(A, r, &ncols, &rcol, &rval));  in PCGAMGCreateGraph_Classical()
146 …   if (PetscRealPart(-rval[c]) > gamg->threshold[0] * PetscRealPart(Amax[r - s]) || rcol[c] == r) {  in PCGAMGCreateGraph_Classical()
148         gval[idx] = rval[c];  in PCGAMGCreateGraph_Classical()
153     PetscCall(MatRestoreRow(A, r, &ncols, &rcol, &rval));  in PCGAMGCreateGraph_Classical()
196   const PetscScalar *rval;  in PCGAMGProlongator_Classical_Direct()  local
259     PetscCall(MatGetRow(A, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
261 …if ((PetscRealPart(-rval[j]) > Amax_neg[i - fs]) && i != rcol[j]) Amax_neg[i - fs] = PetscAbsScala…  in PCGAMGProlongator_Classical_Direct()
262 …if ((PetscRealPart(rval[j]) > Amax_pos[i - fs]) && i != rcol[j]) Amax_pos[i - fs] = PetscAbsScalar…  in PCGAMGProlongator_Classical_Direct()
265     PetscCall(MatRestoreRow(A, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
279       PetscCall(MatGetRow(lA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
282 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
284       PetscCall(MatRestoreRow(lA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
287         PetscCall(MatGetRow(gA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
290 …if (gcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
292         PetscCall(MatRestoreRow(gA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
321       PetscCall(MatGetRow(lA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
324 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
325           if (PetscRealPart(rval[j]) > 0.) {  in PCGAMGProlongator_Classical_Direct()
326             g_pos += rval[j];  in PCGAMGProlongator_Classical_Direct()
328             g_neg += rval[j];  in PCGAMGProlongator_Classical_Direct()
332           if (PetscRealPart(rval[j]) > 0.) {  in PCGAMGProlongator_Classical_Direct()
333             a_pos += rval[j];  in PCGAMGProlongator_Classical_Direct()
335             a_neg += rval[j];  in PCGAMGProlongator_Classical_Direct()
338           diag = rval[j];  in PCGAMGProlongator_Classical_Direct()
341       PetscCall(MatRestoreRow(lA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
345         PetscCall(MatGetRow(gA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
348 …if (gcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
349             if (PetscRealPart(rval[j]) > 0.) {  in PCGAMGProlongator_Classical_Direct()
350               g_pos += rval[j];  in PCGAMGProlongator_Classical_Direct()
352               g_neg += rval[j];  in PCGAMGProlongator_Classical_Direct()
355           if (PetscRealPart(rval[j]) > 0.) {  in PCGAMGProlongator_Classical_Direct()
356             a_pos += rval[j];  in PCGAMGProlongator_Classical_Direct()
358             a_neg += rval[j];  in PCGAMGProlongator_Classical_Direct()
361         PetscCall(MatRestoreRow(gA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
380       PetscCall(MatGetRow(lA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
384 …if (lcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
388           if (PetscRealPart(rval[j]) < 0.) {  in PCGAMGProlongator_Classical_Direct()
389             pij = rval[j] * alpha * invdiag;  in PCGAMGProlongator_Classical_Direct()
391             pij = rval[j] * beta * invdiag;  in PCGAMGProlongator_Classical_Direct()
400       PetscCall(MatRestoreRow(lA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
403         PetscCall(MatGetRow(gA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()
406 …if (gcid[col] >= 0 && (PetscRealPart(rval[j]) > gamg->threshold[0] * Amax_pos[i] || PetscRealPart(…  in PCGAMGProlongator_Classical_Direct()
410             if (PetscRealPart(rval[j]) < 0.) {  in PCGAMGProlongator_Classical_Direct()
411               pij = rval[j] * alpha * invdiag;  in PCGAMGProlongator_Classical_Direct()
413               pij = rval[j] * beta * invdiag;  in PCGAMGProlongator_Classical_Direct()
422         PetscCall(MatRestoreRow(gA, i, &ncols, &rcol, &rval));  in PCGAMGProlongator_Classical_Direct()