Commit b6fb7915 authored by Daniel Wortmann's avatar Daniel Wortmann

Removed debug output in fleur_init

parent e1a859ab
......@@ -570,12 +570,12 @@
wann%param_file='qpts'
wann%l_dim=.false.
IF (mpi%irank.EQ.0) THEN
#ifdef CPP_WANN
INQUIRE(FILE='plotbscomf',EXIST=wann%l_bs_comf)
WRITE(*,*)'l_bs_comf=',wann%l_bs_comf
WRITE(*,*) 'Logical variables for wannier functions to be read in!!'
wann%l_gwf = wann%l_ms.or.wann%l_sgwf.or.wann%l_socgwf
#endif
wann%l_gwf = wann%l_ms.OR.wann%l_sgwf.OR.wann%l_socgwf
if(wann%l_gwf) then
WRITE(*,*)'running HDWF-extension of FLEUR code'
......
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