mirror of https://gitlab.com/QEF/q-e.git
argh, there was one occurrence of IMAG instead of DIMAG ...
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@574 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
5cf4cc06c9
commit
e292701209
|
@ -273,7 +273,7 @@ SUBROUTINE sum_band()
|
|||
!
|
||||
rho(ir,current_spin) = rho(ir,current_spin) + &
|
||||
w1 * REAL( psic(ir) )**2 + &
|
||||
w2 * IMAG( psic(ir) )**2
|
||||
w2 *DIMAG( psic(ir) )**2
|
||||
!
|
||||
END DO
|
||||
!
|
||||
|
|
Loading…
Reference in New Issue