Empty strings ('') not allowed in standard fortran

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@3290 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2006-07-26 16:16:06 +00:00
parent 49a0eb6208
commit c17953ded3
1 changed files with 2 additions and 2 deletions

View File

@ -44,7 +44,7 @@ MODULE io_rho_xml
REAL(DP), ALLOCATABLE :: rhoaux(:)
!
!
ext = ''
ext = ' '
!
dirname = TRIM( tmp_dir ) // TRIM( prefix ) // '.save'
!
@ -127,7 +127,7 @@ MODULE io_rho_xml
REAL(DP), ALLOCATABLE :: rhoaux(:)
!
!
ext = ''
ext = ' '
!
dirname = TRIM( tmp_dir ) // TRIM( prefix ) // '.save'
!