315   PetscInt      ii, kk;  in PetscCDGetNonemptyIS()  local
319   for (ii = kk = 0; ii < ail->size; ii++) {  in PetscCDGetNonemptyIS()
321     if (n) kk++;  in PetscCDGetNonemptyIS()
323   PetscCall(PetscMalloc1(kk, &permute));  in PetscCDGetNonemptyIS()
324   for (ii = kk = 0; ii < ail->size; ii++) {  in PetscCDGetNonemptyIS()
326     if (n) permute[kk++] = ii;  in PetscCDGetNonemptyIS()
328   PetscCall(ISCreateGeneral(PETSC_COMM_SELF, kk, permute, PETSC_OWN_POINTER, a_mis));  in PetscCDGetNonemptyIS()
365   PetscInt      lsz, ii, kk, *idxs, jj, gid;  in PetscCDGetASMBlocks()  local
369   for (ii = kk = 0; ii < ail->size; ii++) {  in PetscCDGetASMBlocks()
370     if (ail->array[ii]) kk++;  in PetscCDGetASMBlocks()
372   *a_sz = kk;  in PetscCDGetASMBlocks()
373   PetscCall(PetscMalloc1(kk, &is_loc));  in PetscCDGetASMBlocks()
374   for (ii = kk = 0; ii < ail->size; ii++) {  in PetscCDGetASMBlocks()
383       PetscCall(ISCreateGeneral(PETSC_COMM_SELF, lsz, idxs, PETSC_OWN_POINTER, &is_loc[kk++]));  in PetscCDGetASMBlocks()
386 …PetscCheck(*a_sz == kk, PETSC_COMM_SELF, PETSC_ERR_PLIB, "*a_sz %" PetscInt_FMT " != kk %" PetscIn…  in PetscCDGetASMBlocks()
446   for (PetscInt kk = 0; kk < nloc; kk++) PetscCall(PetscCDAppendID(agg_llists, kk, Istart + kk));  in MatCoarsenApply_HEM_private()  local
466     for (PetscInt kk = 0; kk < nloc; kk++) lid_cprowID[kk] = -1;  in MatCoarsenApply_HEM_private()  local
484     for (PetscInt kk = 0; kk < nloc; kk++) {  in MatCoarsenApply_HEM_private()  local
485       PetscCall(PetscCDCountAt(agg_llists, kk, &ix));  in MatCoarsenApply_HEM_private()
486       if (ix > 0) lid_matched[kk] = PETSC_FALSE;  in MatCoarsenApply_HEM_private()
487       else lid_matched[kk] = PETSC_TRUE; // call deleted gids as matched  in MatCoarsenApply_HEM_private()
501       for (PetscInt kk = 0, gid = Istart; kk < nloc; kk++, gid++) {  in MatCoarsenApply_HEM_private()  local
502         PetscScalar vval = lid_matched[kk] ? 1.0 : 0.0;  in MatCoarsenApply_HEM_private()
513 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_matched[kk] = (PetscBool)(PetscRealPart(buf[kk…  in MatCoarsenApply_HEM_private()  local
517 …for (PetscInt kk = 0, gid = Istart; kk < nloc; kk++, gid++) PetscCall(VecSetValues(vec, 1, &gid, &…  in MatCoarsenApply_HEM_private()  local
523 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk]); …  in MatCoarsenApply_HEM_private()  local
526       for (PetscInt kk = 0, gid = Istart; kk < nloc; kk++, gid++) {  in MatCoarsenApply_HEM_private()  local
537 …    for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_gid[kk] = (PetscInt)PetscRealPart(buf[kk]);  in MatCoarsenApply_HEM_private()  local
541     for (PetscInt kk = 0; kk < REQ_BF_SIZE; kk++) comm_procs[kk] = -1;  in MatCoarsenApply_HEM_private()  local
552     for (PetscInt kk = 0, gid = Istart; kk < nloc; kk++, gid++) {  in MatCoarsenApply_HEM_private()  local
555       PetscInt    lid = kk, max_pe = rank, pe, n;  in MatCoarsenApply_HEM_private()
612 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_max_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk…  in MatCoarsenApply_HEM_private()  local
619 …for (PetscInt kk = 0; kk < nloc; kk++) lid_max_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk]); // th…  in MatCoarsenApply_HEM_private()  local
625     for (PetscInt kk = 0, n; kk < nloc; kk++) {  in MatCoarsenApply_HEM_private()  local
626       const PetscInt lid = kk;  in MatCoarsenApply_HEM_private()
685       for (PetscInt kk = 0; kk < nEdges; kk++) {  in MatCoarsenApply_HEM_private()  local
686         const Edge    *e    = &Edges[kk];  in MatCoarsenApply_HEM_private()
973         for (PetscInt kk = 0, gid = Istart; kk < nloc; kk++, gid++) {  in MatCoarsenApply_HEM_private()  local
974           PetscScalar vval = lid_matched[kk] ? 1.0 : 0.0;  in MatCoarsenApply_HEM_private()
983 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_matched[kk] = (PetscBool)(PetscRealPart(sbuff[…  in MatCoarsenApply_HEM_private()  local
987       for (PetscInt kk = 0, gid = Istart; kk < nloc; kk++, gid++) {  in MatCoarsenApply_HEM_private()  local
990         const PetscInt lid    = kk;  in MatCoarsenApply_HEM_private()
1046 …for (PetscInt kk = 0; kk < num_ghosts; kk++) lghost_max_pe[kk] = (PetscMPIInt)PetscRealPart(buf[kk…  in MatCoarsenApply_HEM_private()  local
1072       for (PetscInt kk = 0, gid1, gid = Istart; kk < nloc; kk++, gid++) {  in MatCoarsenApply_HEM_private()  local
1073         if (!lid_matched[kk]) {  in MatCoarsenApply_HEM_private()
1074           const PetscInt lid = kk;  in MatCoarsenApply_HEM_private()
1107     for (PetscInt kk = 0; kk < nloc; kk++) {  in MatCoarsenApply_HEM_private()  local
1108       PetscCall(PetscCDCountAt(agg_llists, kk, &jj));  in MatCoarsenApply_HEM_private()
1191         for (PetscInt kk = 0; kk < coarse->agg_lists->size; kk++) {  in MatCoarsenView_HEM()  local
1192           PetscCall(PetscCDGetHeadPos(coarse->agg_lists, kk, &pos));  in MatCoarsenView_HEM()
1193 …)) PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "selected local %" PetscInt_FMT ": ", kk));  in MatCoarsenView_HEM()
1198             PetscCall(PetscCDGetNextPos(coarse->agg_lists, kk, &pos));  in MatCoarsenView_HEM()