65   PetscInt          nloc;  member
407   PetscInt arrsz, oldarrsz, bs, my0, kk, ii, nloc, Iend, aloc;  in PCSetCoordinates_ML()  local
417   nloc = (Iend - my0) / bs;  in PCSetCoordinates_ML()
419 …nloc == a_nloc) || (aloc == a_nloc), PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Number of local blocks…  in PCSetCoordinates_ML()
421   oldarrsz    = pc_ml->dim * pc_ml->nloc;  in PCSetCoordinates_ML()
423   pc_ml->nloc = nloc;  in PCSetCoordinates_ML()
424   arrsz       = ndm * nloc;  in PCSetCoordinates_ML()
433   if (nloc == a_nloc) {  in PCSetCoordinates_ML()
434     for (kk = 0; kk < nloc; kk++) {  in PCSetCoordinates_ML()
435       for (ii = 0; ii < ndm; ii++) pc_ml->coords[ii * nloc + kk] = coords[kk * ndm + ii];  in PCSetCoordinates_ML()
438     for (kk = 0; kk < nloc; kk++) {  in PCSetCoordinates_ML()
439       for (ii = 0; ii < ndm; ii++) pc_ml->coords[ii * nloc + kk] = coords[bs * kk * ndm + ii];  in PCSetCoordinates_ML()
487   pc_ml->nloc = 0;  in PCReset_ML()
627     PetscInt   nloc = pc_ml->nloc, nlocghost;  in PCSetUp_ML()  local
635       for (j = 0; j < nloc; j++) PetscMLdata->pwork[bs * j] = pc_ml->coords[nloc * i + j];  in PCSetUp_ML()
891     PetscInt   bs, nloc;  in PCSetUp_ML()  local
901       PetscCall(MatGetLocalSize(gridctx[level].A, NULL, &nloc));  in PCSetUp_ML()
902       nloc /= bs; /* number of local nodes */  in PCSetUp_ML()
905       PetscCall(VecSetSizes(gridctx[level].coords, dim * nloc, PETSC_DECIDE));  in PCSetUp_ML()
908       for (j = 0; j < nloc; j++) {  in PCSetUp_ML()
928       PetscCall(PCSetCoordinates(subpc, dim, nloc, array));  in PCSetUp_ML()
1141   pc_ml->nloc                     = 0;  in PCCreate_ML()