Commit 833ac245 authored by Gregor Michalicek's avatar Gregor Michalicek
Browse files

Added missing initializations of some enpara arrays in init/inpeig.f90

These initializations are relevant for the old inp file if no enpara file is used.
parent 0526b698
......@@ -55,6 +55,9 @@
WRITE(6,*) "No enpara file found, using default values"
enpara%lchange = .FALSE.
enpara%llochg = .FALSE.
enpara%lchg_v = .FALSE.
DO n = 1, atoms%ntype
l_clf = .FALSE.
WRITE(fname,"('corelevels.',i2.2)") NINT(atoms%zatom(n))
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