mirror of https://gitlab.com/QEF/q-e.git
Small bug fix: uninitialized printing variable.
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@4852 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
4fc14af884
commit
9476f6098d
|
@ -119,6 +119,7 @@ SUBROUTINE do_cond(nodenumber)
|
|||
! the list of energies is read
|
||||
DO ien = 1, nenergy
|
||||
READ(5, *, err=400, iostat=ios) earr(ien)
|
||||
tran_tot(ien) = 0.d0
|
||||
ENDDO
|
||||
ELSE
|
||||
! the array of energies is automatically formed
|
||||
|
|
Loading…
Reference in New Issue