Home
last modified time | relevance | path

Searched refs:do_raman (Results 1 – 6 of 6) sorted by relevance

/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqs_linres_polar_utils.F143 CALL section_vals_val_get(polar_section, "DO_RAMAN", l_val=polar_env%do_raman)
231 do_raman=do_raman, &
234 IF (.NOT. run_stopped .AND. do_raman) THEN
293 LOGICAL :: do_raman, run_stopped local
317 do_raman=do_raman, &
320 IF (.NOT. run_stopped .AND. do_raman) THEN
426 CALL get_polar_env(polar_env=polar_env, do_raman=do_raman, do_periodic=do_periodic)
444 IF (do_raman) THEN
537 LOGICAL :: do_raman, new_file, run_stopped local
552 do_raman=do_raman, &
[all …]
H A Dqs_linres_types.F126 LOGICAL :: do_raman, run_stopped, do_periodic component
1402 polar_env%do_raman = .FALSE.
1423 …SUBROUTINE get_polar_env(polar_env, do_raman, do_periodic, dBerry_psi0, polar, psi1_dBerry, run_st… argument
1426 LOGICAL, OPTIONAL :: do_raman, do_periodic local
1439 IF (PRESENT(do_raman)) do_raman = polar_env%do_raman
1457 SUBROUTINE set_polar_env(polar_env, do_raman, do_periodic, dBerry_psi0, polar, & argument
1461 LOGICAL, OPTIONAL :: do_raman, do_periodic local
1474 IF (PRESENT(do_raman)) polar_env%do_raman = do_raman
H A Dqs_linres_op.F680 LOGICAL :: do_raman local
713 do_raman=do_raman, &
716 IF (do_raman) THEN
851 LOGICAL :: do_raman local
870 do_raman=do_raman, &
874 IF (do_raman) THEN
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqs_linres_polar_utils.F143 CALL section_vals_val_get(polar_section, "DO_RAMAN", l_val=polar_env%do_raman)
231 do_raman=do_raman, &
234 IF (.NOT. run_stopped .AND. do_raman) THEN
293 LOGICAL :: do_raman, run_stopped local
317 do_raman=do_raman, &
320 IF (.NOT. run_stopped .AND. do_raman) THEN
426 CALL get_polar_env(polar_env=polar_env, do_raman=do_raman, do_periodic=do_periodic)
444 IF (do_raman) THEN
537 LOGICAL :: do_raman, new_file, run_stopped local
552 do_raman=do_raman, &
[all …]
H A Dqs_linres_types.F126 LOGICAL :: do_raman, run_stopped, do_periodic component
1402 polar_env%do_raman = .FALSE.
1423 …SUBROUTINE get_polar_env(polar_env, do_raman, do_periodic, dBerry_psi0, polar, psi1_dBerry, run_st… argument
1426 LOGICAL, OPTIONAL :: do_raman, do_periodic local
1439 IF (PRESENT(do_raman)) do_raman = polar_env%do_raman
1457 SUBROUTINE set_polar_env(polar_env, do_raman, do_periodic, dBerry_psi0, polar, & argument
1461 LOGICAL, OPTIONAL :: do_raman, do_periodic local
1474 IF (PRESENT(do_raman)) polar_env%do_raman = do_raman
H A Dqs_linres_op.F680 LOGICAL :: do_raman local
713 do_raman=do_raman, &
716 IF (do_raman) THEN
851 LOGICAL :: do_raman local
870 do_raman=do_raman, &
874 IF (do_raman) THEN