Incorrec call to "errore"

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@7914 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2011-06-28 14:25:07 +00:00
parent 32ac9359d0
commit dc6d7724fc
1 changed files with 1 additions and 1 deletions

View File

@ -1548,7 +1548,7 @@ SUBROUTINE read_cards_pw ( psfile, tau_format )
! !
IF ( tavel .AND. ANY ( sp_pos(:) /= sp_vel(:) ) ) & IF ( tavel .AND. ANY ( sp_pos(:) /= sp_vel(:) ) ) &
CALL errore("cards","list of species in block ATOMIC_VELOCITIES & CALL errore("cards","list of species in block ATOMIC_VELOCITIES &
& must be identical to those in ATOMIC_POSITIONS") & must be identical to those in ATOMIC_POSITIONS",1)
! !
! ... calculate fixatom ! ... calculate fixatom
! !