Searched defs:update_dipoles_section (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | input_restart_force_eval.F | 645 SUBROUTINE update_dipoles_section(dipoles, dipoles_section) subroutine
650 CHARACTER(LEN=*), PARAMETER :: routineN = 'update_dipoles_section', & argument
651 routineP = moduleN//':'//routineN
653 INTEGER :: handle, ik, irk, Nlist, nloop
654 REAL(KIND=dp), DIMENSION(:), POINTER :: work
655 TYPE(cp_sll_val_type), POINTER :: new_pos, vals
656 TYPE(section_type), POINTER :: section
657 TYPE(val_type), POINTER :: my_val, old_val
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | input_restart_force_eval.F | 643 SUBROUTINE update_dipoles_section(dipoles, dipoles_section) subroutine
648 CHARACTER(LEN=*), PARAMETER :: routineN = 'update_dipoles_section', & argument
649 routineP = moduleN//':'//routineN
651 INTEGER :: handle, ik, irk, Nlist, nloop
652 REAL(KIND=dp), DIMENSION(:), POINTER :: work
653 TYPE(cp_sll_val_type), POINTER :: new_pos, vals
654 TYPE(section_type), POINTER :: section
655 TYPE(val_type), POINTER :: my_val, old_val
|