2   -Mx <xg>, where <xg> = number of coarse grid points in the x-direction\n\
3   -My <yg>, where <yg> = number of coarse grid points in the y-direction\n\
4   -Mz <zg>, where <zg> = number of coarse grid points in the z-direction\n\
27   GridCtx  coarse;  member
29   Mat      Ii; /* interpolation from coarse to fine */
36       Mm_ratio - ration of grid lines between fine and coarse grids.
59   user.coarse.mx = 20;  in main()
60   user.coarse.my = 20;  in main()
61   user.coarse.mz = 20;  in main()
63   PetscCall(PetscOptionsGetInt(NULL, NULL, "-Mx", &user.coarse.mx, NULL));  in main()
64   PetscCall(PetscOptionsGetInt(NULL, NULL, "-My", &user.coarse.my, NULL));  in main()
65   PetscCall(PetscOptionsGetInt(NULL, NULL, "-Mz", &user.coarse.mz, NULL));  in main()
68   if (user.coarse.mz) Test_3D = PETSC_TRUE;  in main()
78 … DM_BOUNDARY_NONE, DMDA_STENCIL_STAR, user.coarse.mx, user.coarse.my, Npx, Npy, 1, 1, NULL, NULL, …  in main()
80 …ONE, DMDA_STENCIL_STAR, user.coarse.mx, user.coarse.my, user.coarse.mz, Npx, Npy, Npz, 1, 1, NULL,…  in main()
82   PetscCall(DMSetFromOptions(user.coarse.da));  in main()
83   PetscCall(DMSetUp(user.coarse.da));  in main()
85   /* This makes sure the coarse DMDA has the same partition as the fine DMDA */  in main()
86   PetscCall(DMRefine(user.coarse.da, PetscObjectComm((PetscObject)user.coarse.da), &user.fine.da));  in main()
136   /* Create interpolation between the fine and coarse grids */  in main()
137   PetscCall(DMCreateInterpolation(user.coarse.da, user.fine.da, &P, NULL));  in main()
262   PetscCall(DMDestroy(&user.coarse.da));  in main()