Skip to content

Commit

Permalink
Remove unnecessary check
Browse files Browse the repository at this point in the history
  • Loading branch information
mtaillefumier authored and mkrack committed Sep 19, 2022
1 parent 821529d commit 378308f
Showing 1 changed file with 0 additions and 5 deletions.
5 changes: 0 additions & 5 deletions src/qs_kind_types.F
Original file line number Diff line number Diff line change
Expand Up @@ -1896,17 +1896,12 @@ SUBROUTINE read_qs_kind(qs_kind, kind_section, para_env, force_env_section, no_f
keyword_name="L", &
i_val=l)
qs_kind%dft_plus_u%l = l
IF (l < 0) &
CPABORT("DFT+U| Invalid orbital angular momentum quantum number specified: l < 0")
#if defined(__SIRIUS)
CALL section_vals_val_get(dft_plus_u_section, &
keyword_name="N", &
i_val=nu)
qs_kind%dft_plus_u%n = nu
IF (nu < 0) &
CPABORT("DFT+U| the principal quantum number n can not be negative")
CALL section_vals_val_get(dft_plus_u_section, &
keyword_name="U", &
r_val=qs_kind%dft_plus_u%U)
Expand Down

0 comments on commit 378308f

Please sign in to comment.