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

Cleanup: unused function 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@9874 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2013-01-27 20:51:42 +00:00
parent 2a9ac1f496
commit 0f7774cd73
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
PW/src/input.f90
View File

@ -1703,8 +1703,7 @@ SUBROUTINE verify_tmpdir( tmp_dir )
USE wrappers, ONLY : f_mkdir
USE input_parameters, ONLY : restart_mode
USE control_flags, ONLY : lbands
USE io_files, ONLY : prefix, xmlpun, &
delete_if_present, check_writable
USE io_files, ONLY : prefix, xmlpun, delete_if_present
USE pw_restart, ONLY : pw_readfile
USE io_global, ONLY : ionode
USE mp, ONLY : mp_barrier
@ -1788,7 +1787,6 @@ SUBROUTINE parallel_mkdir ( tmp_dir )
USE wrappers, ONLY : f_mkdir
USE mp_global, ONLY : mpime, nproc
USE mp, ONLY : mp_barrier, mp_sum
USE io_files, ONLY : check_writable
!
IMPLICIT NONE
!