Bug fix: with the old pseudopotentials format, zv was not passed from

pw.x to the other programs. git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@3254 c92efa57-630b-4861-b058-cf58834340f0
2006-07-07 08:37:36 +00:00 · 2006-07-07 08:37:36 +00:00 · 9c9ba9e02e
parent a7f8a2bb4c
commit 9c9ba9e02e
1 changed files with 2 additions and 0 deletions
--- a/PW/readin.f90
+++ b/PW/readin.f90
@ -111,6 +111,8 @@ subroutine readpp
           ! numeric is read inside read_ncpp
           call read_ncpp (nt, iunps)
           !
+           zv(nt)=zp(nt)
+           !
        endif
     endif
     close (iunps)