Home
last modified time | relevance | path

Searched refs:lat_dv_shifted (Results 1 – 2 of 2) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqmmm_util.F602 … REAL(dp) :: lat_dv3(3), lat_dv_shifted, my_closest_dv local
610 lat_dv_shifted = lat_dv3(i_dim) + shift*1.0_dp
611 IF (ABS(lat_dv_shifted) < ABS(my_closest_dv) .AND. (dir*lat_dv_shifted >= 0.0)) THEN
612 my_closest_dv = lat_dv_shifted
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqmmm_util.F602 … REAL(dp) :: lat_dv3(3), lat_dv_shifted, my_closest_dv local
610 lat_dv_shifted = lat_dv3(i_dim) + shift*1.0_dp
611 IF (ABS(lat_dv_shifted) < ABS(my_closest_dv) .AND. (dir*lat_dv_shifted >= 0.0)) THEN
612 my_closest_dv = lat_dv_shifted