Commit 19f06f38 authored by Gregor Michalicek's avatar Gregor Michalicek

Added missing initialization of enpara%llochg in r_inpXML

parent 7d969778
...@@ -1363,6 +1363,7 @@ SUBROUTINE r_inpXML(& ...@@ -1363,6 +1363,7 @@ SUBROUTINE r_inpXML(&
enpara%el0 = 0.0 enpara%el0 = 0.0
enpara%ello0 = 0.0 enpara%ello0 = 0.0
enpara%lchange = .FALSE. enpara%lchange = .FALSE.
enpara%llochg = .FALSE.
dimension%nstd = 29 dimension%nstd = 29
ALLOCATE(atoms%coreStateOccs(dimension%nstd,2,atoms%ntype)) ALLOCATE(atoms%coreStateOccs(dimension%nstd,2,atoms%ntype))
......
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