mirror of https://gitlab.com/QEF/q-e.git
Bug fix: a problem with the routine that symmetrizes the quantization axis in
the noncollinear/GGA case. git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@7238 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
1564c205be
commit
fd73966324
|
@ -200,10 +200,10 @@ CONTAINS
|
|||
segno=1.0_DP
|
||||
IF (sname(isym)(1:3)=='inv') segno=-1.0_DP
|
||||
IF (t_rev(isym)==1) segno=-1.0_DP*segno
|
||||
work (:) = work (:) + segno * &
|
||||
work (:) = work (:) + segno * ( &
|
||||
s (:, 1, isym) * vect (1) + &
|
||||
s (:, 2, isym) * vect (2) + &
|
||||
s (:, 3, isym) * vect (3)
|
||||
s (:, 3, isym) * vect (3) )
|
||||
enddo
|
||||
work=work/nsym
|
||||
!
|
||||
|
|
Loading…
Reference in New Issue