Commit 76b990ae authored by Daniel Wortmann's avatar Daniel Wortmann

Moved stop for automatic core config for z>92, so that manual config works in these cases

parent 0ce97a85
......@@ -1486,6 +1486,8 @@ SUBROUTINE r_inpXML(&
atoms%numStatesProvided(iType) = providedStates
IF (coreConfigPresent) THEN
IF (providedCoreStates.NE.atoms%ncst(iType)) THEN
WRITE(6,*) " providedCoreStates:",providedCoreStates
WRITE(6,*) "atoms%ncst(iType) :",atoms%ncst(iType)
STOP 'Wrong number of core states provided!'
END IF
DO k = 1, providedStates !atoms%ncst(iType)
......
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