Commit cc17bfaa authored by Daniel Wortmann's avatar Daniel Wortmann

Bugfix in tlmplm

parent c3bdffca
......@@ -48,7 +48,7 @@ CONTAINS
CALL genMTBasis(atoms,enpara,v,mpi,n,jspin,ud,f,g,flo)
na=SUM(atoms%neq(:n-1))+1
nsym = atoms%ntypsy(na)
nh = sphhar%nlh(nsym)
!
......
......@@ -1124,7 +1124,7 @@ input%preconditioning_param = evaluateFirstOnly(xmlGetAttributeValue('/fleurInpu
id_x=0; id_c=0
ENDIF
write (*,*) "id_x = ", id_x, "id_c = ", id_c
!write (*,*) "id_x = ", id_x, "id_c = ", id_c
! Read in xc functional parameters
valueString = TRIM(ADJUSTL(xmlGetAttributeValue(TRIM(ADJUSTL('/fleurInput/xcFunctional/@name')))))
......
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