Home
last modified time | relevance | path

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

/petsc/src/ksp/ksp/impls/ibcgs/
H A Dibcgs.c63 Vec R0, Rn, Xn, F0, Vn, Zn, Qn, Tn, Sn, B, Un; in KSPSolve_IBCGS() local
93 F0 = ksp->work[3]; in KSPSolve_IBCGS()
94 PetscCall(VecGetArrayRead(F0, (const PetscScalar **)&f0)); in KSPSolve_IBCGS()
95 PetscCall(VecRestoreArrayRead(F0, NULL)); in KSPSolve_IBCGS()
132 PetscCall(KSP_PCApplyTranspose(ksp, Tn, F0)); in KSPSolve_IBCGS()
135 PetscCall(KSP_MatMultTranspose(ksp, A, Tn, F0)); in KSPSolve_IBCGS()
/petsc/src/ts/impls/implicit/discgrad/
H A Dtsdiscgrad.c293 PetscScalar F = 0, F0 = 0, Gp; in SNESTSFormFunction_DiscGrad() local
363 PetscCall((*dg->Ffunc)(ts, dg->stage_time, X0, &F0, dg->funcCtx)); in SNESTSFormFunction_DiscGrad()
373 Gp = (F - F0 - Gp) / PetscSqr(norm); in SNESTSFormFunction_DiscGrad()
/petsc/src/snes/tutorials/
H A Dex5.c519 PetscScalar **x, **b, bij, F, F0 = 0, J, u, un, us, ue, eu, uw, uxx, uyy, y; in NonlinearGS() local
586 if (k == 0) F0 = F; in NonlinearGS()
592 …if (atol > PetscAbsReal(PetscRealPart(F)) || rtol * PetscAbsReal(PetscRealPart(F0)) > PetscAbsReal… in NonlinearGS()
H A Dex55.c463 PetscScalar **x, **b, bij, F, F0 = 0, J, u, un, us, ue, eu, uw, uxx, uyy, y; in NonlinearGS() local
530 if (k == 0) F0 = F; in NonlinearGS()
536 …if (atol > PetscAbsReal(PetscRealPart(F)) || rtol * PetscAbsReal(PetscRealPart(F0)) > PetscAbsReal… in NonlinearGS()
H A Dex15.c730 PetscScalar **x, **b, bij, F, F0 = 0, J, y, u, eu; in NonlinearGS() local
790 if (k == 0) F0 = F; in NonlinearGS()
795 …if (atol > PetscAbsReal(PetscRealPart(F)) || rtol * PetscAbsReal(PetscRealPart(F0)) > PetscAbsReal… in NonlinearGS()