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

Fixed missing allocation in geo.f90

The allocation was required for he call to r_inpXML
parent 64d88f3b
......@@ -217,6 +217,8 @@ CONTAINS
kpts_temp,noel_temp,namex_temp,relcor_temp,a1_temp,a2_temp,a3_temp,scale_temp,dtild_temp,&
input_temp%comment)
ELSE
kpts_temp%numSpecialPoints = 1
ALLOCATE(kpts_temp%specialPoints(3,kpts_temp%numSpecialPoints))
ALLOCATE(noel_temp(1),atomTypeSpecies(1),speciesRepAtomType(1))
ALLOCATE(xmlElectronStates(1,1),xmlPrintCoreStates(1,1))
ALLOCATE(xmlCoreOccs(1,1,1))
......
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