Commit 06726125 authored by Matthias Redies's avatar Matthias Redies

Merge branch 'MetaGGA' of iffgit.fz-juelich.de:fleur/fleur into MetaGGA

parents e288839d 936913d6
......@@ -1152,10 +1152,8 @@ input%preconditioning_param = evaluateFirstOnly(xmlGetAttributeValue('/fleurInpu
IF(xmlGetNumberOfNodes(TRIM(xPathB) // '/@etot_correlation') == 1) THEN
valueString = TRIM(ADJUSTL(xmlGetAttributeValue(TRIM(xPathB) // '/@etot_correlation')))
exc_id_c = xc_f03_functional_get_number(TRIM(valueString))
write (*,*) "read exc_id_c"
ELSE
exc_id_c = vxc_id_c
write (*,*) "ignore exc_id_c"
ENDIF
#else
CALL judft_error("To use libxc functionals you have to compile with libXC support")
......
......@@ -33,8 +33,7 @@ CONTAINS
if(any(kinEnergyDen_RS < eps)) then
write (6,*) " lowest kinetic energy density cutoff = ", minval(kinEnergyDen_RS)
kinEnergyDen_RS = max(kinEnergyDen_RS, eps)
write (6,*) " afterwards = ", minval(kinEnergyDen_RS)
endif
endif
#else
USE m_juDFT_stop
......
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