Home
last modified time | relevance | path

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

/petsc/src/ksp/ksp/impls/ibcgs/
H A Dibcgs.c56 PetscScalar taun_1, taun, rhon, alphan_1, alphan, omegan_1, omegan; in KSPSolve_IBCGS() local
165 alphan = rhon / taun; in KSPSolve_IBCGS()
176 tmp1 = (alphan / alphan_1) * betan; in KSPSolve_IBCGS()
177 tmp2 = alphan * deltan; in KSPSolve_IBCGS()
179 zn[i] = alphan * rn_1[i] + tmp1 * zn_1[i] - tmp2 * vn_1[i]; in KSPSolve_IBCGS()
181 sn[i] = rn_1[i] - alphan * vn[i]; in KSPSolve_IBCGS()
194 PetscCall(VecWAXPY(Tn, -alphan, Qn, Un_1)); in KSPSolve_IBCGS()
299 alphan_1 = alphan; in KSPSolve_IBCGS()