impls/pounders/pounders.c

476   PetscCall(pounders_feval(tao, mfqP->Xhist[mfqP->nHist], mfqP->Fhist[mfqP->nHist], &mfqP->Fres[mfqP->nHist]));
643   PetscCall(pounders_feval(tao, mfqP->Xhist[0], mfqP->Fhist[0], &mfqP->Fres[0]));
645   minnorm        = mfqP->Fres[0];
657     PetscCall(pounders_feval(tao, mfqP->Xhist[i], mfqP->Fhist[i], &mfqP->Fres[i]));
658     if (mfqP->Fres[i] < minnorm) {
660       minnorm        = mfqP->Fres[i];
773     PetscCall(pounders_feval(tao, mfqP->Xhist[mfqP->nHist], mfqP->Fhist[mfqP->nHist], &mfqP->Fres[mfqP->nHist]));
775     rho = (mfqP->Fres[mfqP->minindex] - mfqP->Fres[mfqP->nHist]) / mdec;
800       minnorm        = mfqP->Fres[mfqP->minindex];
946   PetscCall(PetscMalloc1(tao->max_funcs + 100, &mfqP->Fres));
1060   PetscCall(PetscFree(mfqP->Fres));