224 } PrmNode;  typedef
230 #define PRMNODE_SIZE                 FieldSize(PrmNode)
238   void (*initialize)(THI, PetscReal x, PetscReal y, PrmNode *p);
276 static void PrmHexGetZ(const PrmNode pn[], PetscInt k, PetscInt zm, PetscReal zn[])  in PrmHexGetZ()
285 …d4(const PetscReal dphi[][4][2], PetscReal hx, PetscReal hy, const PrmNode pn[4], PrmNode dp[4][2])  in QuadComputeGrad4()
322 static void PrmNodeGetFaceMeasure(const PrmNode **p, PetscInt i, PetscInt j, PetscScalar h[])  in PrmNodeGetFaceMeasure()
339 static void THIInitialize_HOM_A(THI thi, PetscReal x, PetscReal y, PrmNode *p)  in THIInitialize_HOM_A()
348 static void THIInitialize_HOM_C(THI thi, PetscReal x, PetscReal y, PrmNode *p)  in THIInitialize_HOM_C()
362 static void THIInitialize_HOM_F(THI thi, PetscReal x, PetscReal y, PrmNode *p)  in THIInitialize_HOM_F()
375 static void THIInitialize_HOM_X(THI thi, PetscReal xx, PetscReal yy, PrmNode *p)  in THIInitialize_HOM_X()
386 static void THIInitialize_HOM_Y(THI thi, PetscReal xx, PetscReal yy, PrmNode *p)  in THIInitialize_HOM_Y()
398 static void THIInitialize_HOM_Z(THI thi, PetscReal xx, PetscReal yy, PrmNode *p)  in THIInitialize_HOM_Z()
653   PrmNode     **x2;  in THIFixGhosts()
669 static PetscErrorCode THIInitializePrm(THI thi, DM da2prm, PrmNode **p)  in THIInitializePrm()
690   PrmNode **prm;  in THIInitial()
750 static PetscErrorCode THIFunctionLocal_3D(DMDALocalInfo *info, const Node ***x, const PrmNode **prm…  in THIFunctionLocal_3D()
771       PrmNode pn[4], dpn[4][2];  in THIFunctionLocal_3D()
858 …Local_2D(DMDALocalInfo *info, const Node ***x, const PrmNode **prm, const PrmNode **prmdot, PrmNod…  in THIFunctionLocal_2D()
900   const PrmNode **x2, **xdot2;  in THIFunction()
902   PrmNode       **f2;  in THIFunction()
1094 static PetscErrorCode THIJacobianLocal_Momentum(DMDALocalInfo *info, const Node ***x, const PrmNode…  in THIJacobianLocal_Momentum()
1110       PrmNode pn[4], dpn[4][2];  in THIJacobianLocal_Momentum()
1158 …          Kcpl[FieldIndex(Node, l, u)][FieldIndex(PrmNode, ll, h)] += pp * jw * thi->rhog * dpl[0];  in THIJacobianLocal_Momentum()
1159 …          Kcpl[FieldIndex(Node, l, u)][FieldIndex(PrmNode, ll, b)] += pp * jw * thi->rhog * dpl[0];  in THIJacobianLocal_Momentum()
1160 …          Kcpl[FieldIndex(Node, l, v)][FieldIndex(PrmNode, ll, h)] += pp * jw * thi->rhog * dpl[1];  in THIJacobianLocal_Momentum()
1161 …          Kcpl[FieldIndex(Node, l, v)][FieldIndex(PrmNode, ll, b)] += pp * jw * thi->rhog * dpl[1];  in THIJacobianLocal_Momentum()
1227 …IJacobianLocal_2D(DMDALocalInfo *info, const Node ***x3, const PrmNode **x2, const PrmNode **xdot2…  in THIJacobianLocal_2D()
1249         const PetscInt    row[]  = {FieldIndex(PrmNode, DMDALocalIndex2D(info, i, j), h)};  in THIJacobianLocal_2D()
1280   const PrmNode **x2, **xdot2;  in THIJacobian()
1414 …= PetscRealPart(y2[i * ym + j][FieldOffset(PrmNode, b)]), h = PetscRealPart(y2[i * ym + j][FieldOf…  in THIDAVecView_VTK_XML()
1536 …, DM_BOUNDARY_PERIODIC, DM_BOUNDARY_PERIODIC, st, My, Mx, my, mx, sizeof(PrmNode) / sizeof(PetscSc…  in main()