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

Small cleanup of unused variables. 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@11584 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
dalcorso 2015-06-18 14:39:38 +00:00
parent 7a2070fda6
commit ec044e58cf
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
PHonon/PH/io_dyn_mat.f90
View File

@ -59,8 +59,8 @@ MODULE io_dyn_mat
INTEGER, INTENT(IN) :: ityp(nat)
INTEGER :: ierr, na, nt, kc, ibrav_
REAL(DP) :: aux(3,3), celldm_(6)
INTEGER :: ierr, na, nt, kc
REAL(DP) :: aux(3,3)
REAL (DP), PARAMETER :: convfact = BOHR_RADIUS_ANGS**2