1067   Mat_Elemental_Grid *commgrid;  in MatDestroy_Elemental()  local
1078   PetscCallMPI(MPI_Comm_get_attr(icomm, Petsc_Elemental_keyval, (void **)&commgrid, &iflg));  in MatDestroy_Elemental()
1079   if (--commgrid->grid_refct == 0) {  in MatDestroy_Elemental()
1080     delete commgrid->grid;  in MatDestroy_Elemental()
1081     PetscCall(PetscFree(commgrid));  in MatDestroy_Elemental()
1339   Mat_Elemental_Grid *commgrid;  in MatCreate_Elemental()  local
1359   PetscCallMPI(MPI_Comm_get_attr(icomm, Petsc_Elemental_keyval, (void **)&commgrid, &iflg));  in MatCreate_Elemental()
1361     PetscCall(PetscNew(&commgrid));  in MatCreate_Elemental()
1368       commgrid->grid = new El::Grid(cxxcomm, optv1); /* use user-provided grid height */  in MatCreate_Elemental()
1370       commgrid->grid = new El::Grid(cxxcomm); /* use Elemental default grid sizes */  in MatCreate_Elemental()
1373     commgrid->grid_refct = 1;  in MatCreate_Elemental()
1374     PetscCallMPI(MPI_Comm_set_attr(icomm, Petsc_Elemental_keyval, (void *)commgrid));  in MatCreate_Elemental()
1381     commgrid->grid_refct++;  in MatCreate_Elemental()
1384   a->grid        = commgrid->grid;  in MatCreate_Elemental()