Home
last modified time | relevance | path

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

/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dforce_fields_all.F1987 CHARACTER(len=*), PARAMETER :: routineN = 'force_field_pack_charge', & argument
1988 routineP = moduleN//':'//routineN
1990 CHARACTER(LEN=default_string_length) :: atmname
1991 INTEGER :: handle, i, ilink, j local
1992 INTEGER, DIMENSION(:), POINTER :: my_atom_list
1993 … LOGICAL :: found, found_p, is_link_atom, is_shell, &
1994 only_manybody, only_qm
1995 REAL(KIND=dp) :: charge, charge_tot, cs_charge, &
1996 scale_factor
1997 TYPE(atomic_kind_type), POINTER :: atomic_kind
[all …]
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dforce_fields_all.F1987 CHARACTER(len=*), PARAMETER :: routineN = 'force_field_pack_charge', & argument
1988 routineP = moduleN//':'//routineN
1990 CHARACTER(LEN=default_string_length) :: atmname
1991 INTEGER :: handle, i, ilink, j local
1992 INTEGER, DIMENSION(:), POINTER :: my_atom_list
1993 … LOGICAL :: found, found_p, is_link_atom, is_shell, &
1994 only_manybody, only_qm
1995 REAL(KIND=dp) :: charge, charge_tot, cs_charge, &
1996 scale_factor
1997 TYPE(atomic_kind_type), POINTER :: atomic_kind
[all …]