scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Yet another problem with Hubbard U after recent changes: bad dimensios 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@10828 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2014-03-31 14:32:52 +00:00
parent 62152ce66d
commit 0a7298dbc2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Modules/qexml.f90
View File

@ -3395,7 +3395,7 @@ CONTAINS
IF ( present( lda_plus_u_kind ) ) lda_plus_u_kind = lda_plus_u_kind_
IF ( present( U_projection ) ) U_projection = U_projection_
IF ( present( Hubbard_lmax ) ) Hubbard_lmax = Hubbard_lmax_
IF ( present( Hubbard_l ) ) Hubbard_l(1:Hubbard_lmax_) = Hubbard_l_(:)
IF ( present( Hubbard_l ) ) Hubbard_l(1:nsp_) = Hubbard_l_(:)
IF ( present( Hubbard_U ) ) Hubbard_U(1:nsp_) = Hubbard_U_(1:nsp_)
IF ( present( Hubbard_J ) ) Hubbard_J(1:3,1:nsp_) = Hubbard_J_(1:3,1:nsp_)
IF ( present( Hubbard_J0 ) ) Hubbard_J0(1:nsp_) = Hubbard_J0_(1:nsp_)