Commit 9a25df4b authored by Robin Hilgers's avatar Robin Hilgers

Restored that fleur.f90 is buildable

parent 7aa87c9f
......@@ -387,10 +387,10 @@ CONTAINS
IF ((sliceplot%iplot.NE.0 ).AND.(mpi%irank==0) ) THEN
! CDN including core charge
CALL makeplots(stars, atoms, sphhar, vacuum, input, oneD, sym, &
! CALL makeplots(stars, atoms, sphhar, vacuum, input, oneD, sym, &
cell, noco, outDen, PLOT_OUTDEN_Y_CORE, sliceplot)
!! CDN subtracted by core charge
CALL makeplots(stars, atoms, sphhar, vacuum, input, oneD, sym, &
! CALL makeplots(stars, atoms, sphhar, vacuum, input, oneD, sym, &
cell, noco, outDen, PLOT_OUTDEN_N_CORE, sliceplot)
END IF
......
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