Home
last modified time | relevance | path

Searched defs:jacobi_rotation_pipek (Results 1 – 2 of 2) sorted by relevance

/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqs_loc_utils.F226 SUBROUTINE jacobi_rotation_pipek(zij_fm_set, vectors, sweeps) subroutine
232 CHARACTER(len=*), PARAMETER :: routineN = 'jacobi_rotation_pipek', & argument
233 routineP = moduleN//':'//routineN
235 INTEGER :: iatom, istate, jstate, natom, nstate
236 … REAL(KIND=dp) :: aij, bij, ct, mii, mij, mjj, ratio, st, &
237 theta, tolerance
238 TYPE(cp_fm_type), POINTER :: rmat
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqs_loc_utils.F226 SUBROUTINE jacobi_rotation_pipek(zij_fm_set, vectors, sweeps) subroutine
232 CHARACTER(len=*), PARAMETER :: routineN = 'jacobi_rotation_pipek', & argument
233 routineP = moduleN//':'//routineN
235 INTEGER :: iatom, istate, jstate, natom, nstate
236 … REAL(KIND=dp) :: aij, bij, ct, mii, mij, mjj, ratio, st, &
237 theta, tolerance
238 TYPE(cp_fm_type), POINTER :: rmat