Home
last modified time | relevance | path

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

/petsc/src/ksp/ksp/utils/lmvm/symbrdn/
H A Dsymbrdn.c139 PetscScalar phi_j; in SymBroydenRecursiveBasisUpdate() local
164 phi_j = PhiFromPsi(psi_j, yjtsj, sjtbjsj, yjthjyj); in SymBroydenRecursiveBasisUpdate()
165 PetscCall(LMProductsInsertNextDiagonalValue(Phi, j, phi_j)); in SymBroydenRecursiveBasisUpdate()
166 } else PetscCall(LMProductsGetDiagonalValue(Phi, j, &phi_j)); in SymBroydenRecursiveBasisUpdate()
177 m_00 = (phi_j - 1.0) / sjtbjsj; in SymBroydenRecursiveBasisUpdate()
178 m_01 = -phi_j / yjtsj; in SymBroydenRecursiveBasisUpdate()
179 m_11 = (yjtsj + phi_j * sjtbjsj) / (yjtsj * yjtsj); in SymBroydenRecursiveBasisUpdate()