Searched refs:pc_ml (Results 1 – 1 of 1) sorted by relevance
406 PC_ML *pc_ml = (PC_ML *)mg->innerctx; in PCSetCoordinates_ML() local421 oldarrsz = pc_ml->dim * pc_ml->nloc; in PCSetCoordinates_ML()422 pc_ml->dim = ndm; in PCSetCoordinates_ML()423 pc_ml->nloc = nloc; in PCSetCoordinates_ML()427 if (pc_ml->coords == 0 || (oldarrsz != arrsz)) { in PCSetCoordinates_ML()428 PetscCall(PetscFree(pc_ml->coords)); in PCSetCoordinates_ML()429 PetscCall(PetscMalloc1(arrsz, &pc_ml->coords)); in PCSetCoordinates_ML()431 for (kk = 0; kk < arrsz; kk++) pc_ml->coords[kk] = -999.; in PCSetCoordinates_ML()435 for (ii = 0; ii < ndm; ii++) pc_ml->coords[ii * nloc + kk] = coords[kk * ndm + ii]; in PCSetCoordinates_ML()439 for (ii = 0; ii < ndm; ii++) pc_ml->coords[ii * nloc + kk] = coords[bs * kk * ndm + ii]; in PCSetCoordinates_ML()[all …]