1281   const PetscInt col_bs  = pc_gamg->data_cell_cols;  in PCGAMGConstructProlongator_AGG()  local
1292   PetscCheck(col_bs >= 1, comm, PETSC_ERR_PLIB, "Column bs cannot be less than 1");  in PCGAMGConstructProlongator_AGG()
1314 …PetscCall(MatSetSizes(Prol, nloc * bs, nLocalSelected * col_bs, PETSC_DETERMINE, PETSC_DETERMINE));  in PCGAMGConstructProlongator_AGG()
1315   PetscCall(MatSetBlockSizes(Prol, bs, col_bs)); // should this be before MatSetSizes?  in PCGAMGConstructProlongator_AGG()
1323   PetscCall(MatSeqAIJSetPreallocation(Prol, col_bs, NULL));  in PCGAMGConstructProlongator_AGG()
1324   PetscCall(MatMPIAIJSetPreallocation(Prol, col_bs, NULL, col_bs, NULL));  in PCGAMGConstructProlongator_AGG()
1335 …l(PetscInfo(pc, "%s: New grid %" PetscInt_FMT " nodes\n", ((PetscObject)pc)->prefix, ii / col_bs));  in PCGAMGConstructProlongator_AGG()
1338 …col_bs == 0, PETSC_COMM_SELF, PETSC_ERR_PLIB, "(kk %" PetscInt_FMT " -myCrs0 %" PetscInt_FMT ") no…  in PCGAMGConstructProlongator_AGG()
1339   myCrs0 = myCrs0 / col_bs;  in PCGAMGConstructProlongator_AGG()
1340 …col_bs - myCrs0) == nLocalSelected, PETSC_COMM_SELF, PETSC_ERR_PLIB, "(kk %" PetscInt_FMT "/col_bs…  in PCGAMGConstructProlongator_AGG()
1348     for (jj = 0; jj < col_bs; jj++) {  in PCGAMGConstructProlongator_AGG()
1358           PetscCall(PetscMalloc1(stride * bs * col_bs, &data_w_ghost));  in PCGAMGConstructProlongator_AGG()
1396 …PetscCall(formProl0(agg_lists, bs, col_bs, myCrs0, nbnodes, data_w_ghost, flid_fgid, &data_out, Pr…  in PCGAMGConstructProlongator_AGG()
1400     pc_gamg->data_cell_rows = col_bs;  in PCGAMGConstructProlongator_AGG()
1401     pc_gamg->data_sz        = col_bs * col_bs * nLocalSelected;  in PCGAMGConstructProlongator_AGG()