2349   PetscInt           pStartF, pEndF, pStartC, pEndC;  in DMPforestGetTransferSF_Point()  local
2365   PetscCall(DMPlexGetChart(plexF, &pStartF, &pEndF));  in DMPforestGetTransferSF_Point()
2378           PetscCall(PetscMalloc1(pEndF - pStartF, &cids));  in DMPforestGetTransferSF_Point()
2379           PetscCall(PetscArraycpy(cids, pforestC->pointSelfToAdaptCids, pEndF - pStartF));  in DMPforestGetTransferSF_Point()
2392           PetscCall(PetscMalloc1(pEndF - pStartF, &cids));  in DMPforestGetTransferSF_Point()
2393           PetscCall(PetscArraycpy(cids, pforestF->pointAdaptToSelfCids, pEndF - pStartF));  in DMPforestGetTransferSF_Point()
2510     PetscCall(PetscMalloc1(pEndF - pStartF, &roots));  in DMPforestGetTransferSF_Point()
2511     PetscCall(PetscMalloc1(pEndF - pStartF, &rootType));  in DMPforestGetTransferSF_Point()
2513     for (p = pStartF; p < pEndF; p++) {  in DMPforestGetTransferSF_Point()
2514       roots[p - pStartF].rank  = -1;  in DMPforestGetTransferSF_Point()
2515       roots[p - pStartF].index = -1;  in DMPforestGetTransferSF_Point()
2516       rootType[p - pStartF]    = -1;  in DMPforestGetTransferSF_Point()
2521       PetscCall(PetscMalloc1(pEndF - pStartF, &cids));  in DMPforestGetTransferSF_Point()
2522       for (p = pStartF; p < pEndF; p++) cids[p - pStartF] = -2;  in DMPforestGetTransferSF_Point()
2570                   roots[p - pStartF]    = q;  in DMPforestGetTransferSF_Point()
2571                   rootType[p - pStartF] = PETSC_INT_MAX;  in DMPforestGetTransferSF_Point()
2572                   cids[p - pStartF]     = -1;  in DMPforestGetTransferSF_Point()
2591 …      roots[p - pStartF]    = closurePointsC[numClosureIndices * (coarseCount + coarseOffset) + j];  in DMPforestGetTransferSF_Point()
2592             rootType[p - pStartF] = PETSC_INT_MAX; /* unconditionally accept */  in DMPforestGetTransferSF_Point()
2593             cids[p - pStartF]     = -1;  in DMPforestGetTransferSF_Point()
2614               if (rootType[p - pStartF] == PETSC_INT_MAX) continue;  in DMPforestGetTransferSF_Point()
2674             if (rootType[p - pStartF] == PETSC_INT_MAX) continue;  in DMPforestGetTransferSF_Point()
2759             if (l > rootType[p - pStartF]) {  in DMPforestGetTransferSF_Point()
2762                   roots[p - pStartF]    = q;  in DMPforestGetTransferSF_Point()
2763                   rootType[p - pStartF] = PETSC_INT_MAX;  in DMPforestGetTransferSF_Point()
2764                   if (formCids) cids[p - pStartF] = -1;  in DMPforestGetTransferSF_Point()
2769                 roots[p - pStartF]    = q;  in DMPforestGetTransferSF_Point()
2770                 rootType[p - pStartF] = l;  in DMPforestGetTransferSF_Point()
2771                 if (formCids) cids[p - pStartF] = proposedCids[j];  in DMPforestGetTransferSF_Point()
2779                   roots[parent - pStartF]    = q;  in DMPforestGetTransferSF_Point()
2780                   rootType[parent - pStartF] = PETSC_INT_MAX;  in DMPforestGetTransferSF_Point()
2781                   if (formCids) cids[parent - pStartF] = -1;  in DMPforestGetTransferSF_Point()
2795       PetscCall(PetscMalloc1(pEndF - pStartF, &rootTypeCopy));  in DMPforestGetTransferSF_Point()
2796       PetscCall(PetscArraycpy(rootTypeCopy, rootType, pEndF - pStartF));  in DMPforestGetTransferSF_Point()
2801       for (p = pStartF; p < pEndF; p++) {  in DMPforestGetTransferSF_Point()
2802 …if (rootTypeCopy[p - pStartF] > rootType[p - pStartF]) { /* another process found a root of higher…  in DMPforestGetTransferSF_Point()
2803           roots[p - pStartF].rank  = -1;  in DMPforestGetTransferSF_Point()
2804           roots[p - pStartF].index = -1;  in DMPforestGetTransferSF_Point()
2806 …if (formCids && rootTypeCopy[p - pStartF] == PETSC_INT_MAX) cids[p - pStartF] = -1; /* we have fou…  in DMPforestGetTransferSF_Point()
2826       for (p = pStartF; p < pEndF; p++) {  in DMPforestGetTransferSF_Point()
2827         if (roots[p - pStartF].index >= 0) numLeaves++;  in DMPforestGetTransferSF_Point()
2832       for (p = pStartF; p < pEndF; p++) {  in DMPforestGetTransferSF_Point()
2833         if (roots[p - pStartF].index >= 0) {  in DMPforestGetTransferSF_Point()
2834           leaves[numLeaves]  = p - pStartF;  in DMPforestGetTransferSF_Point()
2835           iremote[numLeaves] = roots[p - pStartF];  in DMPforestGetTransferSF_Point()
2841       if (numLeaves == (pEndF - pStartF)) {  in DMPforestGetTransferSF_Point()
2867       PetscCall(PetscMalloc1(pEndF - pStartF, &pforestC->pointSelfToAdaptCids));  in DMPforestGetTransferSF_Point()
2868       PetscCall(PetscArraycpy(pforestC->pointSelfToAdaptCids, cids, pEndF - pStartF));  in DMPforestGetTransferSF_Point()
2876       PetscCall(PetscMalloc1(pEndF - pStartF, &pforestF->pointAdaptToSelfCids));  in DMPforestGetTransferSF_Point()
2877       PetscCall(PetscArraycpy(pforestF->pointAdaptToSelfCids, cids, pEndF - pStartF));  in DMPforestGetTransferSF_Point()
2897   PetscInt           pStartC, pEndC, pStartF, pEndF;  in DMPforestGetTransferSF_Internal()  local
2924   PetscCall(DMPlexGetChart(plexF, &pStartF, &pEndF));  in DMPforestGetTransferSF_Internal()
2940     PetscCall(PetscSectionSetChart(leafSection, pStartF, pEndF));  in DMPforestGetTransferSF_Internal()
2964       PetscCall(PetscMalloc1(pEndF - pStartF, &offsets));  in DMPforestGetTransferSF_Internal()