Home
last modified time | relevance | path

Searched refs:YCtmp (Results 1 – 1 of 1) sorted by relevance

/petsc/src/snes/impls/ntrdc/ !
H A Dntrdc.c299 Vec YCtmp; in SNESSolve_NEWTONTRDC() local
323 YCtmp = snes->work[5]; /* Cauchy solution */ in SNESSolve_NEWTONTRDC()
422 PetscCall(VecCopy(GradF, YCtmp)); /* this could be improved */ in SNESSolve_NEWTONTRDC()
423 PetscCall(VecScale(YCtmp, auk)); /* YCtmp, Cauchy solution*/ in SNESSolve_NEWTONTRDC()
424 PetscCall(VecNorm(YCtmp, NORM_2, &ycnorm)); /* ycnorm <- || Y_cauchy || */ in SNESSolve_NEWTONTRDC()
426 PetscCall(VecCopy(YCtmp, Y)); in SNESSolve_NEWTONTRDC()
429 PetscCall(VecAXPY(YNtmp, -1.0, YCtmp)); /* YCtmp = A, YNtmp = B */ in SNESSolve_NEWTONTRDC()
432 PetscCall(VecDotRealPart(YCtmp, YNtmp, &c1)); in SNESSolve_NEWTONTRDC()
434 PetscCall(VecNorm(YCtmp, NORM_2, &c2)); /* this could be improved */ in SNESSolve_NEWTONTRDC()
440 PetscCall(VecWAXPY(W, tau, YNtmp, YCtmp)); in SNESSolve_NEWTONTRDC()
[all …]