Searched defs:dipole_force (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/aobasis/ |
| H A D | ai_moments.F | 1479 SUBROUTINE dipole_force(la_max, npgfa, zeta, rpgfa, la_min, & subroutine
1492 CHARACTER(LEN=*), PARAMETER :: routineN = 'dipole_force', routineP = moduleN//':'//routineN argument
1494 INTEGER :: i, imom, ipgf, j, jpgf, lda, lda_min, &
1495 ldb, ldb_min, lmax, na, nb
1496 REAL(KIND=dp) :: dab, rab(3), rab2
1497 REAL(KIND=dp), ALLOCATABLE, DIMENSION(:, :, :) :: difmab, mab
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/aobasis/ |
| H A D | ai_moments.F | 1479 SUBROUTINE dipole_force(la_max, npgfa, zeta, rpgfa, la_min, & subroutine
1492 CHARACTER(LEN=*), PARAMETER :: routineN = 'dipole_force', routineP = moduleN//':'//routineN argument
1494 INTEGER :: i, imom, ipgf, j, jpgf, lda, lda_min, &
1495 ldb, ldb_min, lmax, na, nb
1496 REAL(KIND=dp) :: dab, rab(3), rab2
1497 REAL(KIND=dp), ALLOCATABLE, DIMENSION(:, :, :) :: difmab, mab
|