2634 PetscErrorCode MatDestroySubMatrix_Private(Mat_SubSppt *submatj)  in MatDestroySubMatrix_Private()  argument
2639   if (!submatj->id) { /* delete data that are linked only to submats[id=0] */  in MatDestroySubMatrix_Private()
2640     PetscCall(PetscFree4(submatj->sbuf1, submatj->ptr, submatj->tmp, submatj->ctr));  in MatDestroySubMatrix_Private()
2642     for (i = 0; i < submatj->nrqr; ++i) PetscCall(PetscFree(submatj->sbuf2[i]));  in MatDestroySubMatrix_Private()
2643     PetscCall(PetscFree3(submatj->sbuf2, submatj->req_size, submatj->req_source1));  in MatDestroySubMatrix_Private()
2645     if (submatj->rbuf1) {  in MatDestroySubMatrix_Private()
2646       PetscCall(PetscFree(submatj->rbuf1[0]));  in MatDestroySubMatrix_Private()
2647       PetscCall(PetscFree(submatj->rbuf1));  in MatDestroySubMatrix_Private()
2650     for (i = 0; i < submatj->nrqs; ++i) PetscCall(PetscFree(submatj->rbuf3[i]));  in MatDestroySubMatrix_Private()
2651     PetscCall(PetscFree3(submatj->req_source2, submatj->rbuf2, submatj->rbuf3));  in MatDestroySubMatrix_Private()
2652     PetscCall(PetscFree(submatj->pa));  in MatDestroySubMatrix_Private()
2656   PetscCall(PetscHMapIDestroy(&submatj->rmap));  in MatDestroySubMatrix_Private()
2657   if (submatj->cmap_loc) PetscCall(PetscFree(submatj->cmap_loc));  in MatDestroySubMatrix_Private()
2658   PetscCall(PetscFree(submatj->rmap_loc));  in MatDestroySubMatrix_Private()
2660   PetscCall(PetscFree(submatj->rmap));  in MatDestroySubMatrix_Private()
2663   if (!submatj->allcolumns) {  in MatDestroySubMatrix_Private()
2665     PetscCall(PetscHMapIDestroy(&submatj->cmap));  in MatDestroySubMatrix_Private()
2667     PetscCall(PetscFree(submatj->cmap));  in MatDestroySubMatrix_Private()
2670   PetscCall(PetscFree(submatj->row2proc));  in MatDestroySubMatrix_Private()
2672   PetscCall(PetscFree(submatj));  in MatDestroySubMatrix_Private()
2679   Mat_SubSppt *submatj = c->submatis1;  in MatDestroySubMatrix_SeqAIJ()  local
2682   PetscCall((*submatj->destroy)(C));  in MatDestroySubMatrix_SeqAIJ()
2683   PetscCall(MatDestroySubMatrix_Private(submatj));  in MatDestroySubMatrix_SeqAIJ()
2693   Mat_SubSppt *submatj;  in MatDestroySubMatrices_SeqAIJ()  local
2699     submatj = c->submatis1;  in MatDestroySubMatrices_SeqAIJ()
2700     if (submatj) {  in MatDestroySubMatrices_SeqAIJ()
2703         PetscCall((*submatj->destroy)(C));  in MatDestroySubMatrices_SeqAIJ()
2704         PetscCall(MatDestroySubMatrix_Private(submatj));  in MatDestroySubMatrices_SeqAIJ()