Commit 6fc54788 authored by Henning Janssen's avatar Henning Janssen

Bugfixes

parent 2085015f
......@@ -555,7 +555,7 @@ CONTAINS
INTEGER :: uniqueElements !Number of unique elements before ind or in the whole array (if ind is not present)
INTEGER :: maxGF
INTEGER :: maxGF,nLO
INTEGER :: l,lp,atomType,atomTypep,iUnique,iContour,i_gf
LOGICAL :: l_sphavgArg, l_sphavgElem,loArg
......@@ -924,6 +924,6 @@ CONTAINS
ENDDO
ENDIF
END FUNCTION checkforLO_gfinp
END FUNCTION countLOs_gfinp
END MODULE m_types_gfinp
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