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

More unused variables removed 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@9930 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2013-02-04 20:27:54 +00:00
parent 80ab8e35f2
commit 327e05d4af
3 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Modules/ptoolkit.f90
View File

@ -10,7 +10,6 @@
!==----------------------------------------------==!
USE kinds, ONLY : DP
USE io_global, ONLY : stdout
USE parallel_include
IMPLICIT NONE

2
Modules/xml_io_base.f90
View File

@ -20,7 +20,7 @@ MODULE xml_io_base
USE kinds, ONLY : DP
USE io_files, ONLY : tmp_dir, prefix, iunpun, xmlpun, &
current_fmt_version => qexml_version
USE io_global, ONLY : ionode, ionode_id, stdout
USE io_global, ONLY : ionode, ionode_id
USE mp, ONLY : mp_bcast
USE parser, ONLY : version_compare
!

4
Modules/zhpev_drv.f90
View File

@ -45,7 +45,6 @@ CONTAINS
!
USE kinds, ONLY : DP
USE io_global, ONLY : stdout
IMPLICIT NONE
@ -468,7 +467,6 @@ CONTAINS
SUBROUTINE pzupgtr( n, nrl, ap, lda, tau, q, ldq, nproc, me, comm)
USE kinds, ONLY : DP
USE io_global, ONLY : stdout
!
! Parallel MPI version of the LAPACK routine ZUPGTR
!
@ -755,7 +753,6 @@ CONTAINS
! Courant Institute, Argonne National Lab, and Rice University
!
USE kinds, ONLY : DP
USE io_global, ONLY : stdout
IMPLICIT NONE
@ -1390,7 +1387,6 @@ CONTAINS
SUBROUTINE zhpev_drv( JOBZ, UPLO, N, AP, W, Z, LDZ )
USE kinds, ONLY : DP
USE io_global, ONLY : stdout
IMPLICIT NONE