Searched refs:do_igaim (Results 1 – 4 of 4) sorted by relevance
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | qs_linres_current.F | 653 IF (do_igaim) mat_d => mat_d0
766 IF (do_igaim) THEN
778 IF (do_igaim) deltajp_d(1)%matrix => mat_d !mat_d0
850 IF (do_igaim) THEN
858 IF (do_igaim) jpblock_d => jp_block_d
911 IF (.NOT. current_env%gauge_init .AND. do_igaim) THEN
917 IF (do_igaim) THEN
971 IF (do_igaim) jpab_d => jpabt_d(:, :, ithread)
1094 IF (do_igaim) THEN
1135 IF (do_igaim) THEN
[all …]
|
| H A D | qs_linres_atom_current.F | 1196 harmonics, do_igaim, ratom, natm_gauge, & argument
1203 LOGICAL, INTENT(IN) :: do_igaim local
1301 IF (do_igaim) THEN
1424 LOGICAL :: do_igaim, gapw, paw_atom local
1452 do_igaim = .FALSE.
1453 IF (current_env%gauge .EQ. current_gauge_atom) do_igaim = .TRUE.
1500 do_igaim, &
|
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | qs_linres_current.F | 660 IF (do_igaim) mat_d => mat_d0
761 IF (do_igaim) THEN
773 IF (do_igaim) deltajp_d(1)%matrix => mat_d !mat_d0
845 IF (do_igaim) THEN
853 IF (do_igaim) jpblock_d => jp_block_d
898 IF (.NOT. current_env%gauge_init .AND. do_igaim) THEN
904 IF (do_igaim) THEN
958 IF (do_igaim) jpab_d => jpabt_d(:, :, ithread)
1086 IF (do_igaim) THEN
1142 IF (do_igaim) THEN
[all …]
|
| H A D | qs_linres_atom_current.F | 1196 harmonics, do_igaim, ratom, natm_gauge, & argument
1203 LOGICAL, INTENT(IN) :: do_igaim local
1301 IF (do_igaim) THEN
1424 LOGICAL :: do_igaim, gapw, paw_atom local
1452 do_igaim = .FALSE.
1453 IF (current_env%gauge .EQ. current_gauge_atom) do_igaim = .TRUE.
1500 do_igaim, &
|