Searched refs:mm_radius2 (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | force_fields_all.F | 3228 REAL(KIND=dp) :: alpha, beta, mm_radius1, mm_radius2, & local
3257 CALL get_atomic_kind(atomic_kind=atomic_kind, mm_radius=mm_radius2)
3270 IF (mm_radius1 + mm_radius2 > 0.0_dp) THEN
3271 beta = sqrthalf/SQRT(mm_radius1*mm_radius1 + mm_radius2*mm_radius2)
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | force_fields_all.F | 3228 REAL(KIND=dp) :: alpha, beta, mm_radius1, mm_radius2, & local
3257 CALL get_atomic_kind(atomic_kind=atomic_kind, mm_radius=mm_radius2)
3270 IF (mm_radius1 + mm_radius2 > 0.0_dp) THEN
3271 beta = sqrthalf/SQRT(mm_radius1*mm_radius1 + mm_radius2*mm_radius2)
|