Home
last modified time | relevance | path

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

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dewalds_multipole_sr.fypp328damptji_ab(a,b) = tmp*(-dampfuncdiffj*irab2*irab2+3.0_dp*dampfuncj*irab2*irab2*ir)
330 IF (a==b) damptji_ab(a,b) = damptji_ab(a,b) - dampfuncj*fac_ij*irab2*ir
569 - ch_i *(damptji_ab(1,k)*dp_j(1)+&
570 damptji_ab(2,k)*dp_j(2)+&
571 damptji_ab(3,k)*dp_j(3))
H A Dewalds_multipole.F387 REAL(KIND=dp), DIMENSION(3, 3) :: damptij_ab, damptji_ab, ef2_i, ef2_j, & local
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dewalds_multipole_sr.fypp328damptji_ab(a,b) = tmp*(-dampfuncdiffj*irab2*irab2+3.0_dp*dampfuncj*irab2*irab2*ir)
330 IF (a==b) damptji_ab(a,b) = damptji_ab(a,b) - dampfuncj*fac_ij*irab2*ir
569 - ch_i *(damptji_ab(1,k)*dp_j(1)+&
570 damptji_ab(2,k)*dp_j(2)+&
571 damptji_ab(3,k)*dp_j(3))
H A Dewalds_multipole.F390 REAL(KIND=dp), DIMENSION(3, 3) :: damptij_ab, damptji_ab, ef2_i, ef2_j, & local