mirror of https://gitlab.com/QEF/q-e.git
write_rho must create the output directory if not existent
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@13510 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
15fa647b1a
commit
f9dfb35cf1
|
@ -46,6 +46,7 @@ MODULE io_rho_xml
|
|||
|
||||
! Use the equivalent routine to write real space density
|
||||
dirname = TRIM(tmp_dir) // TRIM(prefix) // '.save/'
|
||||
CALL create_directory( dirname )
|
||||
! in the following case do not read or write polarization
|
||||
IF ( noncolin .AND. .NOT.domag ) THEN
|
||||
CALL write_rho ( dirname, rho%of_r, 1 )
|
||||
|
|
Loading…
Reference in New Issue