Commit f4e9ba4e authored by Gregor Michalicek's avatar Gregor Michalicek

Enable calculation of special k points in inp.xml

parent 95bc0740
......@@ -480,7 +480,9 @@ SUBROUTINE r_inpXML(&
DO i = 1, kpts%numSpecialPoints
WRITE(xPathA,*) '/fleurInput/calculationSetup/bzIntegration/kPointCount/specialPoint[',i,']'
valueString = TRIM(ADJUSTL(xmlGetAttributeValue(TRIM(ADJUSTL(xPathA)))))
READ(valueString,*) kpts%specialPoints(1,i), kpts%specialPoints(2,i), kpts%specialPoints(3,i)
kpts%specialPoints(1,i) = evaluatefirst(valueString)
kpts%specialPoints(2,i) = evaluatefirst(valueString)
kpts%specialPoints(3,i) = evaluatefirst(valueString)
kpts%specialPointNames(i) = xmlGetAttributeValue(TRIM(ADJUSTL(xPathA))//'/@name')
END DO
END IF
......
......@@ -2134,7 +2134,7 @@ unsigned char FleurInputSchema_xsd[] = {
0x43, 0x6f, 0x6e, 0x74, 0x65, 0x6e, 0x74, 0x3e, 0x0a, 0x20, 0x20, 0x20,
0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x3c, 0x78, 0x73, 0x64, 0x3a, 0x65,
0x78, 0x74, 0x65, 0x6e, 0x73, 0x69, 0x6f, 0x6e, 0x20, 0x62, 0x61, 0x73,
0x65, 0x3d, 0x22, 0x44, 0x6f, 0x75, 0x62, 0x6c, 0x65, 0x33, 0x44, 0x56,
0x65, 0x3d, 0x22, 0x53, 0x74, 0x72, 0x69, 0x6e, 0x67, 0x33, 0x44, 0x56,
0x65, 0x63, 0x54, 0x79, 0x70, 0x65, 0x22, 0x3e, 0x0a, 0x20, 0x20, 0x20,
0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x3c, 0x78, 0x73,
0x64, 0x3a, 0x61, 0x74, 0x74, 0x72, 0x69, 0x62, 0x75, 0x74, 0x65, 0x20,
......
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