19   DM_DA    *dd = (DM_DA *)da->data;  in DMLocalToLocalCreate_DA()  local
24   if (dd->ltol) PetscFunctionReturn(PETSC_SUCCESS);  in DMLocalToLocalCreate_DA()
30   PetscCall(VecScatterCopy(dd->gtol, &dd->ltol));  in DMLocalToLocalCreate_DA()
32     left = dd->xs - dd->Xs;  in DMLocalToLocalCreate_DA()
33     PetscCall(PetscMalloc1(dd->xe - dd->xs, &idx));  in DMLocalToLocalCreate_DA()
34     for (j = 0; j < dd->xe - dd->xs; j++) idx[j] = left + j;  in DMLocalToLocalCreate_DA()
36     left = dd->xs - dd->Xs;  in DMLocalToLocalCreate_DA()
37     down = dd->ys - dd->Ys;  in DMLocalToLocalCreate_DA()
38     up   = down + dd->ye - dd->ys;  in DMLocalToLocalCreate_DA()
39     PetscCall(PetscMalloc1((dd->xe - dd->xs) * (up - down), &idx));  in DMLocalToLocalCreate_DA()
42       for (j = 0; j < dd->xe - dd->xs; j++) idx[count++] = left + i * (dd->Xe - dd->Xs) + j;  in DMLocalToLocalCreate_DA()
45     left   = dd->xs - dd->Xs;  in DMLocalToLocalCreate_DA()
46     bottom = dd->ys - dd->Ys;  in DMLocalToLocalCreate_DA()
47     top    = bottom + dd->ye - dd->ys;  in DMLocalToLocalCreate_DA()
48     down   = dd->zs - dd->Zs;  in DMLocalToLocalCreate_DA()
49     up     = down + dd->ze - dd->zs;  in DMLocalToLocalCreate_DA()
50     count  = (dd->xe - dd->xs) * (top - bottom) * (up - down);  in DMLocalToLocalCreate_DA()
55 …for (k = 0; k < dd->xe - dd->xs; k++) idx[count++] = (left + j * (dd->Xe - dd->Xs)) + i * (dd->Xe …  in DMLocalToLocalCreate_DA()
60   PetscCall(VecScatterRemap(dd->ltol, idx, NULL));  in DMLocalToLocalCreate_DA()
67   DM_DA *dd = (DM_DA *)da->data;  in DMLocalToLocalBegin_DA()  local
71   if (!dd->ltol) PetscCall(DMLocalToLocalCreate_DA(da));  in DMLocalToLocalBegin_DA()
72   PetscCall(VecScatterBegin(dd->ltol, g, l, mode, SCATTER_FORWARD));  in DMLocalToLocalBegin_DA()
78   DM_DA *dd = (DM_DA *)da->data;  in DMLocalToLocalEnd_DA()  local
83   PetscCall(VecScatterEnd(dd->ltol, g, l, mode, SCATTER_FORWARD));  in DMLocalToLocalEnd_DA()