52 …_size, *g_size, dim = 3, fine_level, mesh_elem[3] = {3, 3, 3}, num_comp_u = 1, num_levels = degree,  in main()  local
149       num_levels = degree;  in main()
152       num_levels = ceil(log(degree) / log(2)) + 1;  in main()
155   PetscCall(PetscMalloc1(num_levels, &level_degrees));  in main()
156   fine_level = num_levels - 1;  in main()
160       for (PetscInt i = 0; i < num_levels; i++) level_degrees[i] = i + 1;  in main()
163       for (PetscInt i = 0; i < num_levels - 1; i++) level_degrees[i] = pow(2, i);  in main()
167   PetscCall(PetscMalloc1(num_levels, &dm));  in main()
168   PetscCall(PetscMalloc1(num_levels, &X));  in main()
169   PetscCall(PetscMalloc1(num_levels, &X_loc));  in main()
170   PetscCall(PetscMalloc1(num_levels, &mult));  in main()
171   PetscCall(PetscMalloc1(num_levels, &op_apply_ctx));  in main()
172   PetscCall(PetscMalloc1(num_levels, &pr_restr_ctx));  in main()
173   PetscCall(PetscMalloc1(num_levels, &mat_O));  in main()
174   PetscCall(PetscMalloc1(num_levels, &mat_pr));  in main()
175   PetscCall(PetscMalloc1(num_levels, &l_size));  in main()
176   PetscCall(PetscMalloc1(num_levels, &xl_size));  in main()
177   PetscCall(PetscMalloc1(num_levels, &g_size));  in main()
186   for (PetscInt i = 0; i < num_levels; i++) {  in main()
248 …          l_size[fine_level] / num_comp_u, num_comp_u, CeedElemTopologies[elem_topo], num_levels));  in main()
258   PetscCall(PetscMalloc1(num_levels, &ceed_data));  in main()
259   for (PetscInt i = 0; i < num_levels; i++) {  in main()
295   for (PetscInt i = 0; i < num_levels; i++) {  in main()
396     PetscCall(PCMGSetLevels(pc, num_levels, NULL));  in main()
397     for (PetscInt i = 0; i < num_levels; i++) {  in main()
411       if (i < num_levels - 1) {  in main()
537   for (PetscInt i = 0; i < num_levels; i++) {  in main()