scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Wrong dimension declared for ityp 

LP


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@6266 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
paulatto 2010-01-07 12:08:50 +00:00
parent 8a58de22ef
commit 134d3ae78b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PW/martyna_tuckerman.f90
View File

@ -88,7 +88,7 @@ CONTAINS
USE cell_base, ONLY : tpiba
USE mp_global, ONLY : intra_pool_comm
USE mp, ONLY : mp_sum
INTEGER, INTENT(IN) :: nat, ntyp, ityp(ntyp), ngm, nspin
INTEGER, INTENT(IN) :: nat, ntyp, ityp(nat), ngm, nspin
REAL(DP), INTENT(IN) :: omega, zv(ntyp), tau(3,nat), g(3,ngm)
COMPLEX(DP), INTENT(IN) :: strf(ngm,ntyp), rho(ngm,nspin)
REAL(DP), INTENT(OUT) :: force(3,nat)