Home
last modified time | relevance | path

Searched defs:connectivity_control (Results 1 – 2 of 2) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dtopology.F282 SUBROUTINE connectivity_control(topology, para_env, qmmm, qmmm_env, subsys_section, & subroutine
291 CHARACTER(len=*), PARAMETER :: routineN = 'connectivity_control', & argument
292 routineP = moduleN//':'//routineN
293 INTEGER, PARAMETER :: map0 = ICHAR("0"), map9 = ICHAR("9")
295 CHARACTER(len=default_string_length) :: element0, my_element
297 ALLOCATABLE, DIMENSION(:) :: elements
298 INTEGER :: handle, handle2, i, id, itmp, iw, j, k local
299 LOGICAL :: check, my_qmmm, use_mm_map_first
300 TYPE(cp_logger_type), POINTER :: logger
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dtopology.F282 SUBROUTINE connectivity_control(topology, para_env, qmmm, qmmm_env, subsys_section, & subroutine
291 CHARACTER(len=*), PARAMETER :: routineN = 'connectivity_control', & argument
292 routineP = moduleN//':'//routineN
293 INTEGER, PARAMETER :: map0 = ICHAR("0"), map9 = ICHAR("9")
295 CHARACTER(len=default_string_length) :: element0, my_element
297 ALLOCATABLE, DIMENSION(:) :: elements
298 INTEGER :: handle, handle2, i, id, itmp, iw, j, k local
299 LOGICAL :: check, my_qmmm, use_mm_map_first
300 TYPE(cp_logger_type), POINTER :: logger