538 static PetscErrorCode PetscDSEnlarge_Static(PetscDS prob, PetscInt NfNew)  in PetscDSEnlarge_Static()  argument
551   if (Nf >= NfNew) PetscFunctionReturn(PETSC_SUCCESS);  in PetscDSEnlarge_Static()
554   PetscCall(PetscMalloc4(NfNew, &tmpd, NfNew, &tmpi, NfNew, &tmpc, NfNew, &tmpk));  in PetscDSEnlarge_Static()
561   for (f = Nf; f < NfNew; ++f) {  in PetscDSEnlarge_Static()
567   PetscCall(PetscWeakFormSetNumFields(prob->wf, NfNew));  in PetscDSEnlarge_Static()
568   prob->Nf        = NfNew;  in PetscDSEnlarge_Static()
573   PetscCall(PetscCalloc2(NfNew, &tmpup, NfNew, &tmpctx));  in PetscDSEnlarge_Static()
576   for (f = Nf; f < NfNew; ++f) tmpup[f] = NULL;  in PetscDSEnlarge_Static()
577   for (f = Nf; f < NfNew; ++f) tmpctx[f] = NULL;  in PetscDSEnlarge_Static()
581 …PetscCall(PetscCalloc4(NfNew, &tmpexactSol, NfNew, &tmpexactCtx, NfNew, &tmpexactSol_t, NfNew, &tm…  in PetscDSEnlarge_Static()
582 …PetscCall(PetscCalloc4(NfNew, &tmplowerBound, NfNew, &tmplowerCtx, NfNew, &tmpupperBound, NfNew, &…  in PetscDSEnlarge_Static()
591   for (f = Nf; f < NfNew; ++f) tmpexactSol[f] = NULL;  in PetscDSEnlarge_Static()
592   for (f = Nf; f < NfNew; ++f) tmpexactCtx[f] = NULL;  in PetscDSEnlarge_Static()
593   for (f = Nf; f < NfNew; ++f) tmpexactSol_t[f] = NULL;  in PetscDSEnlarge_Static()
594   for (f = Nf; f < NfNew; ++f) tmpexactCtx_t[f] = NULL;  in PetscDSEnlarge_Static()
595   for (f = Nf; f < NfNew; ++f) tmplowerBound[f] = NULL;  in PetscDSEnlarge_Static()
596   for (f = Nf; f < NfNew; ++f) tmplowerCtx[f] = NULL;  in PetscDSEnlarge_Static()
597   for (f = Nf; f < NfNew; ++f) tmpupperBound[f] = NULL;  in PetscDSEnlarge_Static()
598   for (f = Nf; f < NfNew; ++f) tmpupperCtx[f] = NULL;  in PetscDSEnlarge_Static()