Commit d87e7cd9 authored by Gregor Michalicek's avatar Gregor Michalicek

Minor code cleanup in r_inpXML.F90

Due to the elimination of variables some statements appeared redundantly.
I removed them.
parent c085f7b9
......@@ -243,12 +243,10 @@ SUBROUTINE r_inpXML(&
numberNodes = numberNodes + xmlGetNumberOfNodes('/fleurInput/atomGroups/atomGroup/absPos')
numberNodes = numberNodes + xmlGetNumberOfNodes('/fleurInput/atomGroups/atomGroup/filmPos')
atoms%nat = numberNodes
atoms%nat = numberNodes
numberNodes = xmlGetNumberOfNodes('/fleurInput/atomGroups/atomGroup')
atoms%ntype = numberNodes
atoms%ntype = numberNodes
numSpecies = xmlGetNumberOfNodes('/fleurInput/atomSpecies/species')
......
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