Searched defs:create_multi_type (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | ewalds_multipole.F | 1697 SUBROUTINE create_multi_type(multipoles, idim, istart, iend, label, echarge, & subroutine
1709 CHARACTER(len=*), PARAMETER :: routineN = 'create_multi_type', & argument
1710 routineP = moduleN//':'//routineN
1712 INTEGER :: i, isize, k, l, m local
1713 REAL(KIND=dp) :: dx, r2, rvec(3), rvec1(3), rvec2(3)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | ewalds_multipole.F | 1701 SUBROUTINE create_multi_type(multipoles, idim, istart, iend, label, echarge, & subroutine
1713 CHARACTER(len=*), PARAMETER :: routineN = 'create_multi_type', & argument
1714 routineP = moduleN//':'//routineN
1716 INTEGER :: i, isize, k, l, m local
1717 REAL(KIND=dp) :: dx, r2, rvec(3), rvec1(3), rvec2(3)
|