Commit 9b164562 authored by Gregor Michalicek's avatar Gregor Michalicek

Add missing initialization of kpts%l_gamma in io/r_inpXML.F90

parent 656bd716
...@@ -479,7 +479,7 @@ SUBROUTINE r_inpXML(& ...@@ -479,7 +479,7 @@ SUBROUTINE r_inpXML(&
l_kpts = .TRUE. l_kpts = .TRUE.
numberNodes = xmlGetNumberOfNodes('/fleurInput/calculationSetup/bzIntegration/kPointList/kPoint') numberNodes = xmlGetNumberOfNodes('/fleurInput/calculationSetup/bzIntegration/kPointList/kPoint')
kpts%nkpt = numberNodes kpts%nkpt = numberNodes
kpts%nkpt = numberNodes kpts%l_gamma = .FALSE.
ALLOCATE(kpts%bk(3,kpts%nkpt)) ALLOCATE(kpts%bk(3,kpts%nkpt))
ALLOCATE(kpts%wtkpt(kpts%nkpt)) ALLOCATE(kpts%wtkpt(kpts%nkpt))
kpts%bk = 0.0 kpts%bk = 0.0
......
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