10 // This example demonstrates a simple usage of libCEED with PETSc to solve a Navier-Stokes problem.
19 //     ./navierstokes -ceed /gpu/cuda -problem advection -degree 1
24 …plicit, supg, consistent mass") -ceed {ceed_resource} -test_type solver -problem advection -degree…
29 //TESTARGS(name="Taylor-Green Vortex IC") -ceed {ceed_resource} -problem taylor_green -test_type so…
42 … implicit, SUPG stabilization") -ceed {ceed_resource} -test_type solver -problem advection -CtauS …
43 …n, implicit, SU stabilization") -ceed {ceed_resource} -test_type solver -problem advection -CtauS …
44 …tation, explicit, strong form") -ceed {ceed_resource} -test_type solver -problem advection -strong…
45 … implicit, SUPG stabilization") -ceed {ceed_resource} -test_type solver -problem advection -CtauS …
46 //TESTARGS(name="Euler, implicit") -ceed {ceed_resource} -test_type solver -problem euler_vortex -d…
47 //TESTARGS(name="Euler, explicit") -ceed {ceed_resource} -test_type solver -problem euler_vortex -d…
48 …ion, y-z-beta shock capturing") -ceed {ceed_resource} -test_type solver -problem shocktube -degree…
74   ProblemData problem;  in main()  local
75   PetscCall(PetscCalloc1(1, &problem));  in main()
95   problem->set_bc_from_ics = PETSC_TRUE;  in main()
109   PetscCall(BoundaryConditionSetUp(user, problem, app_ctx, bc));  in main()
160   PetscCall(CreateDM(comm, problem, mat_type, vec_type, &dm));  in main()
165   // Choose the problem from the list of registered problems  in main()
170     PetscCheck(p, PETSC_COMM_SELF, 1, "Problem '%s' not found", app_ctx->problem_name);  in main()
171     PetscCall((*p)(problem, dm, &user, bc));  in main()
175   PetscCall(SetUpDM(dm, problem, app_ctx->degree, app_ctx->q_extra, bc, phys_ctx));  in main()
178   if (app_ctx->viz_refine) PetscCall(VizRefineDM(dm, user, problem, bc, phys_ctx));  in main()
197   PetscCall(SetupLibceed(ceed, ceed_data, dm, user, app_ctx, problem, bc));  in main()
210 …//    communication. If we disable this, we should still get the same results due to the problem->…  in main()
212   if (problem->set_bc_from_ics) {  in main()
241   PetscCall(TSSolve_NS(dm, user, app_ctx, phys_ctx, problem, &Q, &final_time, &ts));  in main()
246   PetscCall(PostProcess(ts, ceed_data, dm, problem, user, Q, final_time));  in main()
275     PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_inflow.qfunction_context));  in main()
276 …PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_inflow_jacobian.qfunction_context)…  in main()
277     PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_outflow.qfunction_context));  in main()
278 …PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_outflow_jacobian.qfunction_context…  in main()
279     PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_freestream.qfunction_context));  in main()
280 …PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_freestream_jacobian.qfunction_cont…  in main()
281     PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_slip.qfunction_context));  in main()
282 … PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_slip_jacobian.qfunction_context));  in main()
283     PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->ics.qfunction_context));  in main()
284     PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_vol_rhs.qfunction_context));  in main()
285 … PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_vol_ifunction.qfunction_context));  in main()
286 … PetscCallCeed(ceed, CeedQFunctionContextDestroy(&problem->apply_vol_ijacobian.qfunction_context));  in main()
335   for (PetscInt i = 0; i < problem->num_bc_defs; i++) {  in main()
336     PetscCall(BCDefinitionDestroy(&problem->bc_defs[i]));  in main()
338   PetscCall(PetscFree(problem->bc_defs));  in main()
341   PetscCall(PetscFree(problem));  in main()
346   PetscCall(PetscFree(problem));  in main()