Home
last modified time | relevance | path

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

/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dforce_fields_all.F665 SUBROUTINE force_field_unique_opbend(particle_set, & subroutine
673 CHARACTER(len=*), PARAMETER :: routineN = 'force_field_unique_opbend', & argument
674 routineP = moduleN//':'//routineN
676 CHARACTER(LEN=default_string_length) :: name_atm_a, name_atm_a2, name_atm_b, &
677 name_atm_b2, name_atm_c, name_atm_c2, &
678 name_atm_d, name_atm_d2
679 INTEGER :: atm_a, atm_b, atm_c, atm_d, counter, &
680 first, handle2, i, j, k, last, natom, &
681 nopbend
684 LOGICAL :: found
[all …]
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dforce_fields_all.F665 SUBROUTINE force_field_unique_opbend(particle_set, & subroutine
673 CHARACTER(len=*), PARAMETER :: routineN = 'force_field_unique_opbend', & argument
674 routineP = moduleN//':'//routineN
676 CHARACTER(LEN=default_string_length) :: name_atm_a, name_atm_a2, name_atm_b, &
677 name_atm_b2, name_atm_c, name_atm_c2, &
678 name_atm_d, name_atm_d2
679 INTEGER :: atm_a, atm_b, atm_c, atm_d, counter, &
680 first, handle2, i, j, k, last, natom, &
681 nopbend
684 LOGICAL :: found
[all …]