Home
last modified time | relevance | path

Searched refs:current_gauge_atom (Results 1 – 10 of 10) sorted by relevance

/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqs_linres_atom_current.F28 USE input_constants, ONLY: current_gauge_atom,&
774 CASE (current_gauge_atom)
977 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1011 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1037 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1104 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1130 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1453 IF (current_env%gauge .EQ. current_gauge_atom) do_igaim = .TRUE.
H A Dqs_linres_current_utils.F57 USE input_constants, ONLY: current_gauge_atom,&
712 CASE (current_gauge_atom)
1176 IF (current_env%gauge .EQ. current_gauge_atom) THEN
H A Dinput_cp2k_properties_dft.F29 current_gauge_atom, current_gauge_r, current_gauge_r_and_step_func, &
317 … enum_i_vals=(/current_gauge_r, current_gauge_r_and_step_func, current_gauge_atom/))
H A Dinput_constants.F477 current_gauge_atom = 3, & variable
H A Dqs_linres_current.F56 USE input_constants, ONLY: current_gauge_atom
648 …do_igaim = current_env%gauge .EQ. current_gauge_atom ! If do_igaim is False the current_env is nev…
1276 IF (gauge .EQ. current_gauge_atom) THEN
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqs_linres_atom_current.F28 USE input_constants, ONLY: current_gauge_atom,&
774 CASE (current_gauge_atom)
977 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1011 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1037 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1104 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1130 IF (current_env%gauge .EQ. current_gauge_atom) THEN
1453 IF (current_env%gauge .EQ. current_gauge_atom) do_igaim = .TRUE.
H A Dqs_linres_current_utils.F57 USE input_constants, ONLY: current_gauge_atom,&
712 CASE (current_gauge_atom)
1176 IF (current_env%gauge .EQ. current_gauge_atom) THEN
H A Dinput_cp2k_properties_dft.F31 current_gauge_atom, current_gauge_r, current_gauge_r_and_step_func, &
320 … enum_i_vals=(/current_gauge_r, current_gauge_r_and_step_func, current_gauge_atom/))
H A Dinput_constants.F477 current_gauge_atom = 3, & variable
H A Dqs_linres_current.F65 USE input_constants, ONLY: current_gauge_atom
655 …do_igaim = current_env%gauge .EQ. current_gauge_atom ! If do_igaim is False the current_env is nev…
1459 IF (gauge .EQ. current_gauge_atom) THEN