46 static PetscBool ignoreOrnt(AppCtx *user, PetscInt o)  in ignoreOrnt()  argument
52   ierr = PetscFindInt(o, user->numOrnt, user->ornts, &loc);  in ignoreOrnt()
67 static PetscErrorCode CheckCellVertices(DM dm, PetscInt cell, PetscInt o)  in CheckCellVertices()  argument
87   arrVerts = DMPolytopeTypeGetVertexArrangement(ct, o);  in CheckCellVertices()
89 …e %" PetscInt_FMT " for arrangement %" PetscInt_FMT, cell, v, closure[v], arrVerts[v] + vStart, o);  in CheckCellVertices()
96 static PetscErrorCode ReorientCell(DM dm, PetscInt cell, PetscInt o, PetscBool swapCoords)  in ReorientCell()  argument
111   PetscCall(DMPlexOrientPoint(dm, cell, o));  in ReorientCell()
137   PetscInt       No, o;  in GenerateArrangements()  local
145   for (o = PetscMax(-No, user->orntBounds[0]); o < PetscMin(No, user->orntBounds[1]); ++o) {  in GenerateArrangements()
146     if (ignoreOrnt(user, o)) continue;  in GenerateArrangements()
148     PetscCall(ReorientCell(odm, 0, o, PETSC_TRUE));  in GenerateArrangements()
149 …Call(PetscPrintf(PetscObjectComm((PetscObject)dm), "%s orientation %" PetscInt_FMT "\n", name, o));  in GenerateArrangements()
151     PetscCall(CheckCellVertices(odm, 0, o));  in GenerateArrangements()
209   PetscInt        No, o, oi, o2;  in VerifyInverse()  local
220   for (o = PetscMax(-No, user->orntBounds[0]); o < PetscMin(No, user->orntBounds[1]); ++o) {  in VerifyInverse()
221     if (ignoreOrnt(user, o)) continue;  in VerifyInverse()
222     oi = DMPolytopeTypeComposeOrientationInv(ct, 0, o);  in VerifyInverse()
224     PetscCall(DMPlexOrientPoint(dm1, 0, o));  in VerifyInverse()
234 …B, "Inverse error for %s: %" PetscInt_FMT " * %" PetscInt_FMT " != 0", DMPolytopeTypes[ct], o, oi);  in VerifyInverse()
240 …: %" PetscInt_FMT " * %" PetscInt_FMT " = %" PetscInt_FMT " != 0", DMPolytopeTypes[ct], o, oi, o2);  in VerifyInverse()
249 static PetscErrorCode CheckSubcells(DM dm, DM odm, PetscInt p, PetscInt o, AppCtx *user)  in CheckSubcells()  argument
274   oi = DMPolytopeTypeComposeOrientationInv(ct, 0, o);  in CheckSubcells()
301         PetscCall(DMPlexTransformGetConeOriented(otr, opNew, o, &oqcone, &oqornt));  in CheckSubcells()
309 …a %" PetscInt_FMT " (%" PetscInt_FMT ") (%" PetscInt_FMT ")\n      Transform Cone", ro, opNew, o));  in CheckSubcells()
336 … %" PetscInt_FMT " orientation for cell orientation %" PetscInt_FMT, DMPolytopeTypes[ctNew], r, o);  in CheckSubcells()
358   PetscInt       No, o;  in RefineArrangements()  local
366   for (o = PetscMax(-No, user->orntBounds[0]); o < PetscMin(No, user->orntBounds[1]); ++o) {  in RefineArrangements()
367     if (ignoreOrnt(user, o)) continue;  in RefineArrangements()
370     PetscCall(ReorientCell(odm, 0, o, PETSC_TRUE));  in RefineArrangements()
374 …Call(PetscPrintf(PetscObjectComm((PetscObject)dm), "%s orientation %" PetscInt_FMT "\n", name, o));  in RefineArrangements()
376     PetscCall(CheckSubcells(dm, odm, 0, o, user));  in RefineArrangements()