Home
last modified time | relevance | path

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

/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqmmm_init.F1411 REAL(KIND=dp) :: my_c_radius, my_charge, my_radius local
1415 my_c_radius = c_radius
1427 IF (my_c_radius == 0.0_dp) my_c_radius = mm_el_pot_radius_corr(i)
1435 added_charges%mm_el_pot_radius_corr(icount) = my_c_radius
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqmmm_init.F1411 REAL(KIND=dp) :: my_c_radius, my_charge, my_radius local
1415 my_c_radius = c_radius
1427 IF (my_c_radius == 0.0_dp) my_c_radius = mm_el_pot_radius_corr(i)
1435 added_charges%mm_el_pot_radius_corr(icount) = my_c_radius