mirror of https://gitlab.com/QEF/q-e.git
Small cleanup of unused variables.
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@9287 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
6c0d60f65b
commit
31845f94b9
|
@ -71,7 +71,7 @@ end Module dynamical
|
|||
!
|
||||
USE kinds, ONLY: DP
|
||||
USE mp, ONLY : mp_bcast
|
||||
USE mp_global, ONLY : nproc, mpime, mp_startup, mp_global_end
|
||||
USE mp_global, ONLY : mp_startup, mp_global_end
|
||||
USE io_global, ONLY : ionode, ionode_id, stdout
|
||||
USE environment, ONLY : environment_start, environment_end
|
||||
USE io_dyn_mat, ONLY : read_dyn_mat_param, read_dyn_mat_header, &
|
||||
|
|
|
@ -127,7 +127,7 @@ PROGRAM matdyn
|
|||
!
|
||||
USE kinds, ONLY : DP
|
||||
USE mp, ONLY : mp_bcast
|
||||
USE mp_global, ONLY : nproc, mpime, mp_startup, mp_global_end
|
||||
USE mp_global, ONLY : mp_startup, mp_global_end
|
||||
USE environment, ONLY : environment_start, environment_end
|
||||
USE io_global, ONLY : ionode, ionode_id, stdout
|
||||
USE io_dyn_mat, ONLY : read_dyn_mat_param, read_dyn_mat_header, &
|
||||
|
|
|
@ -51,7 +51,7 @@ SUBROUTINE phq_readin()
|
|||
USE ldaU, ONLY : lda_plus_u
|
||||
USE control_flags, ONLY : iverbosity, modenum, twfcollect
|
||||
USE io_global, ONLY : ionode, stdout
|
||||
USE mp_global, ONLY : nproc, nproc_pool, nproc_pool_file, &
|
||||
USE mp_global, ONLY : nproc_pool, nproc_pool_file, &
|
||||
nimage, my_image_id, &
|
||||
nproc_image_file, nproc_image, npool
|
||||
USE paw_variables, ONLY : okpaw
|
||||
|
|
|
@ -60,7 +60,7 @@ PROGRAM q2r
|
|||
!
|
||||
USE kinds, ONLY : DP
|
||||
USE mp, ONLY : mp_bcast
|
||||
USE mp_global, ONLY : nproc, mpime, mp_startup, mp_global_end
|
||||
USE mp_global, ONLY : mp_startup, mp_global_end
|
||||
USE dynamicalq, ONLY : phiq, tau, ityp, zeu
|
||||
USE fft_scalar, ONLY : cfft3d
|
||||
USE io_global, ONLY : ionode_id, ionode, stdout
|
||||
|
|
|
@ -14,8 +14,7 @@ SUBROUTINE cdiagh( n, h, ldh, e, v )
|
|||
! ... hermitean matrix H. On output, the matrix is unchanged
|
||||
!
|
||||
USE kinds, ONLY : DP
|
||||
USE mp_global, ONLY : nproc, nbgrp, nproc_bgrp, me_bgrp, &
|
||||
root_bgrp, intra_bgrp_comm
|
||||
USE mp_global, ONLY : nbgrp, me_bgrp, root_bgrp, intra_bgrp_comm
|
||||
USE mp, ONLY : mp_bcast
|
||||
!
|
||||
IMPLICIT NONE
|
||||
|
|
|
@ -227,7 +227,7 @@ CONTAINS
|
|||
USE wvfct, ONLY : nbnd
|
||||
USE io_global, ONLY : stdout
|
||||
!
|
||||
USE mp_global, ONLY : nproc, npool, nimage
|
||||
USE mp_global, ONLY : npool
|
||||
!
|
||||
IMPLICIT NONE
|
||||
!
|
||||
|
|
Loading…
Reference in New Issue