Searched refs:ceta_bar (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/ksp/impls/symmlq/ |
| H A D | symmlq.c | 17 …etscScalar alpha, beta, ibeta, betaold, beta1, ceta = 0, ceta_oold = 0.0, ceta_old = 0.0, ceta_bar; in KSPSolve_SYMMLQ() local
175 if (c == 0.0) ceta_bar = ceta * 1.e15; in KSPSolve_SYMMLQ()
176 else ceta_bar = ceta / c; in KSPSolve_SYMMLQ()
178 PetscCall(VecAXPY(X, ceta_bar, Wbar)); /* x <- x + ceta_bar*w_bar */ in KSPSolve_SYMMLQ()
|