Merge branch 'fix_ll' into 'develop'

add check on allocation for ll array in ldaU init See merge request QEF/q-e!1092
2020-09-10 12:26:50 +00:00 · 2020-09-10 12:26:50 +00:00 · 7e110a7530
parent c484270a7d 3f661991a5
commit 7e110a7530
1 changed files with 1 additions and 0 deletions
--- a/PW/src/ldaU.f90
+++ b/PW/src/ldaU.f90
@ -295,6 +295,7 @@ CONTAINS
          !
       ENDDO !nt
       !
+       IF (ALLOCATED(ll)) DEALLOCATE (ll) 
       ALLOCATE(ll(ldmx_tot,ntyp))
       !
       ! ll is a label of all the Hubbard states telling the l of that states.