568 static PetscErrorCode THIInitializePrm(THI thi, DM da2prm, Vec prm)  in THIInitializePrm()  argument
574   PetscCall(DMDAGetGhostCorners(da2prm, &ys, &xs, 0, &ym, &xm, 0));  in THIInitializePrm()
575   PetscCall(DMDAGetInfo(da2prm, 0, &my, &mx, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0));  in THIInitializePrm()
576   PetscCall(DMDAVecGetArray(da2prm, prm, &p));  in THIInitializePrm()
583   PetscCall(DMDAVecRestoreArray(da2prm, prm, &p));  in THIInitializePrm()
591   DM              da2prm;  in THISetUpDM()  local
600 …M_BOUNDARY_PERIODIC, st, My, Mx, my, mx, sizeof(PrmNode) / sizeof(PetscScalar), s, 0, 0, &da2prm));  in THISetUpDM()
601   PetscCall(DMSetUp(da2prm));  in THISetUpDM()
602   PetscCall(DMCreateLocalVector(da2prm, &X));  in THISetUpDM()
611   PetscCall(THIInitializePrm(thi, da2prm, X));  in THISetUpDM()
616   PetscCall(PetscObjectCompose((PetscObject)dm, "DMDA2Prm", (PetscObject)da2prm));  in THISetUpDM()
618   PetscCall(DMDestroy(&da2prm));  in THISetUpDM()
652   DM  da2prm;  in THIDAGetPrm()  local
656   PetscCall(PetscObjectQuery((PetscObject)da, "DMDA2Prm", (PetscObject *)&da2prm));  in THIDAGetPrm()
657   PetscCheck(da2prm, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "No DMDA2Prm composed with given DMDA");  in THIDAGetPrm()
660   PetscCall(DMDAVecGetArray(da2prm, X, prm));  in THIDAGetPrm()
666   DM  da2prm;  in THIDARestorePrm()  local
670   PetscCall(PetscObjectQuery((PetscObject)da, "DMDA2Prm", (PetscObject *)&da2prm));  in THIDARestorePrm()
671   PetscCheck(da2prm, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "No DMDA2Prm composed with given DMDA");  in THIDARestorePrm()
674   PetscCall(DMDAVecRestoreArray(da2prm, X, prm));  in THIDARestorePrm()