mirror of https://gitlab.com/QEF/q-e.git
Added explicit format for formatted output of the UNK files by pw2wannier90 in one of the two cases for reduce_unk (the other was already correct).
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@11899 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
6a3c54be1d
commit
383fdd3652
|
@ -2426,7 +2426,7 @@ SUBROUTINE write_plot
|
|||
IF (reduce_unk) THEN
|
||||
WRITE (iun_plot,'(2ES20.10)') (psic_small(j),j=1,n1by2*n2by2*n3by2)
|
||||
ELSE
|
||||
WRITE (iun_plot,*) (psic_all(j),j=1,dffts%nr1*dffts%nr2*dffts%nr3)
|
||||
WRITE (iun_plot,'(2ES20.10)') (psic_all(j),j=1,dffts%nr1*dffts%nr2*dffts%nr3)
|
||||
ENDIF
|
||||
ELSE
|
||||
IF (reduce_unk) THEN
|
||||
|
|
Loading…
Reference in New Issue