44   MPI_Comm comm;  in main()  local
81   comm = PETSC_COMM_WORLD;  in main()
85   PetscCall(ProcessCommandLineOptions(comm, app_ctx));  in main()
105     PetscCall((*SetupPhysics)(comm, ceed, &units, &ctx_phys));  in main()
109     PetscCall((*SetupSmootherPhysics)(comm, ceed, ctx_phys, &ctx_phys_smoother));  in main()
120   PetscCall(CreateDistributedDM(comm, app_ctx, &dm_orig));  in main()
316     PetscCall(MPI_Comm_size(comm, &comm_size));  in main()
318     PetscCall(PetscPrintf(comm,  in main()
330     PetscCall(PetscPrintf(comm,  in main()
335     PetscCall(PetscPrintf(comm,  in main()
360         PetscCall(PetscPrintf(comm,  in main()
379   PetscCall(SNESCreate(comm, &snes));  in main()
388 …PetscCall(SetupJacobianCtx(comm, app_ctx, level_dms[level], U_g[level], U_loc[level], ceed_data[le…  in main()
392 …PetscCall(MatCreateShell(comm, U_l_size[level], U_l_size[level], U_g_size[level], U_g_size[level],…  in main()
418 …PetscCall(SetupProlongRestrictCtx(comm, app_ctx, level_dms[level - 1], level_dms[level], U_g[level…  in main()
422 …PetscCall(MatCreateShell(comm, U_l_size[level], U_l_size[level - 1], U_g_size[level], U_g_size[lev…  in main()
584     PetscCall(ViewSolution(comm, app_ctx, U, 0, 0.0));  in main()
606       PetscCall(PetscPrintf(comm, "%" PetscInt_FMT " Load Increment\n", increment - 1));  in main()
622       PetscCall(ViewSolution(comm, app_ctx, U, increment, load_increment));  in main()
643         PetscCall(PetscPrintf(comm, "    Strain Energy                      : %.12e\n", energy));  in main()
666     PetscCall(PetscPrintf(comm,  in main()
681     PetscCall(PetscPrintf(comm,  in main()
692     PetscCall(PetscPrintf(comm, "    PC Type                            : %s\n", pc_type));  in main()
697       PetscCall(PetscPrintf(comm,  in main()
712       PetscCall(PetscPrintf(comm,  in main()
724     PetscCall(MPI_Allreduce(&elapsed_time, &min_time, 1, MPI_DOUBLE, MPI_MIN, comm));  in main()
725     PetscCall(MPI_Allreduce(&elapsed_time, &max_time, 1, MPI_DOUBLE, MPI_MAX, comm));  in main()
726     PetscCall(PetscPrintf(comm,  in main()
762       PetscCall(PetscPrintf(comm, "    L2 Error                           : %e\n", l2_error));  in main()
777     PetscCall(PetscPrintf(comm, "    Strain Energy                      : %.12e\n", energy));  in main()
793 …PetscCall(ViewDiagnosticQuantities(comm, level_dms[fine_level], diagnostic_ctx, app_ctx, U, ceed_d…  in main()