LCPQ/dft_tools
3
0
Fork 0
mirror of https://github.com/triqs/dft_tools synced 2024-07-25 04:07:37 +02:00
Code Issues Releases Wiki Activity

Writing of .oubwin removed for dmftproj -band

Browse Source
This commit is contained in:
Manuel Zingl 2015-07-07 16:00:06 +02:00
parent 335dee2042
commit 8ecadc1167
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
fortran/dmftproj/dmftproj.f
View File

@ -745,10 +745,10 @@ C Writing the output files for DMFT computations :
C ------------------------------------------------ C ------------------------------------------------
IF(.NOT.ifBAND) THEN IF(.NOT.ifBAND) THEN
CALL outqmc(elecn,qtot) CALL outqmc(elecn,qtot)
CALL outbwin
ELSE ELSE
CALL outband CALL outband
ENDIF ENDIF
CALL outbwin
ENDIF ENDIF
C End of the prgm C End of the prgm
CALL printout(0) CALL printout(0)