mirror of https://gitlab.com/QEF/q-e.git
Mistake in the new functional pbeq2d
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@9424 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
3f2a06d787
commit
fef27547bb
|
@ -788,8 +788,8 @@ subroutine pbex (rho, grho, iflag, sx, v1x, v2x)
|
|||
f1 = s2 * mu(iflag) / k (iflag)
|
||||
f2 = 1.d0 + f1
|
||||
f3 = k (iflag) / f2
|
||||
fx = k (iflag) - f3
|
||||
end if
|
||||
fx = k (iflag) - f3
|
||||
exunif = - c1 * kf
|
||||
sx = exunif * fx
|
||||
!
|
||||
|
|
Loading…
Reference in New Issue