Skip to content

Commit

Permalink
remove unused replication of EFIELD
Browse files Browse the repository at this point in the history
  • Loading branch information
marci73 committed Dec 5, 2018
1 parent 93fe107 commit 3fa9ee8
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/cp_control_utils.F
Original file line number Diff line number Diff line change
Expand Up @@ -368,9 +368,9 @@ SUBROUTINE read_dft_control(dft_control, dft_section)
CALL section_vals_get(tmp_section, n_repetition=nrep, explicit=is_present)
IF (is_present) THEN
ALLOCATE (dft_control%efield_fields(nrep))
DO i = 1, nrep
! DO i = 1, nrep
CALL read_efield_sections(dft_control, tmp_section)
END DO
! END DO
IF (do_rtp) THEN
dft_control%apply_efield_field = .TRUE.
ELSE
Expand Down

0 comments on commit 3fa9ee8

Please sign in to comment.