Change -\tau to +\tau for wigner_g

Update EPW test-farm.
QEF · Jul 3, 2018 · 66eed22 · 66eed22
1 parent 81b7290
commit 66eed22
Show file tree

Hide file tree

Showing 29 changed files with 56,911 additions and 57,236 deletions.
diff --git a/EPW/src/wigner.f90 b/EPW/src/wigner.f90
@@ -658,9 +658,9 @@ SUBROUTINE wigner_seitzg (nq1, nq2, nq3, irvec_gg, ndegen_gg, wslen_gg, nrr_g)
                   !
                   ! Calculate distance squared |r-R|^2 
                   !
-                  ndiff(1) = n1 - i1*nq1 -tau(1,na)
-                  ndiff(2) = n2 - i2*nq2 -tau(2,na)
-                  ndiff(3) = n3 - i3*nq3 -tau(3,na)
+                  ndiff(1) = n1 - i1*nq1 +tau(1,na)
+                  ndiff(2) = n2 - i2*nq2 +tau(2,na)
+                  ndiff(3) = n3 - i3*nq3 +tau(3,na)
                   DO ipol = 1, 3
                     DO jpol = 1, 3
                       dist(i) = dist(i) + dble(ndiff(ipol))*adot(ipol,jpol)*dble(ndiff(jpol))

diff --git a/test-suite/epw_base/benchmark.out.SVN.inp=epw1.in.args=3 b/test-suite/epw_base/benchmark.out.SVN.inp=epw1.in.args=3
diff --git a/test-suite/epw_base/benchmark.out.SVN.inp=epw3.in.args=3 b/test-suite/epw_base/benchmark.out.SVN.inp=epw3.in.args=3
diff --git a/test-suite/epw_base/benchmark.out.SVN.inp=epw4.in.args=3 b/test-suite/epw_base/benchmark.out.SVN.inp=epw4.in.args=3
diff --git a/test-suite/epw_base/benchmark.out.SVN.inp=epw5.in.args=3 b/test-suite/epw_base/benchmark.out.SVN.inp=epw5.in.args=3
diff --git a/test-suite/epw_base/benchmark.out.SVN.inp=epw6.in.args=3 b/test-suite/epw_base/benchmark.out.SVN.inp=epw6.in.args=3
diff --git a/test-suite/epw_base/benchmark.out.SVN.inp=epw7.in.args=3 b/test-suite/epw_base/benchmark.out.SVN.inp=epw7.in.args=3
diff --git a/test-suite/epw_base/benchmark.out.SVN.inp=epw8.in.args=3 b/test-suite/epw_base/benchmark.out.SVN.inp=epw8.in.args=3