122   DM_Moab        *dmmoab;  in DMMoabVecGetArray()  local
135   dmmoab = (DM_Moab *)dm->data;  in DMMoabVecGetArray()
166     merr = dmmoab->pcomm->exchange_tags(vtag, *dmmoab->vlocal);  in DMMoabVecGetArray()
170     PetscCall(PetscMalloc1((dmmoab->nloc + dmmoab->nghost) * dmmoab->numFields, varray));  in DMMoabVecGetArray()
173 …merr = dmmoab->mbiface->tag_iterate(vtag, dmmoab->vlocal->begin(), dmmoab->vlocal->end(), count, r…  in DMMoabVecGetArray()
175 …dmmoab->nloc + dmmoab->nghost, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Mismatch between local verti…  in DMMoabVecGetArray()
178 …for (moab::Range::iterator iter = dmmoab->vlocal->begin(); iter != dmmoab->vlocal->end(); iter++) {  in DMMoabVecGetArray()
179 …for (f = 0; f < dmmoab->numFields; f++, i++) (*varray)[dmmoab->lidmap[(PetscInt)*iter - dmmoab->se…  in DMMoabVecGetArray()
202   DM_Moab        *dmmoab;  in DMMoabVecRestoreArray()  local
215   dmmoab = (DM_Moab *)dm->data;  in DMMoabVecRestoreArray()
244 …merr = dmmoab->mbiface->tag_iterate(vtag, dmmoab->vlocal->begin(), dmmoab->vlocal->end(), count, r…  in DMMoabVecRestoreArray()
246 …dmmoab->nloc + dmmoab->nghost, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Mismatch between local verti…  in DMMoabVecRestoreArray()
249 …for (moab::Range::iterator iter = dmmoab->vlocal->begin(); iter != dmmoab->vlocal->end(); iter++) {  in DMMoabVecRestoreArray()
250 …for (f = 0; f < dmmoab->numFields; f++, i++) marray[i] = (*varray)[dmmoab->lidmap[(PetscInt)*iter …  in DMMoabVecRestoreArray()
257     merr = dmmoab->pcomm->reduce_tags(vtag, MPI_SUM, *dmmoab->vlocal);  in DMMoabVecRestoreArray()
258     MBERRV(dmmoab->mbiface, merr);  in DMMoabVecRestoreArray()
283   DM_Moab        *dmmoab;  in DMMoabVecGetArrayRead()  local
296   dmmoab = (DM_Moab *)dm->data;  in DMMoabVecGetArrayRead()
326     merr = dmmoab->pcomm->exchange_tags(vtag, *dmmoab->vlocal);  in DMMoabVecGetArrayRead()
329     PetscCall(PetscMalloc1((dmmoab->nloc + dmmoab->nghost) * dmmoab->numFields, varray));  in DMMoabVecGetArrayRead()
332 …merr = dmmoab->mbiface->tag_iterate(vtag, dmmoab->vlocal->begin(), dmmoab->vlocal->end(), count, r…  in DMMoabVecGetArrayRead()
334 …dmmoab->nloc + dmmoab->nghost, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Mismatch between local verti…  in DMMoabVecGetArrayRead()
337 …for (moab::Range::iterator iter = dmmoab->vlocal->begin(); iter != dmmoab->vlocal->end(); iter++) {  in DMMoabVecGetArrayRead()
338 …for (f = 0; f < dmmoab->numFields; f++, i++) (*varray)[dmmoab->lidmap[(PetscInt)*iter - dmmoab->se…  in DMMoabVecGetArrayRead()
405   DM_Moab  *dmmoab = (DM_Moab *)dm->data;  in DMCreateVector_Moab_Private()  local
407   moab::ParallelComm *pcomm = dmmoab->pcomm;  in DMCreateVector_Moab_Private()
409   moab::Interface *mbiface = dmmoab->mbiface;  in DMCreateVector_Moab_Private()
413   if (!userrange) range = dmmoab->vowned;  in DMCreateVector_Moab_Private()
449       PetscCall(PetscCalloc1(dmmoab->numFields, &defaultvals));  in DMCreateVector_Moab_Private()
452 …merr = mbiface->tag_get_handle(tag_name, dmmoab->numFields, moab::MB_TYPE_DOUBLE, tag, moab::MB_TA…  in DMCreateVector_Moab_Private()
473   vmoab->tag_size      = dmmoab->bs;  in DMCreateVector_Moab_Private()
479 …bject)dm)->comm, dmmoab->bs, dmmoab->numFields * dmmoab->nloc, dmmoab->numFields * dmmoab->n, dmmo…  in DMCreateVector_Moab_Private()
483       PetscCall(VecSetSizes(*vec, dmmoab->numFields * dmmoab->nloc, PETSC_DECIDE));  in DMCreateVector_Moab_Private()
484       PetscCall(VecSetBlockSize(*vec, dmmoab->bs));  in DMCreateVector_Moab_Private()
495     merr             = mbiface->tag_get_length(tag, dmmoab->numFields);  in DMCreateVector_Moab_Private()
504 …bject)dm)->comm, dmmoab->bs, dmmoab->numFields * dmmoab->nloc, dmmoab->numFields * dmmoab->n, dmmo…  in DMCreateVector_Moab_Private()
507 …PetscCall(VecCreateMPIWithArray(((PetscObject)dm)->comm, dmmoab->bs, dmmoab->numFields * range->si…  in DMCreateVector_Moab_Private()
517   if (dmmoab->ltog_map) PetscCall(VecSetLocalToGlobalMapping(*vec, dmmoab->ltog_map));  in DMCreateVector_Moab_Private()
578   DM_Moab *dmmoab = (DM_Moab *)dm->data;  in DMCreateGlobalVector_Moab()  local
583   PetscCall(DMCreateVector_Moab_Private(dm, NULL, dmmoab->vowned, PETSC_TRUE, PETSC_TRUE, gvec));  in DMCreateGlobalVector_Moab()
589   DM_Moab *dmmoab = (DM_Moab *)dm->data;  in DMCreateLocalVector_Moab()  local
594   PetscCall(DMCreateVector_Moab_Private(dm, NULL, dmmoab->vlocal, PETSC_FALSE, PETSC_TRUE, lvec));  in DMCreateLocalVector_Moab()
643   DM_Moab *dmmoab = (DM_Moab *)dm->data;  in DMGlobalToLocalBegin_Moab()  local
646   PetscCall(VecScatterBegin(dmmoab->ltog_sendrecv, g, l, mode, SCATTER_REVERSE));  in DMGlobalToLocalBegin_Moab()
652   DM_Moab *dmmoab = (DM_Moab *)dm->data;  in DMGlobalToLocalEnd_Moab()  local
655   PetscCall(VecScatterEnd(dmmoab->ltog_sendrecv, g, l, mode, SCATTER_REVERSE));  in DMGlobalToLocalEnd_Moab()
661   DM_Moab *dmmoab = (DM_Moab *)dm->data;  in DMLocalToGlobalBegin_Moab()  local
664   PetscCall(VecScatterBegin(dmmoab->ltog_sendrecv, l, g, mode, SCATTER_FORWARD));  in DMLocalToGlobalBegin_Moab()
670   DM_Moab *dmmoab = (DM_Moab *)dm->data;  in DMLocalToGlobalEnd_Moab()  local
673   PetscCall(VecScatterEnd(dmmoab->ltog_sendrecv, l, g, mode, SCATTER_FORWARD));  in DMLocalToGlobalEnd_Moab()