Searched refs:correct_surf_dip (Results 1 – 9 of 9) sorted by relevance
325 dft_control%correct_surf_dip = .FALSE.326 … section_vals_val_get(dft_section, "SURFACE_DIPOLE_CORRECTION", l_val=dft_control%correct_surf_dip)333 dft_control%surf_dip_correct_switch = dft_control%correct_surf_dip338 IF (dft_control%correct_surf_dip) THEN
531 correct_surf_dip, & component
440 dft_control%surf_dip_correct_switch = dft_control%correct_surf_dip441 IF ((dft_control%correct_surf_dip) .AND. (scf_control%outer_scf%have_scf) .AND. &
412 IF (dft_control%correct_surf_dip) THEN679 IF (dft_control%correct_surf_dip) THEN
326 IF (dft_control%correct_surf_dip) THEN
466 IF (dft_control%correct_surf_dip) THEN
507 correct_surf_dip, & component
323 dft_control%correct_surf_dip = .FALSE.324 … section_vals_val_get(dft_section, "SURFACE_DIPOLE_CORRECTION", l_val=dft_control%correct_surf_dip)
462 IF (dft_control%correct_surf_dip) THEN