53   DM           *level_dms;  in main()  local
139   PetscCall(PetscMalloc1(num_levels, &level_dms));  in main()
141     PetscCall(DMClone(dm_orig, &level_dms[level]));  in main()
143     PetscCall(DMSetVecType(level_dms[level], vectype));  in main()
144 …PetscCall(SetupDMByDegree(level_dms[level], app_ctx, app_ctx->level_degrees[level], PETSC_TRUE, nu…  in main()
148     PetscCall(DMGetLocalSection(level_dms[level], &section));  in main()
191     PetscCall(DMCreateGlobalVector(level_dms[level], &U_g[level]));  in main()
197     PetscCall(DMCreateLocalVector(level_dms[level], &U_loc[level]));  in main()
250 …PetscCall((*SetupLibceedFineLevel)(level_dms[fine_level], dm_energy, dm_diagnostic, ceed, app_ctx,…  in main()
260     PetscCall(DMLocalToGlobal(level_dms[level + 1], U_loc[level + 1], ADD_VALUES, U_g[level + 1]));  in main()
261 … PetscCall(DMGlobalToLocal(level_dms[level + 1], U_g[level + 1], INSERT_VALUES, U_loc[level + 1]));  in main()
273 …PetscCall((*SetupLibceedLevel)(level_dms[level], ceed, app_ctx, level, num_comp_u, U_g_size[level]…  in main()
294     PetscCall(DMLocalToGlobal(level_dms[fine_level], F_loc, ADD_VALUES, F));  in main()
302     PetscCall(DMLocalToGlobal(level_dms[fine_level], bcs_loc, ADD_VALUES, neumann_bcs));  in main()
380   PetscCall(SNESSetDM(snes, level_dms[fine_level]));  in main()
388 …PetscCall(SetupJacobianCtx(comm, app_ctx, level_dms[level], U_g[level], U_loc[level], ceed_data[le…  in main()
418 …PetscCall(SetupProlongRestrictCtx(comm, app_ctx, level_dms[level - 1], level_dms[level], U_g[level…  in main()
435     PetscCall(DMCreateMatrix(level_dms[0], &jacob_mat_coarse));  in main()
486     PetscCall(PCSetDM(pc, level_dms[fine_level]));  in main()
509         PetscCall(KSPSetDM(ksp_smoother, level_dms[level]));  in main()
793 …PetscCall(ViewDiagnosticQuantities(comm, level_dms[fine_level], diagnostic_ctx, app_ctx, U, ceed_d…  in main()
820     PetscCall(DMDestroy(&level_dms[level]));  in main()
860   PetscCall(PetscFree(level_dms));  in main()