4495   DM        dmIn, dmVecIn, base, basec, plex, coarseDM;  in DMForestTransferVecFromBase_pforest()  local
4505   PetscCall(VecGetDM(vecIn, &dmVecIn));  in DMForestTransferVecFromBase_pforest()
4506   PetscCall(DMGetDS(dmVecIn, &ds));  in DMForestTransferVecFromBase_pforest()
4507 …PetscCheck(ds, PetscObjectComm((PetscObject)dmVecIn), PETSC_ERR_SUP, "Cannot transfer without a Pe…  in DMForestTransferVecFromBase_pforest()
4512     PetscCall(DMGetLocalSection(dmVecIn, &section));  in DMForestTransferVecFromBase_pforest()
4514 …PetscCheck(Nf <= 3, PetscObjectComm((PetscObject)dmVecIn), PETSC_ERR_SUP, "Number of fields %" Pet…  in DMForestTransferVecFromBase_pforest()
4522   if (dmVecIn == base) { /* sequential runs */  in DMForestTransferVecFromBase_pforest()
4530     PetscCall(PetscSectionCreate(PetscObjectComm((PetscObject)dmVecIn), &secInRed));  in DMForestTransferVecFromBase_pforest()
4532     PetscCall(DMGetLocalSection(dmVecIn, &secIn));  in DMForestTransferVecFromBase_pforest()
4533     PetscCall(DMGetLocalVector(dmVecIn, &vecInLocal));  in DMForestTransferVecFromBase_pforest()
4534     PetscCall(DMGlobalToLocalBegin(dmVecIn, vecIn, INSERT_VALUES, vecInLocal));  in DMForestTransferVecFromBase_pforest()
4535     PetscCall(DMGlobalToLocalEnd(dmVecIn, vecIn, INSERT_VALUES, vecInLocal));  in DMForestTransferVecFromBase_pforest()
4536     PetscCall(DMPlexDistributeField(dmVecIn, sfRed, secIn, vecInLocal, secInRed, vecInRed));  in DMForestTransferVecFromBase_pforest()
4537     PetscCall(DMRestoreLocalVector(dmVecIn, &vecInLocal));  in DMForestTransferVecFromBase_pforest()
4606   PetscCall(DMCopyDisc(dmVecIn, basec));  in DMForestTransferVecFromBase_pforest()