Home
last modified time | relevance | path

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

/petsc/src/ksp/ksp/impls/ibcgs/
H A Dibcgs.c60 PetscScalar kappan, thetan, etan, gamman, betan, deltan; in KSPSolve_IBCGS() local
205 phin = pin = gamman = etan = thetan = kappan = 0.0; in KSPSolve_IBCGS()
212 kappan += tn[i] * tn[i]; in KSPSolve_IBCGS()
222 insums[5] = kappan; in KSPSolve_IBCGS()
245 kappan = outsums[5]; in KSPSolve_IBCGS()
248 if (kappan == 0.0) { in KSPSolve_IBCGS()
258 omegan = thetan / kappan; in KSPSolve_IBCGS()