Commit d7ab183b authored by Daniel Wortmann's avatar Daniel Wortmann

mcd&orb mode not initialized in DOS

parent bb7bf506
......@@ -520,5 +520,10 @@
IF (judft_was_argument("-check")) CALL judft_end("Check-mode done",mpi%irank)
!Now check for additional input files
INQUIRE(file='orbcomp',exists=banddos%l_orb)
INQUIRE(file='mcd_inp',exists=banddos%l_mcd)
END SUBROUTINE fleur_init
END MODULE
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment