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

Bug fix: a problem with dipfield in the noncollinear case. 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@8892 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
dalcorso 2012-04-16 09:46:03 +00:00
parent a678c6fbc4
commit 5d277c7d2d
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
PW/src/v_of_rho.f90
View File

@ -18,8 +18,7 @@ SUBROUTINE v_of_rho( rho, rho_core, rhog_core, &
USE kinds, ONLY : DP
USE fft_base, ONLY : dfftp
USE gvect, ONLY : ngm
USE lsda_mod, ONLY : nspin
USE noncollin_module, ONLY : noncolin
USE noncollin_module, ONLY : noncolin, nspin_lsda
USE ions_base, ONLY : nat
USE ldaU, ONLY : lda_plus_U
USE funct, ONLY : dft_is_meta
@ -77,7 +76,7 @@ SUBROUTINE v_of_rho( rho, rho_core, rhog_core, &
!
! ... add an electric field
!
DO is = 1, nspin
DO is = 1, nspin_lsda
CALL add_efield(v%of_r(1,is), etotefield, rho%of_r, .false. )
END DO
!